exception AlreadyDefined of UriManager.uri
+val set_object_declaration_hook : (UriManager.uri -> Cic.obj -> unit) -> unit
+
(* this is a pointer to the function which builds the inversion principle *)
val build_inversion_principle: (UriManager.uri-> Cic.obj -> (UriManager.uri * Cic.obj) list) ref