X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcontribs%2FLAMBDA-TYPES%2FLevel-1%2FLambdaDelta%2Fdrop%2Fdefs.ma;h=aa283e8f42b20c1094ef6ac06e6b783dea532a2d;hb=7f82161596bdfccc1179f5edcc0bfd76d34516b5;hp=aedcf4a3ae10a1ed7ca535265fe9653398f30980;hpb=01cd30e9b0e915304b3ffef48a0477c69ce7a959;p=helm.git diff --git a/matita/contribs/LAMBDA-TYPES/Level-1/LambdaDelta/drop/defs.ma b/matita/contribs/LAMBDA-TYPES/Level-1/LambdaDelta/drop/defs.ma index aedcf4a3a..aa283e8f4 100644 --- a/matita/contribs/LAMBDA-TYPES/Level-1/LambdaDelta/drop/defs.ma +++ b/matita/contribs/LAMBDA-TYPES/Level-1/LambdaDelta/drop/defs.ma @@ -20,6 +20,8 @@ include "C/defs.ma". include "lift/defs.ma". +include "r/defs.ma". + inductive drop: nat \to (nat \to (C \to (C \to Prop))) \def | drop_refl: \forall (c: C).(drop O O c c) | drop_drop: \forall (k: K).(\forall (h: nat).(\forall (c: C).(\forall (e: