Problem 56 in haskell
Problem 57 in Haskell