remove is_valid_literal concept

This commit is contained in:
Simon Cruanes 2022-09-01 22:33:40 -04:00
parent efc01f507b
commit d741b4160d
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
3 changed files with 0 additions and 6 deletions

View file

@ -3,7 +3,6 @@ include Sidekick_smt_solver.Solver
let default_arg =
(module struct
let view_as_cc = Term.view_as_cc
let is_valid_literal _ = true
end : Sidekick_smt_solver.Sigs.ARG)
let create_default ?stat ?size ~proof ~theories tst : t =

View file

@ -42,8 +42,4 @@ type th_combination_conflict = {
new Msat-based SMT solver. *)
module type ARG = sig
val view_as_cc : Sidekick_cc.view_as_cc
val is_valid_literal : Term.t -> bool
(** Is this a valid boolean literal? (e.g. is it a closed term, not inside
a quantifier) *)
end

View file

@ -99,7 +99,6 @@ let create arg ?(stat = Stat.global) ?size ~proof ~theories tst () : t =
let default_arg =
(module struct
let view_as_cc = Default_cc_view.view_as_cc
let is_valid_literal _ = true
end : ARG)
let create_default ?stat ?size ~proof ~theories tst () : t =