add haskell codes