aboutsummaryrefslogtreecommitdiff
path: root/plugins/funind/indfun.mli
blob: c803484617a77e0ac1d20abeb0f2b64d8a929daf (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
open Names
open Tactypes

val warn_cannot_define_graph : ?loc:Loc.t -> Pp.t * Pp.t -> unit

val warn_cannot_define_principle : ?loc:Loc.t -> Pp.t * Pp.t -> unit

val do_generate_principle :
  bool ->
  (Vernacexpr.fixpoint_expr * Vernacexpr.decl_notation list) list ->
  Proof_global.pstate option

val functional_induction :
  bool ->
  EConstr.constr ->
  (EConstr.constr * EConstr.constr bindings) option ->
  Ltac_plugin.Tacexpr.or_and_intro_pattern option ->
  Goal.goal Evd.sigma -> Goal.goal list Evd.sigma

val make_graph : GlobRef.t -> Proof_global.pstate option