f x|x>=10 = f(x `mod` 10 + f(x `div` 10))
|otherwise = x
うpしてみた。
N%9 じゃあ 9%9=0 じゃない