X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fcontribs%2FLAMBDA-TYPES%2FBasic-1%2Fcsubv%2Fprops.ma;h=7169228249f75e380eec7e3b6475440ffdce8b9d;hb=de77f79d60ee3c1d30fe03469172950b557441f3;hp=857a4dca338cb3d3a4c63374138966e702109b79;hpb=3531d88e2a19cba027b4b882f8dd74bf37283b9c;p=helm.git diff --git a/helm/software/matita/contribs/LAMBDA-TYPES/Basic-1/csubv/props.ma b/helm/software/matita/contribs/LAMBDA-TYPES/Basic-1/csubv/props.ma index 857a4dca3..716922824 100644 --- a/helm/software/matita/contribs/LAMBDA-TYPES/Basic-1/csubv/props.ma +++ b/helm/software/matita/contribs/LAMBDA-TYPES/Basic-1/csubv/props.ma @@ -14,9 +14,9 @@ (* This file was automatically generated: do not edit *********************) -include "LambdaDelta-1/csubv/defs.ma". +include "Basic-1/csubv/defs.ma". -include "LambdaDelta-1/T/props.ma". +include "Basic-1/T/props.ma". theorem csubv_bind_same: \forall (c1: C).(\forall (c2: C).((csubv c1 c2) \to (\forall (b: B).(\forall @@ -30,6 +30,9 @@ T).(csubv_bind c1 c2 H Abbr (\lambda (H0: (eq B Abbr Void)).(not_abbr_void H0)) Abbr v1 v2))) (\lambda (v1: T).(\lambda (v2: T).(csubv_bind c1 c2 H Abst (sym_not_eq B Void Abst not_void_abst) Abst v1 v2))) (\lambda (v1: T).(\lambda (v2: T).(csubv_void c1 c2 H v1 v2))) b)))). +(* COMMENTS +Initial nodes: 121 +END *) theorem csubv_refl: \forall (c: C).(csubv c c) @@ -39,4 +42,7 @@ nat).(csubv_sort n)) (\lambda (c0: C).(\lambda (H: (csubv c0 c0)).(\lambda (k: K).(K_ind (\lambda (k0: K).(\forall (t: T).(csubv (CHead c0 k0 t) (CHead c0 k0 t)))) (\lambda (b: B).(\lambda (t: T).(csubv_bind_same c0 c0 H b t t))) (\lambda (f: F).(\lambda (t: T).(csubv_flat c0 c0 H f f t t))) k)))) c). +(* COMMENTS +Initial nodes: 93 +END *)