projects
/
tatoo.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Drastically improve performances by simplifying the book-keeping
[tatoo.git]
/
src
/
ata.mli
diff --git
a/src/ata.mli
b/src/ata.mli
index
eada8d0
..
aa28abf
100644
(file)
--- a/
src/ata.mli
+++ b/
src/ata.mli
@@
-98,11
+98,16
@@
val get_selecting_states : t -> StateSet.t
(** return the set of selecting states of the automaton *)
val get_trans : t -> QNameSet.elt -> StateSet.t -> TransList.t
(** return the set of selecting states of the automaton *)
val get_trans : t -> QNameSet.elt -> StateSet.t -> TransList.t
-(** [get_trans auto l q] return the list of transitions taken by [auto]
+(** [get_trans auto l q] return
s
the list of transitions taken by [auto]
for label [l] in state [q]. Takes time proportional to the number of
transitions in the automaton.
*)
for label [l] in state [q]. Takes time proportional to the number of
transitions in the automaton.
*)
+val get_form : t -> QNameSet.elt -> State.t -> Formula.t
+(** [get_form auto l q] returns a single formula for label [l] in state [q].
+ Takes time proportional to the number of transitions in the automaton.
+ *)
+
val print : Format.formatter -> t -> unit
(** Pretty printing of the automaton *)
val print : Format.formatter -> t -> unit
(** Pretty printing of the automaton *)