diff --git a/src/Floorplan.hs b/src/Floorplan.hs index 03e08b7..10e3cf6 100644 --- a/src/Floorplan.hs +++ b/src/Floorplan.hs @@ -95,7 +95,7 @@ placeHalls rng fc input = (nw, g3) = randomR (2, wmax) g2 (nbs, nmat) = buildHall cross nw b amat in - if hallRatio nmat < 0.4 && wmax - 1 > 2 + if hallRatio nmat < 0.175 && wmax - 1 > 2 then doHalls g3 nbs (row, col) (wmax -1) nmat else (g3, nmat) ) (rand, mat) bounds