From HaskellWiki
RubyQuiz #93: A happy number is found using the following process: Take the sum of the squares of its digits, and continue iterating this process until it yields 1, or produces an infinite loop.
1 The Problem
2 Solutions
Category: Haskell Quiz