Vignere ciper implemented in Haskell