ghc-exactprint-1.9.0.0: tests/examples/pre-ghc910/OveridingPrimitives.hs

{-# LANGUAGE DataKinds              #-}
{-# LANGUAGE TypeOperators          #-}

(~#) :: Comonad w => CascadeW w (t ': ts) -> w t -> Last (t ': ts)
(~#) = cascadeW
infixr 0 ~#