Solve problem 102 using Haskell.