1
(************************************************************************)
2
(* v * The Coq Proof Assistant / The Coq Development Team *)
3
(* <O___,, * CNRS-Ecole Polytechnique-INRIA Futurs-Universite Paris Sud *)
4
(* \VV/ **************************************************************)
5
(* // * This file is distributed under the terms of the *)
6
(* * GNU Lesser General Public License Version 2.1 *)
7
(************************************************************************)
9
(*i $Id: elim.mli 11309 2008-08-06 10:30:35Z herbelin $ i*)
20
(* Eliminations tactics. *)
22
val introElimAssumsThen :
23
(branch_assumptions -> tactic) -> branch_args -> tactic
25
val introCaseAssumsThen :
26
(intro_pattern_expr Util.located list -> branch_assumptions -> tactic) ->
29
val general_decompose : (identifier * constr -> bool) -> constr -> tactic
30
val decompose_nonrec : constr -> tactic
31
val decompose_and : constr -> tactic
32
val decompose_or : constr -> tactic
33
val h_decompose : inductive list -> constr -> tactic
34
val h_decompose_or : constr -> tactic
35
val h_decompose_and : constr -> tactic
37
val double_ind : Rawterm.quantified_hypothesis -> Rawterm.quantified_hypothesis -> tactic
38
val h_double_induction : Rawterm.quantified_hypothesis -> Rawterm.quantified_hypothesis->tactic