From 3a374ca433e0440e8c59be49dc93875886d9a733 Mon Sep 17 00:00:00 2001 From: Hans-Peter Deifel <hpd@hpdeifel.de> Date: Fri, 17 Mar 2017 16:56:45 +0100 Subject: [PATCH] Whitespace fixes --- src/lib/CoAlgReasoner.ml | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/src/lib/CoAlgReasoner.ml b/src/lib/CoAlgReasoner.ml index 971c59a..93d7761 100644 --- a/src/lib/CoAlgReasoner.ml +++ b/src/lib/CoAlgReasoner.ml @@ -135,7 +135,7 @@ let propagateSatMu () = | Unsat -> () | Sat -> setAddState setStates state; - setAddState setFinishingStates state + setAddState setFinishingStates state | Expandable -> () | Open -> openstates := !openstates + 1; @@ -165,11 +165,11 @@ let propagateSatMu () = | Expandable | Open -> setAddCore setCores core; - if bsetCompare (coreGetDeferral core) emptySet == 0 - then begin - setAddCore setFinishingCores core - end - else () + if bsetCompare (coreGetDeferral core) emptySet == 0 + then begin + setAddCore setFinishingCores core + end + else () in graphIterStates stateCollector; graphIterCores coreCollector; -- GitLab