diff options
| -rw-r--r-- | contrib/correctness/Arrays.v | 10 |
1 files changed, 2 insertions, 8 deletions
diff --git a/contrib/correctness/Arrays.v b/contrib/correctness/Arrays.v index acf26ed3d5..b4367fd309 100644 --- a/contrib/correctness/Arrays.v +++ b/contrib/correctness/Arrays.v @@ -69,12 +69,6 @@ Tactic Definition ArrayAccess i j H := Intro H; Rewrite H; Rewrite store_def_1 | Intro H; Rewrite store_def_2; [ Idtac | Idtac | Idtac | Exact H ] ]. -(* Syntax and pretty-print for arrays *) +(* Symbolic notation for access *) -Grammar constr constr0 := - array_access - [ "#" ident($t) "[" constr($c) "]" ] -> [ (access $t $c) ]. - -Syntax constr level 0 : - array_access - [ << (access ($VAR $t) $c) >> ] -> [ "#" $t "[" $c:L "]" ]. +Notation "# t [ c ]" := (access t c) (at level 0, t ident). |