X-Git-Url: http://git.nguyen.vg/gitweb/?p=tatoo.git;a=blobdiff_plain;f=src%2Fata.mli;h=00070d4c3d287cc5b3b07d0929fa36a307fa836c;hp=aa28abff5cd55bae2d5b4071db7474a80c9ad478;hb=aade6d9ba2e2b65e021de8a1c3a2d3874aa5742e;hpb=75375a8bc02893080745ab38768b7ee48f5c4153

diff --git a/src/ata.mli b/src/ata.mli
index aa28abf..00070d4 100644
--- a/src/ata.mli
+++ b/src/ata.mli
@@ -126,6 +126,26 @@ val merge : t -> t -> t
     in parallel
 *)
 
+val union : t -> t -> t
+(** [union a a'] creates a new automaton [a''] that selects node
+    selected by either [a] or [a']
+*)
+
+val inter : t -> t -> t
+(** [inter a a'] creates a new automaton [a''] that selects node
+    selected by both [a] and [a']
+*)
+
+val neg : t -> t
+(** [neg a] creates a new automaton [a'] that selects the nodes not
+    selected by [a]
+*)
+
+val diff : t -> t -> t
+(** [diff a a'] creates a new automaton [a''] that select nodes selected
+    by [a] but not selected by [a']
+*)
+
 module Builder :
 sig
   type auto = t