diff options
| author | Joshua Rahm <joshua.rahm@colorado.edu> | 2014-04-19 13:49:52 -0600 |
|---|---|---|
| committer | Joshua Rahm <joshua.rahm@colorado.edu> | 2014-04-19 13:49:52 -0600 |
| commit | fe5eb547f97cb65d4e792b389a231d4e69e9d519 (patch) | |
| tree | 8902589c23a728615c4af0b2961b7b29a8716b03 /Final.hs | |
| parent | a2bfedb319d42650d1919134c440353503538c59 (diff) | |
| parent | a2224be33baae7ae07473e74fe94414cdb8f41d2 (diff) | |
| download | terralloc-fe5eb547f97cb65d4e792b389a231d4e69e9d519.tar.gz terralloc-fe5eb547f97cb65d4e792b389a231d4e69e9d519.tar.bz2 terralloc-fe5eb547f97cb65d4e792b389a231d4e69e9d519.zip | |
refactored drawing routines
Diffstat (limited to 'Final.hs')
| -rw-r--r-- | Final.hs | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -288,6 +288,7 @@ main = do let !forestLocations = runMonadPlusBuilder $ createLocations arr stgen 7 Forest let !jungleLocations = runMonadPlusBuilder $ createLocations arr stgen2 2 Jungle + putStrLn $ "Jungle locations: " ++! jungleLocations water <- getWaterQuads arr coloredArr -- putStrLn $ "ForestLocations :" ++! forestLocations makeResources surface (createBuilder arr) forestLocations jungleLocations water |