simon/sidekick
1
0
Fork 0
mirror of https://github.com/c-cube/sidekick.git synced 2025-12-06 11:15:43 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

Corrected indentation.

Browse source
This commit is contained in:
Guillaume Bury 2014-11-02 15:18:00 +01:00
parent 4daf685b3e
commit d4e9865a4c
3 changed files with 49 additions and 48 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
sat/solver.ml
View file

@ -414,8 +414,9 @@ module Make (F : Formula_intf.S)
var_bump_activity q.var; var_bump_activity q.var;
q.var.seen <- true; q.var.seen <- true;
seen := q :: !seen; seen := q :: !seen;
if q.var.level >= decision_level () then incr pathC if q.var.level >= decision_level () then begin
else begin incr pathC
end else begin
learnt := q :: !learnt; learnt := q :: !learnt;
incr size; incr size;
blevel := max !blevel q.var.level blevel := max !blevel q.var.level

2
util/test.ml
View file

@ -45,7 +45,7 @@ let argspec = Arg.align [
"<s>[kMGT] Sets the size limit for the sat solver"; "<s>[kMGT] Sets the size limit for the sat solver";
"-model", Arg.Set p_assign, "-model", Arg.Set p_assign,
" Outputs the boolean model found if sat"; " Outputs the boolean model found if sat";
] ]
(* Limits alarm *) (* Limits alarm *)
let check () = let check () =