Subset of R5RS Scheme written in Haskell