diff options
| author | letouzey | 2012-07-05 22:51:11 +0000 |
|---|---|---|
| committer | letouzey | 2012-07-05 22:51:11 +0000 |
| commit | 2ed6aeb03fc0e25a47223189d8444cbb6b749f2d (patch) | |
| tree | 653de6038f3247ef8e18610ad07f1b83c6f253b5 /plugins/fourier | |
| parent | afe903e7889625986edab5506e3bb2cb90f7f483 (diff) | |
Legacy Ring and Legacy Field migrated to contribs
One slight point to check someday : fourier used to
launch a tactic called Ring.polynom in some cases.
It it crucial ? If so, how to replace with the setoid_ring
equivalent ?
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@15524 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'plugins/fourier')
| -rw-r--r-- | plugins/fourier/Fourier.v | 3 | ||||
| -rw-r--r-- | plugins/fourier/fourierR.ml | 2 |
2 files changed, 2 insertions, 3 deletions
diff --git a/plugins/fourier/Fourier.v b/plugins/fourier/Fourier.v index a1113d2d0a..1e944a452e 100644 --- a/plugins/fourier/Fourier.v +++ b/plugins/fourier/Fourier.v @@ -8,8 +8,7 @@ (* "Fourier's method to solve linear inequations/equations systems.".*) -Require Export LegacyRing. -Require Export LegacyField. +Require Export Field. Require Export DiscrR. Require Export Fourier_util. Declare ML Module "fourier_plugin". diff --git a/plugins/fourier/fourierR.ml b/plugins/fourier/fourierR.ml index c9760de17d..a4dbb43c54 100644 --- a/plugins/fourier/fourierR.ml +++ b/plugins/fourier/fourierR.ml @@ -605,7 +605,7 @@ let rec fourier gl= (* en attendant Field, ça peut aider Ring de remplacer 1/1 par 1 ... *) [tclORELSE - (Ring.polynom []) + (* TODO : Ring.polynom []*) tclIDTAC tclIDTAC; (tclTHEN (apply (get coq_sym_eqT)) (apply (get coq_Rinv_1)))] |