diff options
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. |