Out_type.Ident_conflictstype explanation = {kind : Shape.Sig_component_kind.t;name : string;root_name : string;location : Location.t;}val list_explanations : unit -> explanation listval print_located_explanations : explanation list Format_doc.printerval err_print : Format_doc.formatter -> unitval err_msg : unit -> Format_doc.doc option