]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/ground/arith/nat_iter.ma
update in ground, static_2 and apps_2
[helm.git] / matita / matita / contribs / lambdadelta / ground / arith / nat_iter.ma
index 6adaa148a3872d09a8bce16422c136591a336178..fc824317ab5e517f08f63f73c9945ef5528dfac3 100644 (file)
@@ -35,20 +35,20 @@ interpretation
 lemma niter_zero (A) (f) (a): a = (f^{A}๐ŸŽ) a.
 // qed.
 
-lemma niter_inj (A) (f) (p): f^p รข\89\90 f^{A}(ninj p).
+lemma niter_inj (A) (f) (p): f^p รข\8a\9c f^{A}(ninj p).
 // qed.
 
 (* Advanced constructions ***************************************************)
 
 (*** iter_n_Sm *)
-lemma niter_appl (A) (f) (n): f รข\88\98 f^n รข\89\90 f^{A}n โˆ˜ f.
+lemma niter_appl (A) (f) (n): f รข\88\98 f^n รข\8a\9c f^{A}n โˆ˜ f.
 #A #f * //
 #p @exteq_repl
 /2 width=5 by piter_appl, compose_repl_fwd_dx/
 qed.
 
 lemma niter_compose (A) (B) (f) (g) (h) (n):
-      h รข\88\98 f รข\89\90 g รข\88\98 h รข\86\92 h รข\88\98 (f^{A}n) รข\89\90 (g^{B}n) โˆ˜ h.
+      h รข\88\98 f รข\8a\9c g รข\88\98 h รข\86\92 h รข\88\98 (f^{A}n) รข\8a\9c (g^{B}n) โˆ˜ h.
 #A #B #f #g #h * //
 #p #H @exteq_repl
 /2 width=5 by piter_compose, compose_repl_fwd_dx/