(* Basic_2A1: includes: scpds_fwd_cpxs cprs_cpxs *)
lemma cpms_fwd_cpxs (h) (n) (G) (L):
- â\88\80T1,T2. â\9dªG,Lâ\9d« â\8a¢ T1 â\9e¡*[h,n] T2 â\86\92 â\9dªG,Lâ\9d« ⊢ T1 ⬈* T2.
+ â\88\80T1,T2. â\9d¨G,Lâ\9d© â\8a¢ T1 â\9e¡*[h,n] T2 â\86\92 â\9d¨G,Lâ\9d© ⊢ T1 ⬈* T2.
#h #n #G #L #T1 #T2 #H @(cpms_ind_dx … H) -T2
/3 width=5 by cpxs_strap1, cpm_fwd_cpx/
qed-.