add Haskell codes