notational update in ground_2 and basic_2

[helm.git] / matita / matita / contribs / lambdadelta / ground_2 / relocation / mr2_plus.ma

diff --git a/matita/matita/contribs/lambdadelta/ground_2/relocation/mr2_plus.ma b/matita/matita/contribs/lambdadelta/ground_2/relocation/mr2_plus.ma
index 11ffaa40710a4b7d9b848e07601974aa139c37af..8c32215979b074b839db390f0589aba5e488e407 100644 (file)
--- a/matita/matita/contribs/lambdadelta/ground_2/relocation/mr2_plus.ma
+++ b/matita/matita/contribs/lambdadelta/ground_2/relocation/mr2_plus.ma
@@ -16,7 +16,7 @@ include "ground_2/relocation/mr2.ma".
 
 (* MULTIPLE RELOCATION WITH PAIRS *******************************************)
 
-let rec pluss (cs:mr2) (i:nat) on cs ≝ match cs with
+rec definition pluss (cs:mr2) (i:nat) on cs ≝ match cs with
 [ nil2         ⇒ ◊
 | cons2 l m cs ⇒ {l + i, m} @ pluss cs i
 ].
@@ -26,7 +26,7 @@ interpretation "plus (multiple relocation with pairs)"
 
 (* Basic properties *********************************************************)
 
-lemma pluss_SO2: â\88\80l,m,cs. ({l, m} @ cs) + 1 = {⫯l, m} @ cs + 1.
+lemma pluss_SO2: â\88\80l,m,cs. ({l, m} @ cs) + 1 = {â\86\91l, m} @ cs + 1.
 normalize // qed.
 
 (* Basic inversion lemmas ***************************************************)