X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=src%2Frun.mli;h=3413cd95c0f16ab86cda09307fd91a180d173136;hb=refs%2Fheads%2Flucca-optim;hp=38bedd13447d6f5f583d0135d413e208a8e3f0ba;hpb=6b4b9309e0f49f9a87d97ea87829aa74614dedb7;p=tatoo.git

diff --git a/src/run.mli b/src/run.mli
index 38bedd1..3413cd9 100644
--- a/src/run.mli
+++ b/src/run.mli
@@ -1,7 +1,9 @@
 (***********************************************************************)
 (*                                                                     *)
-(*                  Lucca Hirschi, ?   *)
-(*                  ?   *)
+(*                               TAToo                                 *)
+(*                                                                     *)
+(*                   Lucca Hirschi, LRI UMR8623                        *)
+(*                   Université Paris-Sud & CNRS                       *)
 (*                                                                     *)
 (*  Copyright 2010-2012 Université Paris-Sud and Centre National de la *)
 (*  Recherche Scientifique. All rights reserved.  This file is         *)
@@ -19,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 *)