projects
/
tatoo.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
time_run
[tatoo.git]
/
src
/
run.mli
diff --git
a/src/run.mli
b/src/run.mli
index
38bedd1
..
3413cd9
100644
(file)
--- 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 *)
(* *)
(* 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 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 *)
val print : Format.formatter -> t -> unit
(** Pretty printer *)