diff options
| -rw-r--r-- | src/Util/Notations.v | 4 | ||||
| -rw-r--r-- | src/Util/ZRange.v | 3 |
2 files changed, 3 insertions, 4 deletions
diff --git a/src/Util/Notations.v b/src/Util/Notations.v index d96bb7d3b..5fd6317a1 100644 --- a/src/Util/Notations.v +++ b/src/Util/Notations.v @@ -103,8 +103,8 @@ Reserved Notation "'λ' x .. y , t" (at level 200, x binder, y binder, right ass Reserved Notation "'λn' x .. y , t" (at level 200, right associativity). Reserved Notation "x ::> ( max_bitwidth = v )" (at level 70, no associativity, format "x ::> ( max_bitwidth = v )"). -Reserved Notation "r[ l ~> u ]" (format "r[ l ~> u ]"). -Reserved Notation "b[ l ~> u ]" (format "b[ l ~> u ]"). +Reserved Notation "r[ l ~> u ]" (l at level 69, format "r[ l ~> u ]"). +Reserved Notation "b[ l ~> u ]" (l at level 69, format "b[ l ~> u ]"). Reserved Notation "'for' i (:= i0 ; += step ; < finish ) 'updating' ( state := initial ) {{ body }}" (at level 70, format "'[v ' 'for' i (:= i0 ; += step ; < finish ) 'updating' ( state := initial ) {{ '//' body ']' '//' }}"). Reserved Notation "'for' ( 'int' i = i0 ; step_expr ; finish_expr ) 'updating' ( state1 .. staten = initial ) {{ body }}" diff --git a/src/Util/ZRange.v b/src/Util/ZRange.v index 489d2c32f..b6381f421 100644 --- a/src/Util/ZRange.v +++ b/src/Util/ZRange.v @@ -56,7 +56,6 @@ Defined. Module Export Notations. Delimit Scope zrange_scope with zrange. - Notation "r[ l ~> u ]" := {| lower := l ; upper := u |} - (format "r[ l ~> u ]") : zrange_scope. + Notation "r[ l ~> u ]" := {| lower := l ; upper := u |} : zrange_scope. Infix "<=?" := is_tighter_than_bool : zrange_scope. End Notations. |