"Write yourself a Scheme" in haskell.