(* Forward lemmas with parallel rst-computation for closures ****************)
(* Basic_2A1: uses: cprs_fpbs *)
-lemma cpms_fwd_fpbs (n) (h):
- â\88\80G,L,T1,T2. â¦\83G,Lâ¦\84 â\8a¢ T1 â\9e¡*[n,h] T2 â\86\92 â¦\83G,L,T1â¦\84 â\89¥[h] â¦\83G,L,T2â¦\84.
-/3 width=2 by cpms_fwd_cpxs, cpxs_fpbs/ qed-.
+lemma cpms_fwd_fpbs (h) (n):
+ â\88\80G,L,T1,T2. â\9dªG,Lâ\9d« â\8a¢ T1 â\9e¡*[h,n] T2 â\86\92 â\9dªG,L,T1â\9d« â\89¥ â\9dªG,L,T2â\9d«.
+/3 width=3 by cpms_fwd_cpxs, cpxs_fpbs/ qed-.