From 2c01bd7b446c1151922ad0a01c3dc6b85f5bea54 Mon Sep 17 00:00:00 2001
From: Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr>
Date: Fri, 1 Apr 2016 19:27:30 +0200
Subject: Removing "double induction" from the tactic AST.

---
 ltac/coretactics.ml4 | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'ltac/coretactics.ml4')

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
-- 
cgit v1.2.3