Solved . Just changed my count function count :: Integer -> Integer -> Integer count 0 _ = 0 count n p = div n p + count ( div n p ) p
-- You received this message because you are subscribed to the Google Groups "Algorithm Geeks" group. To post to this group, send email to algogeeks@googlegroups.com. To unsubscribe from this group, send email to algogeeks+unsubscr...@googlegroups.com. For more options, visit this group at http://groups.google.com/group/algogeeks?hl=en.