Add progress towards Haskell solution to problem 3