1 2 3 4 5 6 7 8
{-# LANGUAGE DataKinds #-} {-# LANGUAGE GADTs #-} module T9778 where data T = A | B data G a where C :: G A