]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/basic_1/csuba/props.ma
components: arity, csuba
[helm.git] / matita / matita / contribs / lambdadelta / basic_1 / csuba / props.ma
index 823e888256341b114505ec920f9d426ed5c4eab0..5dab712a8b678e1a71523daaf04eddaa522f7548 100644 (file)
 
 (* This file was automatically generated: do not edit *********************)
 
-include "Basic-1/csuba/defs.ma".
+include "basic_1/csuba/defs.ma".
+
+include "basic_1/C/fwd.ma".
 
 theorem csuba_refl:
  \forall (g: G).(\forall (c: C).(csuba g c c))
 \def
- \lambda (g: G).(\lambda (c: C).(C_ind (\lambda (c0: C).(csuba g c0 c0)) 
-(\lambda (n: nat).(csuba_sort g n)) (\lambda (c0: C).(\lambda (H: (csuba g c0 
-c0)).(\lambda (k: K).(\lambda (t: T).(csuba_head g c0 c0 H k t))))) c)).
-(* COMMENTS
-Initial nodes: 53
-END *)
+ \lambda (g: G).(\lambda (c: C).(let TMP_1 \def (\lambda (c0: C).(csuba g c0 
+c0)) in (let TMP_2 \def (\lambda (n: nat).(csuba_sort g n)) in (let TMP_3 
+\def (\lambda (c0: C).(\lambda (H: (csuba g c0 c0)).(\lambda (k: K).(\lambda 
+(t: T).(csuba_head g c0 c0 H k t))))) in (C_ind TMP_1 TMP_2 TMP_3 c))))).