A simple morse translator written in haskell