TcPat
tcLetPat
newLetBndr
data LetBndrSpec
tcPat
tcPat_O
tcPats
addDataConStupidTheta
badFieldCon
polyPatSig