+notation "hvbox( L ⊢ break term 90 T ÷ break A )"
+ non associative with precedence 45
+ for @{ 'AtomicArity $L $T $A }.
+
+notation "hvbox( T1 ÷ ⊑ break T2 )"
+ non associative with precedence 45
+ for @{ 'CrSubEqA $T1 $T2 }.
+
+(* Reducibility *************************************************************)
+
+notation "hvbox( 𝐑 [ T ] )"
+ non associative with precedence 45
+ for @{ 'Reducible $T }.
+
+notation "hvbox( L ⊢ break 𝐑 [ T ] )"
+ non associative with precedence 45
+ for @{ 'Reducible $L $T }.
+
+notation "hvbox( 𝐈 [ T ] )"
+ non associative with precedence 45
+ for @{ 'NotReducible $T }.
+
+notation "hvbox( L ⊢ break 𝐈 [ T ] )"
+ non associative with precedence 45
+ for @{ 'NotReducible $L $T }.
+
+notation "hvbox( 𝐍 [ T ] )"
+ non associative with precedence 45
+ for @{ 'Normal $T }.
+
+notation "hvbox( L ⊢ break 𝐍 [ T ] )"
+ non associative with precedence 45
+ for @{ 'Normal $L $T }.
+
+notation "hvbox( 𝐖𝐇𝐑 [ T ] )"
+ non associative with precedence 45
+ for @{ 'WHdReducible $T }.
+
+notation "hvbox( L ⊢ break 𝐖𝐇𝐑 [ T ] )"
+ non associative with precedence 45
+ for @{ 'WHdReducible $L $T }.
+
+notation "hvbox( 𝐖𝐇𝐈 [ T ] )"
+ non associative with precedence 45
+ for @{ 'NotWHdReducible $T }.
+
+notation "hvbox( L ⊢ break 𝐖𝐇𝐈 [ T ] )"
+ non associative with precedence 45
+ for @{ 'NotWHdReducible $L $T }.
+
+notation "hvbox( 𝐖𝐇𝐍 [ T ] )"
+ non associative with precedence 45
+ for @{ 'WHdNormal $T }.
+
+notation "hvbox( L ⊢ break 𝐖𝐇𝐍 [ T ] )"
+ non associative with precedence 45
+ for @{ 'WHdNormal $L $T }.
+
+notation "hvbox( T1 ➡ break T2 )"