A vigenere algorithm encryptor/decryptor with haskell