X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=inline;f=matita%2Fmatita%2Fcontribs%2Flambda_delta%2Fapps_2%2Ffunctional%2Fnotation.ma;fp=matita%2Fmatita%2Fcontribs%2Flambda_delta%2Fapps_2%2Ffunctional%2Fnotation.ma;h=1c60d6c18e4802730297b69182a67c8d6da9f752;hb=eae50cc815292d335df1c488a00b39ef98fa5870;hp=8a72746511c40700f7cf826e81d9701fb4082d46;hpb=9def1b8a298aac85a7abdc75c4a33657fe7e6df7;p=helm.git diff --git a/matita/matita/contribs/lambda_delta/apps_2/functional/notation.ma b/matita/matita/contribs/lambda_delta/apps_2/functional/notation.ma index 8a7274651..1c60d6c18 100644 --- a/matita/matita/contribs/lambda_delta/apps_2/functional/notation.ma +++ b/matita/matita/contribs/lambda_delta/apps_2/functional/notation.ma @@ -14,13 +14,13 @@ (* NOTATION FOR THE "functional" COMPONENT ********************************) -notation "hvbox( ↑ [ d , break e ] break term 60 T )" - non associative with precedence 60 +notation "hvbox( ↑ [ term 46 d , break term 46 e ] break term 46 T )" + non associative with precedence 46 for @{ 'Lift $d $e $T }. -notation "hvbox( [ d ← break V ] break term 60 T )" - non associative with precedence 60 - for @{ 'Subst $V $d $T }. +notation "hvbox( [ term 46 d ⬐ break term 46 V ] break term 46 T )" + non associative with precedence 46 + for @{ 'DSubst $V $d $T }. notation "hvbox( T1 ⇨ break term 46 T2 )" non associative with precedence 45