diff options
author | Chantal Keller <Chantal.Keller@lri.fr> | 2022-02-15 18:36:56 +0100 |
---|---|---|
committer | Chantal Keller <Chantal.Keller@lri.fr> | 2022-02-15 18:36:56 +0100 |
commit | 4a2db61b8f59a2871de4f4b69522193ff9440261 (patch) | |
tree | aed51f7e320c57e665748dbae973929725f3cee7 /src/Misc.v | |
parent | 3e5897710dc45c1b0bede79d3d61f4211c5ccb0e (diff) | |
parent | 23ac3ceceb92cdbc2026253c1bae388a2b9b6e18 (diff) | |
download | smtcoq-4a2db61b8f59a2871de4f4b69522193ff9440261.tar.gz smtcoq-4a2db61b8f59a2871de4f4b69522193ff9440261.zip |
Merge remote-tracking branch 'origin/coq-8.12' into coq-8.13
Diffstat (limited to 'src/Misc.v')
-rw-r--r-- | src/Misc.v | 23 |
1 files changed, 23 insertions, 0 deletions
@@ -1420,6 +1420,29 @@ Lemma is_true_iff e : e = true <-> is_true e. Proof. now unfold is_true. Qed. +(* Register constants for OCaml access *) +Register distinct as SMTCoq.Misc.distinct. + +Register Int63.eqb as num.int63.eqb. +Register PArray.array as array.array.type. +Register PArray.make as array.array.make. +Register PArray.set as array.array.set. +Register Coq.Init.Datatypes.is_true as core.is_true.is_true. +Register Coq.PArith.BinPosDef.Pos.eqb as num.pos.eqb. +Register Coq.NArith.BinNat.N.of_nat as num.N.of_nat. +Register Coq.ZArith.BinInt.Z.ltb as num.Z.ltb. +Register Coq.ZArith.BinInt.Z.leb as num.Z.leb. +Register Coq.ZArith.BinInt.Z.gtb as num.Z.gtb. +Register Coq.ZArith.BinInt.Z.geb as num.Z.geb. +Register Coq.ZArith.BinInt.Z.eqb as num.Z.eqb. +Register Coq.Init.Datatypes.implb as core.bool.implb. +Register Coq.Bool.Bool.eqb as core.bool.eqb. +Register Coq.Bool.Bool.ifb as core.bool.ifb. +Register Coq.Bool.Bool.reflect as core.bool.reflect. +Register Coq.Init.Datatypes.length as core.list.length. +Register Coq.micromega.ZMicromega.ZArithProof as micromega.ZMicromega.ZArithProof. + + (* Local Variables: coq-load-path: ((rec "." "SMTCoq")) |