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 /plugins/funind/g_indfun.ml4 | |
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 'plugins/funind/g_indfun.ml4')
-rw-r--r-- | plugins/funind/g_indfun.ml4 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/funind/g_indfun.ml4 b/plugins/funind/g_indfun.ml4 index 5fa689f00..1d63fe01a 100644 --- a/plugins/funind/g_indfun.ml4 +++ b/plugins/funind/g_indfun.ml4 @@ -324,7 +324,7 @@ let poseq_unsafe idunsafe cstr gl = tclTHEN (Proofview.V82.of_tactic (Tactics.letin_tac None (Name idunsafe) cstr None Locusops.allHypsAndConcl)) (tclTHENFIRST - (Proofview.V82.of_tactic (Tactics.assert_tac Anonymous (mkEq typ (mkVar idunsafe) cstr))) + (Proofview.V82.of_tactic (Tactics.assert_before Anonymous (mkEq typ (mkVar idunsafe) cstr))) (Proofview.V82.of_tactic Tactics.reflexivity)) gl |