X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=matita%2Fmatita%2Fcontribs%2Flambda_delta%2FGround_2%2Fxoa.ma;h=2b75c902d50524eefadcd5f8647f6e14d8afc7bf;hb=f75be90562ddd964ef7ed43b956eb908f3133e3a;hp=2b7af45037e4cdf9738b9647399aa57128819f91;hpb=55dc00c1c44cc21c7ae179cb9df03e7446002c46;p=helm.git

diff --git a/matita/matita/contribs/lambda_delta/Ground_2/xoa.ma b/matita/matita/contribs/lambda_delta/Ground_2/xoa.ma
index 2b7af4503..2b75c902d 100644
--- a/matita/matita/contribs/lambda_delta/Ground_2/xoa.ma
+++ b/matita/matita/contribs/lambda_delta/Ground_2/xoa.ma
@@ -141,3 +141,11 @@ inductive or4 (P0,P1,P2,P3:Prop) : Prop ≝
 
 interpretation "multiple disjunction connective (4)" 'Or P0 P1 P2 P3 = (or4 P0 P1 P2 P3).
 
+(* multiple conjunction connective (3) *)
+
+inductive and3 (P0,P1,P2:Prop) : Prop ≝
+   | and3_intro: P0 → P1 → P2 → and3 ? ? ?
+.
+
+interpretation "multiple conjunction connective (3)" 'And P0 P1 P2 = (and3 P0 P1 P2).
+