slow, albeit working, haskell solution for euler #9

hope to speed up this solution as I learn more λ