tinkering
This commit is contained in:
parent
2eb2f12d24
commit
bd49cc4909
1 changed files with 1 additions and 1 deletions
|
@ -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
|
||||
|
|
Loading…
Reference in a new issue