nek0/tracer
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

tinkering around

Browse source
This commit is contained in:
nek0 2018-02-14 01:00:19 +01:00
parent 3526572fdb
commit 2eb2f12d24
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/Floorplan.hs
View file

@ -95,7 +95,7 @@ placeHalls rng fc input =
(nw, g3) = randomR (2, wmax) g2 (nw, g3) = randomR (2, wmax) g2
(nbs, nmat) = buildHall cross nw b amat (nbs, nmat) = buildHall cross nw b amat
in 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 then doHalls g3 nbs (row, col) (wmax -1) nmat
else (g3, nmat) else (g3, nmat)
) (rand, mat) bounds ) (rand, mat) bounds