Pascal → Haskell