1 2 3 4 5 6 7 8
{-# LANGUAGE GADTs #-} {-# LANGUAGE KindSignatures #-} module T17384 where import Data.Kind data T :: Type -> Type where MkT :: T (Maybe Bool)