]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/lambda-delta/common/hierarchy.mli
- performance data added for reference
[helm.git] / helm / software / lambda-delta / common / hierarchy.mli
index 57413d909625e1b717d908d7dd86ce56c6f32a7b..5bebd28df7604b18ac109ae517bb10dfd905c3de 100644 (file)
@@ -13,12 +13,10 @@ type graph
 
 val set_new_sorts: (int -> 'a) -> string list -> 'a
 
-val get_sort: (string option -> 'a) -> int -> 'a
+val get_sort: (unit -> 'a) -> (string -> 'a) -> int -> 'a
 
-val graph_of_string: (graph option -> 'a) -> string -> 'a
+val graph_of_string: (unit -> 'a) -> (graph -> 'a) -> string -> 'a
 
 val string_of_graph: (string -> 'a) -> graph -> 'a
 
 val apply: (int -> 'a) -> graph -> int -> 'a
-
-val graph: graph ref