1 2 3 4 5 6 7
{-# LANGUAGE Haskell2010 #-} {-# LANGUAGE GADTs #-} module T4087 where data Equal a b where Equal :: Equal a a