X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fcontribs%2FLAMBDA-TYPES%2FBasic-1%2Fcsubv%2Fdrop.ma;h=007670dbb2b6c79c40008de551c94db655f49ede;hb=de77f79d60ee3c1d30fe03469172950b557441f3;hp=88a2fcdb4ee9e59f81a2c924fd68fd3067c5202a;hpb=3531d88e2a19cba027b4b882f8dd74bf37283b9c;p=helm.git diff --git a/helm/software/matita/contribs/LAMBDA-TYPES/Basic-1/csubv/drop.ma b/helm/software/matita/contribs/LAMBDA-TYPES/Basic-1/csubv/drop.ma index 88a2fcdb4..007670dbb 100644 --- a/helm/software/matita/contribs/LAMBDA-TYPES/Basic-1/csubv/drop.ma +++ b/helm/software/matita/contribs/LAMBDA-TYPES/Basic-1/csubv/drop.ma @@ -14,9 +14,9 @@ (* This file was automatically generated: do not edit *********************) -include "LambdaDelta-1/csubv/props.ma". +include "Basic-1/csubv/props.ma". -include "LambdaDelta-1/drop/fwd.ma". +include "Basic-1/drop/fwd.ma". theorem csubv_drop_conf: \forall (c1: C).(\forall (c2: C).((csubv c1 c2) \to (\forall (e1: @@ -109,4 +109,7 @@ C).(drop (S h0) O c4 e2)) (ex2 C (\lambda (e2: C).(csubv e1 e2)) (\lambda (e2: C).(csubv e1 e2)) (\lambda (e2: C).(drop (S h0) O (CHead c4 (Flat f2) v2) e2)) x H5 (drop_drop (Flat f2) h0 c4 x H6 v2))))) H4)))))) h H2)))))))))))) c1 c2 H))). +(* COMMENTS +Initial nodes: 1897 +END *)