X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=helm%2Fsoftware%2Fcomponents%2Flibrary%2FcicCoercion.mli;h=5dc086ec44cf2a9668355f550a8a430be3390715;hb=e9ea9807058a468f4a395e92e20e820856f2da9e;hp=7e4f03ab8607bb9dc6d94d453f3f189360875191;hpb=185bfc8f9c9ba49308477ee6769701f3e2977115;p=helm.git

diff --git a/helm/software/components/library/cicCoercion.mli b/helm/software/components/library/cicCoercion.mli
index 7e4f03ab8..5dc086ec4 100644
--- a/helm/software/components/library/cicCoercion.mli
+++ b/helm/software/components/library/cicCoercion.mli
@@ -25,8 +25,14 @@
 
 (* This module implements the Coercions transitive closure *)
 
+val set_close_coercion_graph : 
+  (CoercDb.coerc_carr -> CoercDb.coerc_carr -> UriManager.uri ->
+  string (* baseuri *) ->
+    (CoercDb.coerc_carr * CoercDb.coerc_carr * UriManager.uri * Cic.obj) list)
+  -> unit
+
 val close_coercion_graph:
-  RefinementTool.kit -> 
   CoercDb.coerc_carr -> CoercDb.coerc_carr -> UriManager.uri ->
+  string (* baseuri *) ->
     (CoercDb.coerc_carr * CoercDb.coerc_carr * UriManager.uri * Cic.obj) list