X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_1%2Fnext_plus%2Fdefs.ma;h=63eeacb4167e5ab3ca07c964422d68c771ec2768;hb=6abec8ca6434937e46e098ed946bc6ed307f022b;hp=1ff7ecdff3a47aea1e2cf6e71fe67f73b986a553;hpb=67fede5f273328bf920ad609f15d4f2389493c5c;p=helm.git

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 1ff7ecdff..63eeacb41 100644
--- a/matita/matita/contribs/lambdadelta/basic_1/next_plus/defs.ma
+++ b/matita/matita/contribs/lambdadelta/basic_1/next_plus/defs.ma
@@ -14,11 +14,9 @@
 
 (* This file was automatically generated: do not edit *********************)
 
-include "Basic-1/G/defs.ma".
+include "basic_1/G/defs.ma".
 
-definition next_plus:
- G \to (nat \to (nat \to nat))
-\def
- 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))]) in next_plus.
+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))].