GCompare package:generic-data

Generic compare.
instance Ord MyType where
compare = gcompare