1 (***********************************************************************)
6 (* Copyright 2010-2012 Université Paris-Sud and Centre National de la *)
7 (* Recherche Scientifique. All rights reserved. This file is *)
8 (* distributed under the terms of the GNU Lesser General Public *)
9 (* License, with the special exception on linking described in file *)
12 (***********************************************************************)
14 (** Implementation of runs in ASTA and algorithms for computing them *)
17 (** The type of runs in ASTA *)
19 val compute : Tree.t -> Asta.t -> t
20 (** Gives the maximal run of an ASTA on a tree *)
22 val print : Format.formatter -> t -> unit