Haskell samples for me