(***********************************************************************)
(* *)
-(* 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 *)
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 *)