Get 180 easy working in Haskell