compare +base

compare :: Ord a => a -> a -> Ordering
base Prelude, base Data.Ord