X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fcontribs%2FLAMBDA-TYPES%2FBasic-1%2Fcsubt%2Fty3.ma;h=e6199ac159022c2d0110ff587f04b09f5af861af;hb=4904accd80118cb8126e308ae098d87f8651c9f4;hp=11be53e890fb333d9a3bb5225aa70fcde9ca405f;hpb=3531d88e2a19cba027b4b882f8dd74bf37283b9c;p=helm.git diff --git a/helm/software/matita/contribs/LAMBDA-TYPES/Basic-1/csubt/ty3.ma b/helm/software/matita/contribs/LAMBDA-TYPES/Basic-1/csubt/ty3.ma index 11be53e89..e6199ac15 100644 --- a/helm/software/matita/contribs/LAMBDA-TYPES/Basic-1/csubt/ty3.ma +++ b/helm/software/matita/contribs/LAMBDA-TYPES/Basic-1/csubt/ty3.ma @@ -14,9 +14,9 @@ (* This file was automatically generated: do not edit *********************) -include "LambdaDelta-1/csubt/pc3.ma". +include "Basic-1/csubt/pc3.ma". -include "LambdaDelta-1/csubt/props.ma". +include "Basic-1/csubt/props.ma". theorem csubt_ty3: \forall (g: G).(\forall (c1: C).(\forall (t1: T).(\forall (t2: T).((ty3 g c1 @@ -83,6 +83,9 @@ C).(\lambda (t0: T).(\lambda (t3: T).(\lambda (_: (ty3 g c t0 t3)).(\lambda T).(\lambda (_: (ty3 g c t3 t4)).(\lambda (H3: ((\forall (c2: C).((csubt g c c2) \to (ty3 g c2 t3 t4))))).(\lambda (c2: C).(\lambda (H4: (csubt g c c2)).(ty3_cast g c2 t0 t3 (H1 c2 H4) t4 (H3 c2 H4)))))))))))) c1 t1 t2 H))))). +(* COMMENTS +Initial nodes: 1325 +END *) theorem csubt_ty3_ld: \forall (g: G).(\forall (c: C).(\forall (u: T).(\forall (v: T).((ty3 g c u @@ -93,4 +96,7 @@ t2) \to (ty3 g (CHead c (Bind Abbr) u) t1 t2)))))))) (ty3 g c u v)).(\lambda (t1: T).(\lambda (t2: T).(\lambda (H0: (ty3 g (CHead c (Bind Abst) v) t1 t2)).(csubt_ty3 g (CHead c (Bind Abst) v) t1 t2 H0 (CHead c (Bind Abbr) u) (csubt_abst g c c (csubt_refl g c) u v H H))))))))). +(* COMMENTS +Initial nodes: 91 +END *)