module Satisfiability:Strategies. * * We explicit the type for strategies because working with continuations is not particularly readable, * hence putting the focus on them and clearly defining their signatures help the understanding. * *sig
..end
type
t =
| |
ModelFound |
(* | since the beginning, at least one model has been found | *) |
| |
NoModelFound |
(* | no model has been founc until now | *) |
val unsatisfiable : t -> bool
val (&) : t -> t -> t