adding real world haskell