added cheesey snow

1 files changed, 1 insertions, 0 deletions

diff --git a/Final.hs b/Final.hs
index 3b3e2c4..8676b13 100644
--- a/Final.hs
+++ b/Final.hs
@@ -122,6 +122,7 @@ colorArray marr = do
  - 2 things:
  - A map of water bodies ids to elevations (to detect if you are under water
  - A builder that will generate all of the quads for the water. -}
+
 getWaterQuads :: Array (Int,Int) Tile -> IOArray (Int,Int) Int -> IO ( Map.Map Int GLfloat, BuilderM GLfloat () )
 getWaterQuads marr arr = do
     let (_,(w,h)) = bounds marr