Unify matrix uniform assignment, move towards uniform block
This commit is contained in:
@@ -39,7 +39,7 @@ makeThinSmokeAt = makeCloudAt 5 400 (drawCloudWith 4 400 (withAlpha 0.05 black))
|
||||
|
||||
makeStartCloudAt :: Point2 -> World -> World
|
||||
--makeSmokeCloudAt = makeCloudAt 10 200 (drawCloudWith 2 200 (greyN 0.5))
|
||||
makeStartCloudAt = makeCloudAt 10 400 (drawCloudWith (2) 800 white)
|
||||
makeStartCloudAt = makeCloudAt 10 400 (drawCloudWith 2 800 white)
|
||||
|
||||
makeSmokeCloudAt :: Point2 -> World -> World
|
||||
--makeSmokeCloudAt = makeCloudAt 10 200 (drawCloudWith 2 200 (greyN 0.5))
|
||||
|
||||
Reference in New Issue
Block a user