non associative with precedence 90
for @{ 'SFlat $I $T1 $T }.
+notation "hvbox( Ⓐ term 90 T1 . break term 90 T )"
+ non associative with precedence 90
+ for @{ 'ApplV $T1 $T }.
+
notation "hvbox( T . break 𝕓 { I } break term 90 T1 )"
non associative with precedence 89
for @{ 'DBind $T $I $T1 }.
(* Substitution *************************************************************)
-notation "hvbox( â\86\91 [ d , break e ] break T1 â\89¡ break T2 )"
+notation "hvbox( â\87\91 [ d , break e ] break T1 â\89¡ break T2 )"
non associative with precedence 45
for @{ 'RLift $d $e $T1 $T2 }.
-notation "hvbox( ↓ [ e ] break L1 ≡ break L2 )"
- non associative with precedence 45
- for @{ 'RDrop $e $L1 $L2 }.
-
-notation "hvbox( ↓ [ d , break e ] break L1 ≡ break L2 )"
+notation "hvbox( ⇓ [ d , break e ] break L1 ≡ break L2 )"
non associative with precedence 45
- for @{ 'RDrop $d $e $L1 $L2 }.
+ for @{ 'RLDrop $d $e $L1 $L2 }.
notation "hvbox( T1 break [ d , break e ] ≫ break T2 )"
non associative with precedence 45
(* Unfold *******************************************************************)
+notation "hvbox( ⇑ [ e ] break T1 ≡ break T2 )"
+ non associative with precedence 45
+ for @{ 'RLift $e $T1 $T2 }.
+
+notation "hvbox( ⇓ [ e ] break L1 ≡ break L2 )"
+ non associative with precedence 45
+ for @{ 'RLDrop $e $L1 $L2 }.
+
notation "hvbox( T1 break [ d , break e ] ≫* break T2 )"
non associative with precedence 45
for @{ 'PSubstStar $T1 $d $e $T2 }.
non associative with precedence 45
for @{ 'InEInt $L $T $A }.
-notation "hvbox( R ⊢ break { L, break T } ϵ break 〚 A 〛 )"
+notation "hvbox( { L, break T } break [ R ] ϵ break 〚 A 〛 )"
non associative with precedence 45
for @{ 'InEInt $R $L $T $A }.
(* Functional ***************************************************************)
-notation "hvbox( â\86\9f [ d , break e ] break T )"
+notation "hvbox( â\86\91 [ d , break e ] break T )"
non associative with precedence 80
for @{ 'Lift $d $e $T }.
-notation "hvbox( â\86¡ [ d ← break V ] break T )"
+notation "hvbox( â\86\93 [ d ← break V ] break T )"
non associative with precedence 80
for @{ 'Subst $V $d $T }.