[Haskell-iPhone] Bumpy ride down tetris clone lane.