X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_1%2Fcsuba%2Fprops.ma;h=5dab712a8b678e1a71523daaf04eddaa522f7548;hb=f7b122ac0979ee71c222d09d3ce32ded37767cd5;hp=823e888256341b114505ec920f9d426ed5c4eab0;hpb=ae22633ad934bba5fb32143f1726cdfbd255b899;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_1/csuba/props.ma b/matita/matita/contribs/lambdadelta/basic_1/csuba/props.ma index 823e88825..5dab712a8 100644 --- a/matita/matita/contribs/lambdadelta/basic_1/csuba/props.ma +++ b/matita/matita/contribs/lambdadelta/basic_1/csuba/props.ma @@ -14,15 +14,15 @@ (* 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))))).