Summary

https://twitter.com/Iceland_jack/status/1193558757122494466

Steps to reproduce

> import Data.Ord
> import Data.Functor.Classes
> compare1 (Down 1) (Down 2)
LT

Expected behavior

> compare1 (Down 1) (Down 2)
GT

Environment

• GHC version used: 8.6.5

Optional:

• Operating System: NixOS 19.09
• System Architecture: x86-64