A Haskell program to find the solution for Project Euler problem 9.