X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Flib%2Flambda-delta%2Fnotation.ma;h=79fcc3a97f6a0fb4c1b068691a15ed52e40b77c1;hb=331cbed42a29b3b9f5fb11d127534f3c62c86797;hp=7f5fabf28821582db43d4a35fc376bcd553d46a8;hpb=7345613effa9d152f940b2ac637e9584c59c0d6e;p=helm.git diff --git a/matita/matita/lib/lambda-delta/notation.ma b/matita/matita/lib/lambda-delta/notation.ma index 7f5fabf28..79fcc3a97 100644 --- a/matita/matita/lib/lambda-delta/notation.ma +++ b/matita/matita/lib/lambda-delta/notation.ma @@ -13,18 +13,6 @@ (* language *****************************************************************) -notation "hvbox( ζ I )" - non associative with precedence 45 - for @{ 'Zeta $I }. - -notation "hvbox( τ I )" - non associative with precedence 45 - for @{ 'Tau $I }. - -notation "hvbox( θ I )" - non associative with precedence 45 - for @{ 'Theta $I }. - notation "hvbox( ⋆ )" non associative with precedence 90 for @{ 'Star }. @@ -73,6 +61,10 @@ notation "hvbox( L ⊢ break ↓ [ d , break e ] break T1 ≡ break T2 )" (* reduction ****************************************************************) -notation "hvbox( L ⊢ break T1 ⇒ break T2 )" +notation "hvbox( T1 ⇒ break T2 )" + non associative with precedence 45 + for @{ 'PR $T1 $T2 }. + +notation "hvbox( L ⊢ break (term 90 T1) ⇒ break T2 )" non associative with precedence 45 for @{ 'PR $L $T1 $T2 }.