diff options
author | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2013-12-02 01:15:54 +0100 |
---|---|---|
committer | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2013-12-02 14:53:27 +0100 |
commit | 85ed2504568ee06207546b1ac0660e9c559bca22 (patch) | |
tree | 24f5c44a637a7cbeb8e6045c545fd9870f1f88d3 /plugins/fourier/fourierR.ml | |
parent | e0449b763d5854da2e7e48f4e92da779913a0347 (diff) |
Writing [cut] tactic using the new monad.
Diffstat (limited to 'plugins/fourier/fourierR.ml')
-rw-r--r-- | plugins/fourier/fourierR.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/fourier/fourierR.ml b/plugins/fourier/fourierR.ml index d49f225e6..2a5e81ec0 100644 --- a/plugins/fourier/fourierR.ml +++ b/plugins/fourier/fourierR.ml @@ -616,7 +616,7 @@ let rec fourier gl= ) ])); !tac1]); - tac:=(tclTHENS (cut (get coq_False)) + tac:=(tclTHENS (Proofview.V82.of_tactic (cut (get coq_False))) [tclTHEN (Proofview.V82.of_tactic intro) (Proofview.V82.of_tactic (contradiction None)); !tac]) |_-> assert false) |_-> assert false |