(* Properties with t-bound rt-transition for terms **************************)
lemma cpm_tneqx_cpm_fpbg (h) (G) (L):
- â\88\80n1,T1,T. â\9dªG,Lâ\9d« ⊢ T1 ➡[h,n1] T → (T1 ≅ T → ⊥) →
- â\88\80n2,T2. â\9dªG,Lâ\9d« â\8a¢ T â\9e¡[h,n2] T2 â\86\92 â\9dªG,L,T1â\9d« > â\9dªG,L,T2â\9d«.
+ â\88\80n1,T1,T. â\9d¨G,Lâ\9d© ⊢ T1 ➡[h,n1] T → (T1 ≅ T → ⊥) →
+ â\88\80n2,T2. â\9d¨G,Lâ\9d© â\8a¢ T â\9e¡[h,n2] T2 â\86\92 â\9d¨G,L,T1â\9d© > â\9d¨G,L,T2â\9d©.
/4 width=5 by fpbc_fpbs_fpbg, fpb_fpbs, cpm_fwd_fpbc, cpm_fwd_fpb/
qed.