]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/ground/arith/nat_plus.ma
update in delayed_updating
[helm.git] / matita / matita / contribs / lambdadelta / ground / arith / nat_plus.ma
index f1dffc51db7350cba1caaa9c66113607bd0ae695..19b8acdd00578858526b21b7899c5a4d611a1961 100644 (file)
@@ -31,7 +31,7 @@ lemma nplus_zero_dx (m): m = m + ๐ŸŽ.
 // qed.
 
 (*** plus_SO_dx *)
-lemma nplus_one_dx (n): โ†‘n = n + ๐Ÿ.
+lemma nplus_unit_dx (n): โ†‘n = n + ๐Ÿ.
 // qed.
 
 (*** plus_n_Sm *)
@@ -43,7 +43,7 @@ qed.
 
 (*** iter_plus *)
 lemma niter_plus (A) (f) (n1) (n2):
-      f^n2 รข\88\98 f^n1 รข\89\90 f^{A}(n1+n2).
+      f^n2 รข\88\98 f^n1 รข\8a\9c f^{A}(n1+n2).
 #A #f #n1 #n2 @(nat_ind_succ โ€ฆ n2) -n2 //
 #n2 #IH <nplus_succ_dx
 @exteq_repl
@@ -76,7 +76,7 @@ qed.
 (* Helper constructions *****************************************************)
 
 (*** plus_SO_sn *)
-lemma nplus_one_sn (n): โ†‘n = ๐Ÿ + n.
+lemma nplus_unit_sn (n): โ†‘n = ๐Ÿ + n.
 #n <nplus_comm // qed.
 
 lemma nplus_succ_shift (m) (n): โ†‘m + n = m + โ†‘n.