aboutsummaryrefslogtreecommitdiff
path: root/src/Util/Notations.v
diff options
context:
space:
mode:
authorGravatar Jason Gross <jgross@mit.edu>2018-01-16 16:16:28 -0500
committerGravatar Jason Gross <jgross@mit.edu>2018-01-16 16:16:28 -0500
commit6bca5fb40730ec4aaec585597473345b05028fcc (patch)
tree79fa16dc807a2918d79d630829b844c772d92cc1 /src/Util/Notations.v
parent12ff6daadb3b53c07f10b8ba726ae4694a312573 (diff)
Add better levels / printing for bind notations
Diffstat (limited to 'src/Util/Notations.v')
-rw-r--r--src/Util/Notations.v4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Util/Notations.v b/src/Util/Notations.v
index 716b0d7f3..af1fcb6be 100644
--- a/src/Util/Notations.v
+++ b/src/Util/Notations.v
@@ -81,8 +81,8 @@ Reserved Notation "a ≢ b" (at level 70, no associativity).
Reserved Notation "$$ v" (at level 40).
Reserved Notation "& x" (at level 30).
Reserved Notation "** x" (at level 30).
-Reserved Notation "A <- X ; B" (at level 70, right associativity, format "'[v' A <- X ; '/' B ']'").
-Reserved Notation "A <-- X ; B" (at level 70, right associativity, format "'[v' A <-- X ; '/' B ']'").
+Reserved Notation "A <- X ; B" (at level 70, X at next level, right associativity, format "'[v' A <- X ; '/' B ']'").
+Reserved Notation "A <-- X ; B" (at level 70, X at next level, right associativity, format "'[v' A <-- X ; '/' B ']'").
Reserved Notation "u [ i ]" (at level 30).
Reserved Notation "v [[ i ]]" (at level 30).
Reserved Notation "u {{ i }}" (at level 30).