diff options
author | 2016-04-01 19:27:30 +0200 | |
---|---|---|
committer | 2016-06-03 16:51:09 +0200 | |
commit | 2c01bd7b446c1151922ad0a01c3dc6b85f5bea54 (patch) | |
tree | d64a667a3a5ec7c22705739d6b25b36bad24ad7c /ltac/coretactics.ml4 | |
parent | 9d60ddc84e95a030913fc4b3db705f3ec894fdb2 (diff) |
Removing "double induction" from the tactic AST.
Diffstat (limited to 'ltac/coretactics.ml4')
-rw-r--r-- | ltac/coretactics.ml4 | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/ltac/coretactics.ml4 b/ltac/coretactics.ml4 index ce28eacc0..63b5463c4 100644 --- a/ltac/coretactics.ml4 +++ b/ltac/coretactics.ml4 @@ -222,6 +222,13 @@ TACTIC EXTEND simple_destruct [ "simple" "destruct" quantified_hypothesis(h) ] -> [ Tactics.simple_destruct h ] END +(** Double induction *) + +TACTIC EXTEND double_induction + [ "double" "induction" quantified_hypothesis(h1) quantified_hypothesis(h2) ] -> + [ Elim.h_double_induction h1 h2 ] +END + (* Admit *) TACTIC EXTEND admit |