Tactic Notation "my_induction" tactic(target) :=
induction target; simpl; intros; inversion H0; subst; try assumption; try reflexivity.
- takes H0 as a parameter
- forces (induction target;) to generate hypotheses with some special name.
(I cannot specify number of branches (induction target) will make, and the only way I know to give name in generated hypotheses is specifying it one by one, which cannot be done here generally.)