]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/ocaml/mathql/mQueryUtil.mli
- the mathql interpreter is not helm-dependent any more
[helm.git] / helm / ocaml / mathql / mQueryUtil.mli
index 69aaebd774cce29633faafb4e52f966288d35569..bb38dc91d349ec1bca9b564382ca102e9c0ad80a 100644 (file)
@@ -40,6 +40,14 @@ val start_time : unit -> time
 
 val stop_time  : time -> string
 
+type 'a comparison = Lt 
+                   | Gt
+                  | Eq of 'a
+
+val list_join : ('a -> 'a -> 'a comparison) -> 'a list -> 'a list -> 'a list 
+
+val list_meet : ('a -> 'a -> 'a comparison) -> 'a list -> 'a list -> 'a list 
+
 
 type uriref = UriManager.uri * (int list)