[Haskell-beginners] Einstein's Problem

[Patrick LeBoutillier]

Hi all,

I've been working hard at trying to solve Einstein's problem
(http://www.davar.net/MATH/PROBLEMS/EINSTEIN.HTM) if an efficient
manner using Haskell.

I have posted my solution here: http://haskell.pastebin.com/m3ff1973a

This exercise has been a real eye opener for me, especially for
learning to work with the Maybe and List monads.

I'm looking for suggestions for making the "test" function nicer. In
order to make my solution fast, I generate my test cases
incrementally,
thereby elimating most of the cases early on. However the function
looks funny (deeply nested).

I'm also open to any comments about making better use of the different
Haskell idioms.


Thanks a lot,

Patrick
-- 
=====================
Patrick LeBoutillier
Rosemère, Québec, Canada