X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Furimanager%2FuriManager.mli;h=8250cc83963dc058a0672c3d35d208617a0d920e;hb=4167cea65ca58897d1a3dbb81ff95de5074700cc;hp=27bf862b8f11ad0d9782d1adfb6776da1c39ef38;hpb=a458a3e72fd374b106481a7e98f4000369c6ae61;p=helm.git

diff --git a/helm/ocaml/urimanager/uriManager.mli b/helm/ocaml/urimanager/uriManager.mli
index 27bf862b8..8250cc839 100644
--- a/helm/ocaml/urimanager/uriManager.mli
+++ b/helm/ocaml/urimanager/uriManager.mli
@@ -34,7 +34,7 @@ val uri_of_string : string -> uri
 
 val string_of_uri : uri -> string  (* complete uri *)
 val name_of_uri   : uri -> string  (* name only (without extension)*)
-val buri_of_uri   : uri -> string  (* base uri only *)
+val buri_of_uri   : uri -> string  (* base uri only, without trailing '/' *)
 
 (* given an uri, returns the uri of the corresponding cic file, *)
 (* i.e. removes the [.types][.ann] suffix                       *)
@@ -48,6 +48,8 @@ val annuri_of_uri : uri -> uri
 
 val uri_is_annuri : uri -> bool
 val uri_is_var : uri -> bool
+val uri_is_con : uri -> bool
+val uri_is_ind : uri -> bool
 
 (* given an uri of a constant, it gives back the uri of its body             *)
 (* it gives back None if the uri refers to a Variable or MutualInductiveType *)
@@ -55,6 +57,8 @@ val bodyuri_of_uri : uri -> uri option
 
 (* given an uri, it gives back the uri of its inner types             *)
 val innertypesuri_of_uri : uri -> uri
+(* given an uri, it gives back the uri of its univgraph             *)
+val univgraphuri_of_uri : uri -> uri
 
 (* builder for MutInd and MutConstruct URIs
  * [uri] -> [typeno] -> [consno option]
@@ -63,3 +67,5 @@ val uri_of_uriref :  uri -> int -> int option -> uri
 
 module UriSet: Set.S with type elt = uri
 
+module UriHashtbl : Hashtbl.S with type key = uri
+