pprCtO PatSigOrigin          = ptext (sLit "a pattern type signature")
pprCtO PatSigOrigin          = ptext (sLit "a pattern type signature")
pprCtO PatSigOrigin          = ptext (sLit "a pattern type signature")