fact: Definition polypnormalize {T} (term : polyhas_parse_term T) : polyhas_parse_term T := fun var => pnormalize (term _).
imports: Fiat.Parsers.Reflective.Syntax Fiat.Parsers.Reflective.ParserSyntax Fiat.Parsers.Reflective.PartialUnfold