module type SEQTACTICS =sig
..end
type
seq_t
typeruleapp_t =
(seq_t * Tagpairs.t * Tagpairs.t) list * string
typet =
seq_t -> ruleapp_t list
val relabel : string -> t -> t
val attempt : t -> t
val compose : t -> t -> t
val first : t list -> t
val repeat : t -> t
val choice : t list -> t