A Scheme implementation in Haskell.