X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambda_delta%2FBasic_2%2Fnotation.ma;h=a9fca999c050e096e09b2b90f9e619d5dfcc01c0;hb=011cf6478141e69822a5b40933f2444d0522532f;hp=7d05a2f6702028fc976b16b6724c8c4ce9bbc128;hpb=16bbb2d6b16d5647d944f18f0fd6d4dd3df431fe;p=helm.git diff --git a/matita/matita/contribs/lambda_delta/Basic_2/notation.ma b/matita/matita/contribs/lambda_delta/Basic_2/notation.ma index 7d05a2f67..a9fca999c 100644 --- a/matita/matita/contribs/lambda_delta/Basic_2/notation.ma +++ b/matita/matita/contribs/lambda_delta/Basic_2/notation.ma @@ -294,16 +294,14 @@ notation "hvbox( T1 break [ R ] ⊑ break T2 )" non associative with precedence 45 for @{ 'CrSubEq $T1 $R $T2 }. -(* Functional ***************************************************************) +(* Conversion ***************************************************************) -notation "hvbox( ↑ [ d , break e ] break T )" - non associative with precedence 55 - for @{ 'Lift $d $e $T }. +notation "hvbox( L ⊢ break term 90 T1 ⬌ break T2 )" + non associative with precedence 45 + for @{ 'PConv $L $T1 $T2 }. -notation "hvbox( [ d ← break V ] break T )" - non associative with precedence 55 - for @{ 'Subst $V $d $T }. +(* Equivalence **************************************************************) -notation "hvbox( T1 ⇨ break T2 )" +notation "hvbox( L ⊢ break term 90 T1 ⬌* break T2 )" non associative with precedence 45 - for @{ 'SRed $T1 $T2 }. + for @{ 'PConvStar $L $T1 $T2 }.