val warn_cannot_define_graph : ?loc:Loc.t -> (Pp.t * Pp.t) -> unitval warn_cannot_define_principle : ?loc:Loc.t -> (Pp.t * Pp.t) -> unitval do_generate_principle : pstate:Proof_global.t option -> bool -> (Vernacexpr.fixpoint_expr * Vernacexpr.decl_notation list) list -> Proof_global.t optionval functional_induction : bool -> EConstr.constr -> (EConstr.constr * EConstr.constr Tactypes.bindings) option -> Ltac_plugin.Tacexpr.or_and_intro_pattern option -> Goal.goal Evd.sigma -> Goal.goal list Evd.sigmaval make_graph : pstate:Proof_global.t option -> Names.GlobRef.t -> Proof_global.t option