tinkering around

This commit is contained in:
nek0 2018-02-14 01:00:19 +01:00
parent 3526572fdb
commit 2eb2f12d24

View file

@ -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.5 && wmax - 1 > 2
if hallRatio nmat < 0.4 && wmax - 1 > 2
then doHalls g3 nbs (row, col) (wmax -1) nmat
else (g3, nmat)
) (rand, mat) bounds