X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_1%2Fnext_plus%2Fdefs.ma;h=04e15b3ccce9f062c75fa4f146b60dc4f826bdd7;hp=b622b763c26c88a57cd5eb762d0699b137ffef3c;hb=57ae1762497a5f3ea75740e2908e04adb8642cc2;hpb=639e798161afea770f41d78673c0fe3be4125beb

diff --git a/matita/matita/contribs/lambdadelta/basic_1/next_plus/defs.ma b/matita/matita/contribs/lambdadelta/basic_1/next_plus/defs.ma
index b622b763c..04e15b3cc 100644
--- a/matita/matita/contribs/lambdadelta/basic_1/next_plus/defs.ma
+++ b/matita/matita/contribs/lambdadelta/basic_1/next_plus/defs.ma
@@ -16,6 +16,6 @@
 
 include "basic_1/G/defs.ma".
 
-let rec next_plus (g: G) (n: nat) (i: nat) on i: nat \def match i with [O 
-\Rightarrow n | (S i0) \Rightarrow (next g (next_plus g n i0))].
+rec definition next_plus (g: G) (n: nat) (i: nat) on i: nat \def match i with 
+[O \Rightarrow n | (S i0) \Rightarrow (next g (next_plus g n i0))].