Funind_plugin.Indfun_commonSourceval chop_rlambda_n :
int ->
Glob_term.glob_constr ->
(Names.Name.t * Glob_term.glob_constr * Glob_term.glob_constr option) list
* Glob_term.glob_constrval chop_rprod_n :
int ->
Glob_term.glob_constr ->
(Names.Name.t * Glob_term.glob_constr) list * Glob_term.glob_constrtype function_info = {function_constant : Names.Constant.t;graph_ind : Names.inductive;equation_lemma : Names.Constant.t option;correctness_lemma : Names.Constant.t option;completeness_lemma : Names.Constant.t option;rect_lemma : Names.Constant.t option;rec_lemma : Names.Constant.t option;prop_lemma : Names.Constant.t option;sprop_lemma : Names.Constant.t option;is_general : bool;}debugging
val observe_tac :
header:Pp.t ->
(Environ.env -> Evd.evar_map -> Pp.t) ->
unit Proofview.tactic ->
unit Proofview.tacticval decompose_lambda_n :
Evd.evar_map ->
int ->
EConstr.t ->
(Names.Name.t EConstr.binder_annot * EConstr.t) list * EConstr.tval compose_lam :
(Names.Name.t EConstr.binder_annot * EConstr.t) list ->
EConstr.t ->
EConstr.tval compose_prod :
(Names.Name.t EConstr.binder_annot * EConstr.t) list ->
EConstr.t ->
EConstr.t