sig
  type job
  type result
  val add_result :
    string ->
    Parry_common.Job.result ->
    Parry_common.Job.job -> Parry_common.Job.result
  val depth : Parry_common.Job.job -> int
  val signature_size : int
  val timeout : float
  val ping : float
  val html_result : Buffer.t -> Parry_common.Job.result -> unit
  val html_job : Buffer.t -> Parry_common.Job.job -> unit
end