1{-# LANGUAGE DefaultSignatures #-} 2module T5001b where 3 4class GEnum a where 5 genum :: [a] 6 default genum :: [a] 7 genum = undefined 8 9instance GEnum Int where 10 {-# INLINE genum #-} 11