Hello, I have this : -- | Convert a digit to a list for example 123 becomes [1,2,3] toDigits :: Integer -> [Integer] toDigits number | number <= 0 = [] | number > 0 = toDigitsAcc [] number toDigitsAcc:: [Integer] -> [Integer] -> [Integer] toDigitsAcc acc number | number <= 0 = acc | number > 0 = (number `mod` 10) : acc toDigitsAcc (number `div` 10) bur there are error on both last lines of he functions. Any tips how to solve this ? Roelof --- Dit e-mailbericht is gecontroleerd op virussen met Avast antivirussoftware. http://www.avast.com
I think you wanted something like this : toDigits :: Integer -> [Integer] toDigits number | number <= 0 = [] | number > 0 = toDigitsAcc [] number --( toDigits (number `div` 10) ) ++ [number `mod` 10] toDigitsAcc:: [Integer] -> Integer -> [Integer] toDigitsAcc acc number | number <= 0 = acc | number > 0 = toDigitsAcc ((number `mod` 10) : acc) (number `div` 10) Regards Nishant Verma On Wed, May 13, 2015 at 5:13 PM, Roelof Wobben <r.wobben@home.nl> wrote:
Hello,
I have this :
-- | Convert a digit to a list for example 123 becomes [1,2,3] toDigits :: Integer -> [Integer] toDigits number | number <= 0 = [] | number > 0 = toDigitsAcc [] number
toDigitsAcc:: [Integer] -> [Integer] -> [Integer] toDigitsAcc acc number | number <= 0 = acc | number > 0 = (number `mod` 10) : acc toDigitsAcc (number `div` 10)
bur there are error on both last lines of he functions.
Any tips how to solve this ?
Roelof
--- Dit e-mailbericht is gecontroleerd op virussen met Avast antivirussoftware. http://www.avast.com
_______________________________________________ Beginners mailing list Beginners@haskell.org http://mail.haskell.org/cgi-bin/mailman/listinfo/beginners
-- Nishant
Nishant schreef op 13-5-2015 om 14:04:
number > 0 = toDigitsAcc ((number `mod` 10) : acc) (number `div` 10)
Thanks, I now see where my thinking took the wrong way Roelof --- Dit e-mailbericht is gecontroleerd op virussen met Avast antivirussoftware. http://www.avast.com
participants (2)
-
Nishant -
Roelof Wobben