X-Git-Url: http://git.nguyen.vg/gitweb/?p=tatoo.git;a=blobdiff_plain;f=src%2Fformula.mli;h=e108758b84859e7823ade7dc355f92d4999dda5c;hp=46cbe6508c5219513329ebc404be212edaa77d98;hb=c1b43e1dcdb3d0960dbc50db9f226d68ad30c16e;hpb=43df500d1441955e3bc932be2e76318f759f7295

diff --git a/src/formula.mli b/src/formula.mli
index 46cbe65..e108758 100644
--- a/src/formula.mli
+++ b/src/formula.mli
@@ -52,6 +52,9 @@ val compare : t -> t -> int
 val size : t -> int
 (** Syntactic size of the formula *)
 
+val eval_form : (StateSet.t * StateSet.t) -> t -> bool
+(** [eval_form s_1,s_2 F] evaluates the formula [F] on [(s_1,s_2)] *)
+
 val print : Format.formatter -> t -> unit
 (** Pretty printer *)