X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fcontribs%2FLAMBDA-TYPES%2FBasic-1%2Farity%2Faprem.ma;h=35e8f58e09f21f1b560e0fc9ca7e6a568ffad0d7;hb=4904accd80118cb8126e308ae098d87f8651c9f4;hp=5045207ec1f78984da49648e2f5fedd70fc8f6f4;hpb=3531d88e2a19cba027b4b882f8dd74bf37283b9c;p=helm.git diff --git a/helm/software/matita/contribs/LAMBDA-TYPES/Basic-1/arity/aprem.ma b/helm/software/matita/contribs/LAMBDA-TYPES/Basic-1/arity/aprem.ma index 5045207ec..35e8f58e0 100644 --- a/helm/software/matita/contribs/LAMBDA-TYPES/Basic-1/arity/aprem.ma +++ b/helm/software/matita/contribs/LAMBDA-TYPES/Basic-1/arity/aprem.ma @@ -14,11 +14,11 @@ (* This file was automatically generated: do not edit *********************) -include "LambdaDelta-1/arity/props.ma". +include "Basic-1/arity/props.ma". -include "LambdaDelta-1/arity/cimp.ma". +include "Basic-1/arity/cimp.ma". -include "LambdaDelta-1/aprem/props.ma". +include "Basic-1/aprem/props.ma". theorem arity_aprem: \forall (g: G).(\forall (c: C).(\forall (t: T).(\forall (a: A).((arity g c t @@ -254,4 +254,7 @@ T).(\lambda (j: nat).(drop (plus i j) O d c0)))) (\lambda (d: C).(\lambda (u: T).(\lambda (_: nat).(arity g d u (asucc g b))))) x0 x1 x2 H8 (arity_repl g x0 x1 (asucc g x) H9 (asucc g b) (asucc_repl g x b H5)))))))) H7)))))) H4))))))))))))) c t a H))))). +(* COMMENTS +Initial nodes: 4526 +END *)