update haskell example