initial properies of the "same top term constructor" predicate

[helm.git] / matita / matita / contribs / lambda_delta / Ground_2 / xoa.ma

diff --git a/matita/matita/contribs/lambda_delta/Ground_2/xoa.ma b/matita/matita/contribs/lambda_delta/Ground_2/xoa.ma
index 1ff53beb4ca3664a0b26b2eb186244dca46d9868..5a3a40024e0c398de4e00a670bf10a6cfbca1fc0 100644 (file)
--- a/matita/matita/contribs/lambda_delta/Ground_2/xoa.ma
+++ b/matita/matita/contribs/lambda_delta/Ground_2/xoa.ma
@@ -16,6 +16,14 @@
 
 include "basics/pts.ma".
 
+(* multiple existental quantifier (1, 2) *)
+
+inductive ex1_2 (A0,A1:Type[0]) (P0:A0→A1→Prop) : Prop ≝
+   | ex1_2_intro: ∀x0,x1. P0 x0 x1 → ex1_2 ? ? ?
+.
+
+interpretation "multiple existental quantifier (1, 2)" 'Ex P0 = (ex1_2 ? ? P0).
+
 (* multiple existental quantifier (2, 1) *)
 
 inductive ex2_1 (A0:Type[0]) (P0,P1:A0→Prop) : Prop ≝