1 2 3 4 5 6 7 8
{-# LANGUAGE RankNTypes, PolyKinds #-} {-# OPTIONS_GHC -fprint-explicit-kinds #-} module T17077 where import Data.Proxy t :: Proxy (z :: forall k. a) t = t