proposition: Lemma pure_typable_K'E {Gamma M N} : pure_typable Gamma (K' M N) -> pure_typable Gamma M /\ pure_typable Gamma N.
proof: Proof. by move=> [?] /pure_typing_K'E [/pure_typableI]. Qed.
imports: List Lia Relation_Definitions Relation_Operators Operators_Properties Undecidability.SystemF.SysF Undecidability.SystemF.Autosubst.syntax Undecidability.SystemF.Autosubst.unscoped Undecidability.SystemF.Util(Facts poly_type_facts pure_term_facts term_facts typing_facts iipc2_facts pure_typing_facts) ssreflect ssrbool ssrfun