diff options
author | 2013-12-02 01:15:54 +0100 | |
---|---|---|
committer | 2013-12-02 14:53:27 +0100 | |
commit | 85ed2504568ee06207546b1ac0660e9c559bca22 (patch) | |
tree | 24f5c44a637a7cbeb8e6045c545fd9870f1f88d3 /tactics/elim.ml | |
parent | e0449b763d5854da2e7e48f4e92da779913a0347 (diff) |
Writing [cut] tactic using the new monad.
Diffstat (limited to 'tactics/elim.ml')
-rw-r--r-- | tactics/elim.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/elim.ml b/tactics/elim.ml index 9c1107beb..f5f09f27e 100644 --- a/tactics/elim.ml +++ b/tactics/elim.ml @@ -90,7 +90,7 @@ let general_decompose recognizer c = let type_of = Tacmach.New.pf_type_of gl in try (* type_of can raise exceptions *) let typc = type_of c in - Tacticals.New.tclTHENS (Proofview.V82.tactic (cut typc)) + Tacticals.New.tclTHENS (cut typc) [ Tacticals.New.tclTHEN (intro_using tmphyp_name) (Tacticals.New.onLastHypId (Tacticals.New.ifOnHyp recognizer (general_decompose_aux recognizer) |