+1 for this, also check out Graham's io9 video on the Counting Problem. The solution is beautiful and really got me excited about Haskell when I was first learning:

http://channel9.msdn.com/Series/C9-Lectures-Erik-Meijer-Func...