Funind_plugin.Gen_principle
val do_generate_principle_interactive : Vernacexpr.fixpoint_expr list -> Declare.Proof.t
val do_generate_principle : Vernacexpr.fixpoint_expr list -> unit
val make_graph : Names.GlobRef.t -> unit
val build_scheme : (Names.Id.t * Libnames.qualid * Sorts.family) list -> unit
val build_case_scheme : (Names.Id.t * Libnames.qualid * Sorts.family) -> unit