X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=components%2Flibrary%2FlibrarySync.mli;h=a836dfd5788df205ac27ffd35ef539bd80dc05f0;hb=df70518efb295cdce60a3df8098ac0a6eef2d9cf;hp=b29a0aa0342b33442b57272f144556029cc24d46;hpb=5cb95a2e44f979183a8c3e39baa3b4e7cfaf8182;p=helm.git

diff --git a/components/library/librarySync.mli b/components/library/librarySync.mli
index b29a0aa03..a836dfd57 100644
--- a/components/library/librarySync.mli
+++ b/components/library/librarySync.mli
@@ -26,7 +26,7 @@
 exception AlreadyDefined of UriManager.uri
 
 (* this is a pointer to the function which builds the inversion principle *)
-val build_inversion_principle: (UriManager.uri-> Cic.obj -> (UriManager.uri * Cic.obj) option) ref
+val build_inversion_principle: (UriManager.uri-> Cic.obj -> (UriManager.uri * Cic.obj) list) ref
 
 (* adds an object to the library together with all auxiliary lemmas on it *)
 (* (e.g. elimination principles, projections, etc.)                       *)
@@ -47,7 +47,8 @@ val remove_obj: UriManager.uri -> unit
 (* The list of added objects is returned.                                *)
 val add_coercion: 
   add_composites:bool -> 
-  RefinementTool.kit -> UriManager.uri -> 
+  RefinementTool.kit -> UriManager.uri -> int (* arity *) ->
+   string (* baseuri *) ->
     UriManager.uri list
 
 (* inverse of add_coercion, removes both the eventually created composite   *)