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

[Chris Kuklewicz]

Hmmm... I think I should have said:

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