1 2 3 4 5 6 7 8 9
{-# LANGUAGE GADTs, PolyKinds, DataKinds #-} module T15116 where import Data.Proxy data A (a :: k) where MkA :: A MkA