(************************************************************************) (* v * The Coq Proof Assistant / The Coq Development Team *) (* ((Sequent.t -> unit Proofview.tactic) -> unit Proofview.tactic) -> unit Proofview.tactic