diff options
author | Chantal Keller <Chantal.Keller@lri.fr> | 2022-02-15 18:34:33 +0100 |
---|---|---|
committer | Chantal Keller <Chantal.Keller@lri.fr> | 2022-02-15 18:34:33 +0100 |
commit | 23ac3ceceb92cdbc2026253c1bae388a2b9b6e18 (patch) | |
tree | 8409e89bf143ff9b97474b7ead6bb2aaf4f934eb /src/array | |
parent | 81b13b26f6dabca0152a9244fc474cd8ecb29905 (diff) | |
parent | 761a4af555c228a9fdd34ae33f9c842931a592cf (diff) | |
download | smtcoq-23ac3ceceb92cdbc2026253c1bae388a2b9b6e18.tar.gz smtcoq-23ac3ceceb92cdbc2026253c1bae388a2b9b6e18.zip |
Merge remote-tracking branch 'origin/coq-8.11' into coq-8.12
Diffstat (limited to 'src/array')
-rw-r--r-- | src/array/FArray.v | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/array/FArray.v b/src/array/FArray.v index 69e56f9..dfff5e8 100644 --- a/src/array/FArray.v +++ b/src/array/FArray.v @@ -1861,6 +1861,14 @@ Notation "a '[' i '<-' v ']'" := (store a i v) (at level 1, format "a [ i <- v ]") : farray_scope. +(* Register constants for OCaml access *) +Register FArray.farray as SMTCoq.array.FArray.farray. +Register select as SMTCoq.array.FArray.select. +Register store as SMTCoq.array.FArray.store. +Register diff as SMTCoq.array.FArray.diff. +Register FArray.equal as SMTCoq.array.FArray.equal. + + (* Local Variables: |