TcPat
tcLetPat
tcPat
tcPats
tcOverloadedLit
addDataConStupidTheta
badFieldCon
polyPatSig