compare
toEnum
fromEnum
subtract 1
abs
<>
n=fmap fromEnum m=fmap n compare
n
fmap
(.)
fmap :: (Functor f) => (a -> b) -> f a -> fb
(Enum a)=> (a ->)
a
-- | @since 2.01 instance Functor ((->) r) where fmap = (.)
(Ord a) => (a ->)
m = (fromEnum .) . compare
m = fmap (fmap fromEnum) compare
/=