[Haskell-cafe] Folding Integrals

[Arie Groeneveld]

Reinier Lamers schreef:
>
> printint :: Int -> [Char]
> printint = map chr . map (+0x30) . reverse . map (`mod` 10) .
> takeWhile (>0) . iterate (`div`10)
>
Most of the time I use this:

digits :: Integer -> [Int]
digits = map (flip(-)48.ord) . show



Regards

=@@i