DeclareScheme
val declare_scheme : string -> (Names.inductive * Names.Constant.t) array -> unit
val lookup_scheme : string -> Names.inductive -> Names.Constant.t
val all_schemes : unit -> Names.Indset.t