On Dec 12, 2007 10:36 AM, Arie Groeneveld <[EMAIL PROTECTED]> wrote: > 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 >
One can also use Data.Char.digitToInt in place of (flip (-) 48 . ord). -Brent
_______________________________________________ Haskell-Cafe mailing list [email protected] http://www.haskell.org/mailman/listinfo/haskell-cafe
