fact: Definition M (p : tpred) : tpred := fun P => forall ξ1 ξ2, p (ren_term ξ1 ξ2 P).
imports: Undecidability.SystemF.SysF Undecidability.SystemF.Autosubst.syntax Undecidability.SystemF.Autosubst.unscoped Undecidability.SystemF.Util(typing_facts term_facts step) Setoid Morphisms