Add haskell code.