(* CONTEXT-SENSITIVE PARALLEL COMPUTATION ON TERMS **************************)
-(* Basic_1: includes: pr3_pr2 *)
definition cprs: lenv → relation term ≝
λL. TC … (cpr L).
(* Basic properties *********************************************************)
+(* Basic_1: was: pr3_pr2 *)
+lemma cpr_cprs: ∀L,T1,T2. L ⊢ T1 ➡ T2 → L ⊢ T1 ➡* T2.
+/2 width=1/ qed.
+
(* Basic_1: was: pr3_refl *)
lemma cprs_refl: ∀L,T. L ⊢ T ➡* T.
/2 width=1/ qed.