Change the example code to Haskell like representation