fact: Record model := mk_model { Var : tpred -> tpred ; Arr : tpred -> tpred -> tpred ; All : (tpred -> tpred) -> tpred ; Var_ext : Proper (pw_iff ==> pw_iff) Var ; Arr_ext : Proper (pw_iff ==> pw_iff ==> pw_iff) Arr ; All_ext : Proper (pointwise_relation _ pw_iff ==> pw_iff) All }.
imports: Undecidability.SystemF.SysF Undecidability.SystemF.Autosubst.syntax Undecidability.SystemF.Autosubst.unscoped Undecidability.SystemF.Util(typing_facts term_facts step) Setoid Morphisms