components C r flt app lift

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

diff --git a/matita/matita/contribs/lambdadelta/basic_1/flt/defs.ma b/matita/matita/contribs/lambdadelta/basic_1/flt/defs.ma
index 3191e1e38cfe23f63e33c71c8b0de7a875e07b36..c4e7ed73fabee540aaa2a2e7b37e5be8be95d588 100644 (file)
--- a/matita/matita/contribs/lambdadelta/basic_1/flt/defs.ma
+++ b/matita/matita/contribs/lambdadelta/basic_1/flt/defs.ma
@@ -14,16 +14,18 @@
 
 (* This file was automatically generated: do not edit *********************)
 
-include "Basic-1/C/defs.ma".
+include "basic_1/C/defs.ma".
 
 definition fweight:
  C \to (T \to nat)
 \def
- \lambda (c: C).(\lambda (t: T).(plus (cweight c) (tweight t))).
+ \lambda (c: C).(\lambda (t: T).(let TMP_1 \def (cweight c) in (let TMP_2 
+\def (tweight t) in (plus TMP_1 TMP_2)))).
 
 definition flt:
  C \to (T \to (C \to (T \to Prop)))
 \def
- \lambda (c1: C).(\lambda (t1: T).(\lambda (c2: C).(\lambda (t2: T).(lt 
-(fweight c1 t1) (fweight c2 t2))))).
+ \lambda (c1: C).(\lambda (t1: T).(\lambda (c2: C).(\lambda (t2: T).(let 
+TMP_1 \def (fweight c1 t1) in (let TMP_2 \def (fweight c2 t2) in (lt TMP_1 
+TMP_2)))))).