X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=src%2Frun.mli;h=3413cd95c0f16ab86cda09307fd91a180d173136;hb=4b36f8220b703a2a89e5d3d20052f5e8fa9ae69d;hp=c7c34c9da4e1880aa0669565dbb55a1b28d4e013;hpb=43df500d1441955e3bc932be2e76318f759f7295;p=tatoo.git

diff --git a/src/run.mli b/src/run.mli
index c7c34c9..3413cd9 100644
--- a/src/run.mli
+++ b/src/run.mli
@@ -21,5 +21,9 @@ type t
 val compute : Tree.t -> Asta.t -> t
 (** Gives the maximal run of an ASTA on a tree *)
 
+val selected_nodes : Tree.t -> Asta.t -> int list
+(** Gives a list of the positions (preorder) of selected nodes of a tree by
+    an ASTA *)
+
 val print : Format.formatter -> t -> unit
 (** Pretty printer *)