sig
  val coqidelock : Task.mutex
  val run_coqide :
    'a * Format.formatter ->
    Wpo.t -> Wp_parameters.Script.t -> Prover.verdict Task.task
  val prove : 'a * Format.formatter -> Wpo.t -> Prover.verdict Task.task
end