easy 149 in haskell, disemvowel