Module Witness.Result

Parameters

Signature

module Query : sig ... end
module ArgTool : sig ... end
module NHT = ArgTool.NHT
module type BiArgInvariant = sig ... end
val determine_result : ((MyCFG.node * R.SpecSys.Spec.C.t) * 'a) list -> (module Svcomp.Task) -> (module WitnessTaskResult)
val write : (Svcomp.Result.t, string) Stdlib.result option -> ((MyCFG.node * R.SpecSys.Spec.C.t) * 'a) list -> unit