X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcore_notation.moo;h=8ce02776502647fddc514f84a6a4d6e90ad70eed;hb=f79567e3b0abcb508c94b66d69d967c4df83082a;hp=c30e5142c08d6380890a4d6b6e7b955636238542;hpb=7f2444c2670cadafddd8785b687ef312158376b0;p=helm.git

diff --git a/matita/core_notation.moo b/matita/core_notation.moo
index c30e5142c..8ce027765 100644
--- a/matita/core_notation.moo
+++ b/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 }.
@@ -111,5 +117,5 @@ notation "hvbox(a break \land b)"
 for @{ 'and $a $b }.
 
 notation "hvbox(\lnot a)" 
-  left associative with precedence 40
+  non associative with precedence 40
 for @{ 'not $a }.