fix(proof): emit proper result for RUP steps

This commit is contained in:
Simon Cruanes 2021-11-28 16:35:04 -05:00
parent 15e16a515d
commit 1bf05d51ce
No known key found for this signature in database
GPG key ID: 4AC01D0849AA62B6

View file

@ -1028,8 +1028,7 @@ module Make(Plugin : PLUGIN)
(Atom.debug_a store) atoms); (Atom.debug_a store) atoms);
let proof = let proof =
let lits = let lits =
Clause.atoms_a store c Iter.of_array atoms
|> Iter.of_array
|> Iter.map (Atom.lit store) |> Iter.map (Atom.lit store)
in in
Proof.emit_redundant_clause lits Proof.emit_redundant_clause lits