From: maiorino <??>
Date: Thu, 27 Jul 2006 14:46:31 +0000 (+0000)
Subject: Notation for the existential quantifier moved to core_notation.moo
X-Git-Tag: make_still_working~7001
X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=commitdiff_plain;h=73284b016dc2c195491ab3442457ec9fb76b576f;p=helm.git

Notation for the existential quantifier moved to core_notation.moo
---

diff --git a/helm/software/matita/core_notation.moo b/helm/software/matita/core_notation.moo
index c30e5142c..3b157ec58 100644
--- a/helm/software/matita/core_notation.moo
+++ b/helm/software/matita/core_notation.moo
@@ -1,3 +1,9 @@
+notation < "hvbox(\exists ident i opt (: ty) break . p)"
+  right associative with precedence 20
+for @{ 'exists ${default
+  @{\lambda ${ident i} : $ty. $p)}
+  @{\lambda ${ident i} . $p}}}.
+
 notation "hvbox(a break \to b)" 
   right associative with precedence 20
 for @{ \forall $_:$a.$b }.
diff --git a/helm/software/matita/library/logic/connectives.ma b/helm/software/matita/library/logic/connectives.ma
index 4cbea3529..bb08b8038 100644
--- a/helm/software/matita/library/logic/connectives.ma
+++ b/helm/software/matita/library/logic/connectives.ma
@@ -79,12 +79,6 @@ inductive ex (A:Type) (P:A \to Prop) : Prop \def
 interpretation "exists" 'exists \eta.x =
   (cic:/matita/logic/connectives/ex.ind#xpointer(1/1) _ x).
 
-notation < "hvbox(\exists ident i opt (: ty) break . p)"
-  right associative with precedence 20
-for @{ 'exists ${default
-  @{\lambda ${ident i} : $ty. $p)}
-  @{\lambda ${ident i} . $p}}}.
-
 inductive ex2 (A:Type) (P,Q:A \to Prop) : Prop \def
     ex_intro2: \forall x:A. P x \to Q x \to ex2 A P Q.