sig
val prove :
Wpo.t ->
?config:VCS.config ->
?mode:VCS.mode ->
?start:(Wpo.t -> unit) ->
?callin:(Wpo.t -> VCS.prover -> unit) ->
?callback:(Wpo.t -> VCS.prover -> VCS.result -> unit) ->
VCS.prover -> bool Task.task
val spawn :
Wpo.t ->
?config:VCS.config ->
?start:(Wpo.t -> unit) ->
?callin:(Wpo.t -> VCS.prover -> unit) ->
?callback:(Wpo.t -> VCS.prover -> VCS.result -> unit) ->
?success:(Wpo.t -> VCS.prover option -> unit) ->
?pool:Task.pool -> (VCS.mode * VCS.prover) list -> unit
end