p014 in haskell, collatz numbers