update in basic_2

[helm.git] / matita / matita / contribs / lambdadelta / basic_1 / next_plus / defs.ma

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 63eeacb4167e5ab3ca07c964422d68c771ec2768..04e15b3ccce9f062c75fa4f146b60dc4f826bdd7 100644 (file)
--- a/matita/matita/contribs/lambdadelta/basic_1/next_plus/defs.ma
+++ b/matita/matita/contribs/lambdadelta/basic_1/next_plus/defs.ma
@@ -16,7 +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 (let TMP_1 \def (next_plus g n i0) in 
-(next g TMP_1))].
+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))].