]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/ground/arith/nat_iter.ma
milestone update in ground
[helm.git] / matita / matita / contribs / lambdadelta / ground / arith / nat_iter.ma
index b7e4146e42541461288ad5250c97ba545a3a9edb..6adaa148a3872d09a8bce16422c136591a336178 100644 (file)
@@ -21,7 +21,7 @@ include "ground/arith/nat.ma".
 definition niter (n:nat) (A:Type[0]) (f:A→A) (a:A) ≝
 match n with
 [ nzero  ⇒ a
-| ninj p ⇒ f^{A}p a
+| ninj p ⇒ (f^{A}p) a
 ]
 .