Haskell Implementation of Kaleidoscope