[Haskell-cafe] More Efficient Recursion