diff options
| author |  Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2014-08-17 17:16:58 +0200 |
|---|---|---|
| committer | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2014-08-18 18:56:38 +0200 |
| commit | b6c3f54d04ce441ac68ffabfca69c18847707518 (patch) | |
| tree | 6921f4ecb293e06ecaa0f13ed7deaceeaf194d76 /tactics/inv.ml | |
| parent | 287d6f88b78634561fff65d32eeb501f12440df8 (diff) | |
A reorganization of the "assert" tactics (hopefully uniform naming
scheme, redundancies, possibility of chaining a tactic knowing the
name of introduced hypothesis, new proof engine).
Diffstat (limited to 'tactics/inv.ml')
| -rw-r--r-- | tactics/inv.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/inv.ml b/tactics/inv.ml index 45f416c2c..089fef4bc 100644 --- a/tactics/inv.ml +++ b/tactics/inv.ml @@ -483,7 +483,7 @@ let raw_inversion inv_kind id status names = let neqns = List.length realargs in tclTHEN (Proofview.V82.tclEVARS sigma) (tclTHENS - (assert_tac Anonymous cut_concl) + (assert_before Anonymous cut_concl) [case_tac names (introCaseAssumsThen (rewrite_equations_tac inv_kind id neqns)) (Some elim_predicate) ind (c, t); |