X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambda_delta%2Fground_2%2Fnotation.ma;h=4ac2e6e645c54ca5cf2a3a1b11ec7b10baaee8dc;hb=1f1ea7bb9e6c34626bcabd4c0142fcde98bcbbe5;hp=574bd3c595c4c3daba77eac86da095f243603604;hpb=636c25914e83819c2f529edc891a7eb899499a97;p=helm.git diff --git a/matita/matita/contribs/lambda_delta/ground_2/notation.ma b/matita/matita/contribs/lambda_delta/ground_2/notation.ma index 574bd3c59..4ac2e6e64 100644 --- a/matita/matita/contribs/lambda_delta/ground_2/notation.ma +++ b/matita/matita/contribs/lambda_delta/ground_2/notation.ma @@ -14,9 +14,19 @@ (* GENERAL NOTATION USED BY THE FORMAL SYSTEM λδ ****************************) +(* Logic ********************************************************************) + +notation "⊥" + non associative with precedence 90 + for @{'false}. + +notation "⊤" + non associative with precedence 90 + for @{'true}. + (* Lists ********************************************************************) -notation "hvbox( ◊ )" +notation "◊" non associative with precedence 90 for @{'Nil}. @@ -28,7 +38,7 @@ notation "hvbox( l1 @@ break l2 )" right associative with precedence 47 for @{'Append $l1 $l2 }. -notation "hvbox( ⟠ )" +notation "⟠" non associative with precedence 90 for @{'Nil2}.