diff options
| author | Jason Gross | 2017-05-30 20:04:31 -0400 |
|---|---|---|
| committer | Matej Kosik | 2017-06-01 10:24:21 +0200 |
| commit | 7fff12d45c4d86fa5cb9be3883084ffef5911405 (patch) | |
| tree | 5d7c23a96175067ffe56088611cb1a8868aec5bb | |
| parent | dfbb5c5dc82c30dd3bac46d14e5e7190bbe80a9b (diff) | |
Break circular dependency in MExtraction
Described in https://github.com/coq/coq/pull/515#discussion_r119230833
| -rw-r--r-- | plugins/micromega/MExtraction.v | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/plugins/micromega/MExtraction.v b/plugins/micromega/MExtraction.v index c976aeb372..4d5c3b1d5b 100644 --- a/plugins/micromega/MExtraction.v +++ b/plugins/micromega/MExtraction.v @@ -38,11 +38,11 @@ Extract Inductive sumor => option [ Some None ]. Let's rather use the ocaml && *) Extract Inlined Constant andb => "(&&)". -Require Import Reals. +Import Reals.Rdefinitions. -Extract Constant R => "int". -Extract Constant R0 => "0". -Extract Constant R1 => "1". +Extract Constant R => "int". +Extract Constant R0 => "0". +Extract Constant R1 => "1". Extract Constant Rplus => "( + )". Extract Constant Rmult => "( * )". Extract Constant Ropp => "fun x -> - x". |