RosettaCodeData/Task/Casting-out-nines/Haskell/casting-out-nines-2.hs
2017-09-25 22:28:19 +02:00

1 line
72 B
Haskell

digits base = map (`mod` base) . takeWhile (> 0) . iterate (`div` base)