Witness.Resultmodule R : ResultQuery.SpecSysSol2module Query : sig ... endmodule ArgTool : sig ... endmodule NHT = ArgTool.NHTmodule type BiArgInvariant = sig ... endval determine_result :
(Svcomp.Result.t, string) result option ->
((MyCFG.node * R.SpecSys.Spec.C.t) * 'a) list ->
(Svcomp.Result.t, string) resultval print_result : (Svcomp.Result.t, string) result -> unitval write :
(Svcomp.Result.t, string) result option ->
((MyCFG.node * R.SpecSys.Spec.C.t) * 'a) list ->
(Svcomp.Result.t, string) result