A svbtle clone in Haskell.