blob: b95d64ce9e7bf448bdf9f9015380dc90779d57d5 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
open Constr
val tclUSER_if_not_mes :
Tacmach.tactic ->
bool ->
Names.Id.t list option ->
Tacmach.tactic
val recursive_definition :
bool ->
Names.Id.t ->
Constrintern.internalization_env ->
Constrexpr.constr_expr ->
Constrexpr.constr_expr ->
int -> Constrexpr.constr_expr -> (pconstant ->
Indfun_common.tcc_lemma_value ref ->
pconstant ->
pconstant -> int -> EConstr.types -> int -> EConstr.constr -> 'a) -> Constrexpr.constr_expr list -> unit
|
