X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Fmathql%2FmQueryUtil.mli;fp=helm%2Focaml%2Fmathql%2FmQueryUtil.mli;h=bb38dc91d349ec1bca9b564382ca102e9c0ad80a;hb=1c7fb836e2af4f2f3d18afd0396701f2094265ff;hp=69aaebd774cce29633faafb4e52f966288d35569;hpb=2122459392680c4b53e32a2cf1d4792405f118ce;p=helm.git

diff --git a/helm/ocaml/mathql/mQueryUtil.mli b/helm/ocaml/mathql/mQueryUtil.mli
index 69aaebd77..bb38dc91d 100644
--- a/helm/ocaml/mathql/mQueryUtil.mli
+++ b/helm/ocaml/mathql/mQueryUtil.mli
@@ -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)