mirror of
https://github.com/c-cube/sidekick.git
synced 2025-12-06 03:05:31 -05:00
[bugfix] Fix typo following doublon elimination
Following a bugfix for doublon elimination, doublons are now eliminated in add_clause, and as such, in case no simplification is made, the clause without doublons should be used (and not init). This was a typo missed during the refactoring of doublon elimination.
This commit is contained in:
parent
7e95911dd8
commit
0fe8ded071
1 changed files with 2 additions and 2 deletions
|
|
@ -768,8 +768,8 @@ module Make
|
|||
if history = []
|
||||
then (
|
||||
(* update order of atoms *)
|
||||
List.iteri (fun i a -> init.atoms.(i) <- a) atoms;
|
||||
init
|
||||
List.iteri (fun i a -> c.atoms.(i) <- a) atoms;
|
||||
c
|
||||
)
|
||||
else make_clause ?tag:init.tag (fresh_name ()) atoms (History (c :: history))
|
||||
in
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue