Revision 2922d2c5 htools/Ganeti/HTools/Program/Hbal.hs
| b/htools/Ganeti/HTools/Program/Hbal.hs | ||
|---|---|---|
| 373 | 373 |
checkNeedRebalance opts ini_cv |
| 374 | 374 |
|
| 375 | 375 |
if verbose > 2 |
| 376 |
then printf "Initial coefficients: overall %.8f, %s\n"
|
|
| 377 |
ini_cv (Cluster.printStats nl)::IO () |
|
| 376 |
then printf "Initial coefficients: overall %.8f\n%s"
|
|
| 377 |
ini_cv (Cluster.printStats " " nl)::IO ()
|
|
| 378 | 378 |
else printf "Initial score: %.8f\n" ini_cv |
| 379 | 379 |
|
| 380 | 380 |
putStrLn "Trying to minimize the CV..." |
| ... | ... | |
| 392 | 392 |
sol_msg = case () of |
| 393 | 393 |
_ | null fin_plc -> printf "No solution found\n" |
| 394 | 394 |
| verbose > 2 -> |
| 395 |
printf "Final coefficients: overall %.8f, %s\n"
|
|
| 396 |
fin_cv (Cluster.printStats fin_nl) |
|
| 395 |
printf "Final coefficients: overall %.8f\n%s"
|
|
| 396 |
fin_cv (Cluster.printStats " " fin_nl)
|
|
| 397 | 397 |
| otherwise -> |
| 398 | 398 |
printf "Cluster score improved from %.8f to %.8f\n" |
| 399 | 399 |
ini_cv fin_cv ::String |
Also available in: Unified diff