Commit 646bfc85 authored by Robbert Krebbers's avatar Robbert Krebbers
Browse files

Oops, forgot that.

parent a64bb337
...@@ -1250,6 +1250,7 @@ Ltac iHypsContaining x := ...@@ -1250,6 +1250,7 @@ Ltac iHypsContaining x :=
Tactic Notation "iInductionRevert" constr(x) constr(Hs) "with" tactic(tac) := Tactic Notation "iInductionRevert" constr(x) constr(Hs) "with" tactic(tac) :=
iRevertIntros Hs with ( iRevertIntros Hs with (
iRevertIntros "∗" with ( iRevertIntros "∗" with (
idtac;
let Hsx := iHypsContaining x in let Hsx := iHypsContaining x in
iRevertIntros Hsx with tac iRevertIntros Hsx with tac
) )
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment