Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/prelude/Prelude/Enum_Int.hs
module Prelude(Enum(..)) where instance Enum Int where toEnum = id fromEnum = id enumFrom n = n : enumFrom (n+1) enumFromThen m n = m : enumFromThen n (2*n-m)
