(* PARALLEL R-TRANSITION FOR FULL LOCAL ENVIRONMENTS ************************)
-(* Forward lemmas with unbound parallel rt-transition for ref local envs ****)
+(* Forward lemmas with extended parallel rt-transition for ref local envs ***)
(* Basic_2A1: was: lpr_lpx *)
-lemma lpr_fwd_lpx (h) (G): ∀L1,L2. ⦃G,L1⦄ ⊢ ➡[h] L2 → ⦃G,L1⦄ ⊢ ⬈[h] L2.
+lemma lpr_fwd_lpx (h) (G):
+ ∀L1,L2. ❪G,L1❫ ⊢ ➡[h,0] L2 → ❪G,L1❫ ⊢ ⬈ L2.
/3 width=3 by cpm_fwd_cpx, lex_co/ qed-.