Bartosz Wójcik <bar...@sudety.it> writes:
> myConcat' :: (Integral a) => Integer -> [a] -> [Integer]
:
> myConcat' acc (x:xs) = case x `mod` 16 of
:
> 10 -> fail $ show acc
> 11 -> fail $ show acc
> 14 -> fail $ show acc
^^^^^^^^^^^^^^^
Since you're in the list monad, this just returns []. Perhaps you
mean error rather than fail? (And isn't it more useful to print x
than acc?)
> v -> myConcat' (100*acc + (numberOf . fromIntegral) x) xs
> where restOf n = (n - 12) `div` 16
> numberOf n = n - 6 * (n `div` 16)
-k
--
If I haven't seen further, it is by standing in the footprints of giants
_______________________________________________
Haskell-Cafe mailing list
Haskell-Cafe@haskell.org
http://www.haskell.org/mailman/listinfo/haskell-cafe
