X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=components%2Fcic%2FlibraryObjects.mli;h=7c31bf2bf79a651ddd6ee06d5449abb6e27ad37b;hb=935a53fb77f36e5d90a2a59fa500744001e9d780;hp=eca5a0d902c309f3e386c91e4f1f3e96ce76ff61;hpb=7f2444c2670cadafddd8785b687ef312158376b0;p=helm.git

diff --git a/components/cic/libraryObjects.mli b/components/cic/libraryObjects.mli
index eca5a0d90..7c31bf2bf 100644
--- a/components/cic/libraryObjects.mli
+++ b/components/cic/libraryObjects.mli
@@ -26,13 +26,15 @@
 val set_default : string -> UriManager.uri list -> unit
 val reset_defaults : unit -> unit 
 
-val eq_URI : unit -> UriManager.uri
+val eq_URI : unit -> UriManager.uri option
 
 val is_eq_URI : UriManager.uri -> bool
 val is_eq_ind_URI : UriManager.uri -> bool
 val is_eq_ind_r_URI : UriManager.uri -> bool
+val is_trans_eq_URI : UriManager.uri -> bool
+val is_sym_eq_URI : UriManager.uri -> bool
 
-exception NotRecognized;;
+exception NotRecognized of string;;
 
 val eq_ind_URI : eq:UriManager.uri -> UriManager.uri
 val eq_ind_r_URI : eq:UriManager.uri -> UriManager.uri
@@ -40,7 +42,7 @@ val trans_eq_URI : eq:UriManager.uri -> UriManager.uri
 val sym_eq_URI : eq:UriManager.uri -> UriManager.uri
 
 
-val false_URI : unit -> UriManager.uri
-val true_URI : unit -> UriManager.uri
-val absurd_URI : unit -> UriManager.uri
+val false_URI : unit -> UriManager.uri option
+val true_URI : unit -> UriManager.uri option
+val absurd_URI : unit -> UriManager.uri option