1 2 3 4 5 6 7 8
{-# LANGUAGE TypeFamilies #-} module OverA (C, D) where data family C a b :: * type family D a b :: *