Triple T Map, Haskell