Smash Hit Subs Map, Haskell