purescript-0.15.15: tests/purs/passing/RedefinedFixity/M1.purs

module M1 where

applyFn :: forall a b. (forall c d. c -> d) -> a -> b
applyFn f a = f a

infixr 1000 applyFn as $