Add Haskell solution to problem 18, 67