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