Re: [Haskell-cafe] Re: Why is Day and Month bounded?

Hmmm... I think I should have said:

toCycle :: Int -> c toCycle = toEnum . (+ (fromEnum (minBound::c))) . (`mod` (cyclePeriod (undefined::c)))