mirror of
https://github.com/c-cube/sidekick.git
synced 2025-12-09 20:55:39 -05:00
fix(analyze-final): mistake in production of unsat cores
This commit is contained in:
parent
f8281bfcc2
commit
0d7ae34880
1 changed files with 1 additions and 1 deletions
|
|
@ -1685,7 +1685,7 @@ module Make(Plugin : PLUGIN)
|
||||||
let analyze_final (self:t) (a:atom) : atom list =
|
let analyze_final (self:t) (a:atom) : atom list =
|
||||||
Log.debugf 5 (fun k->k "(@[sat.analyze-final@ :lit %a@])" Atom.debug a);
|
Log.debugf 5 (fun k->k "(@[sat.analyze-final@ :lit %a@])" Atom.debug a);
|
||||||
assert (Atom.is_false a);
|
assert (Atom.is_false a);
|
||||||
let core = ref [a.neg] in
|
let core = ref [a] in
|
||||||
let idx = ref (Vec.size self.trail - 1) in
|
let idx = ref (Vec.size self.trail - 1) in
|
||||||
Var.mark a.var;
|
Var.mark a.var;
|
||||||
let seen = ref [a.var] in
|
let seen = ref [a.var] in
|
||||||
|
|
|
||||||
Loading…
Add table
Reference in a new issue