diff options
author | Chantal Keller <Chantal.Keller@inria.fr> | 2015-01-12 16:28:10 +0100 |
---|---|---|
committer | Chantal Keller <Chantal.Keller@inria.fr> | 2015-01-12 16:28:10 +0100 |
commit | cfb4587e26623318f432c7e3e21711afc2b966e7 (patch) | |
tree | a90c6f372633458aa0766510bcfdc4682eaa8f6a /src/extraction/Extract.v | |
parent | 1e10dcc783b82269cc3fe3bb7419b9c1cc9e0fa7 (diff) | |
download | smtcoq-cfb4587e26623318f432c7e3e21711afc2b966e7.tar.gz smtcoq-cfb4587e26623318f432c7e3e21711afc2b966e7.zip |
Initial import of SMTCoq v1.2
Diffstat (limited to 'src/extraction/Extract.v')
-rw-r--r-- | src/extraction/Extract.v | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/src/extraction/Extract.v b/src/extraction/Extract.v new file mode 100644 index 0000000..1161f48 --- /dev/null +++ b/src/extraction/Extract.v @@ -0,0 +1,26 @@ +(**************************************************************************) +(* *) +(* SMTCoq *) +(* Copyright (C) 2011 - 2015 *) +(* *) +(* Michaël Armand *) +(* Benjamin Grégoire *) +(* Chantal Keller *) +(* *) +(* Inria - École Polytechnique - MSR-Inria Joint Lab *) +(* *) +(* This file is distributed under the terms of the CeCILL-C licence *) +(* *) +(**************************************************************************) + + +Require Int63Native. +Require Import ExtractNative. +Require Import SMTCoq. + +Extract Constant Int63Native.eqb => "fun i j -> ExtrNative.compare i j = ExtrNative.Eq". + +Set Extraction AccessOpaque. + +Extraction "extraction/sat_checker.ml" Sat_Checker.checker. +Extraction "extraction/smt_checker.ml" Euf_Checker.checker_ext. |