From: Enrico Tassi <enrico.tassi@inria.fr>
Date: Thu, 19 Jun 2008 17:40:02 +0000 (+0000)
Subject: fixed core notation
X-Git-Tag: make_still_working~5009
X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=commitdiff_plain;h=16e4668ae7f565104e9db7f1ceca6635a7425796;p=helm.git

fixed core notation
---

diff --git a/helm/software/matita/core_notation.moo b/helm/software/matita/core_notation.moo
index b991adac5..f9346809b 100644
--- a/helm/software/matita/core_notation.moo
+++ b/helm/software/matita/core_notation.moo
@@ -4,10 +4,14 @@ for @{ 'exists ${default
   @{\lambda ${ident i} : $ty. $p}
   @{\lambda ${ident i} . $p}}}.
 
+axiom a : Type.
+
 notation "hvbox(a break \to b)" 
   right associative with precedence 20
 for @{ \forall $_:$a.$b }.
 
+axiom b : Type → Type.
+
 notation < "hvbox(a break \to b)" 
   right associative with precedence 20
 for @{ \Pi $_:$a.$b }.
@@ -88,7 +92,7 @@ notation "hvbox(a break / b)"
   left associative with precedence 55
 for @{ 'divide $a $b }.
 
-notation "- term 59 a" with precedence 60
+notation "- term 60 a" with precedence 60 
 for @{ 'uminus $a }.
 
 notation "a !"