components: G, next_plus, sty0, sty1

[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 1ff7ecdff3a47aea1e2cf6e71fe67f73b986a553..63eeacb4167e5ab3ca07c964422d68c771ec2768 100644 (file)
--- 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))].