Did 8 in haskell for the first time