RosettaCodeData/Task/Casting-out-nines/Haskell/casting-out-nines-2.hs
2023-07-01 13:44:08 -04:00

1 line
72 B
Haskell

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