1 2 3 4 5 6 7 8
{-# LANGUAGE StandaloneKindSignatures #-} module VisFlag4 where import Data.Kind type C :: (forall k -> k -> k) -> Constraint class C (hk :: forall k. k -> k) where