Add slightly more informative comment

This commit is contained in:
Kiana Sheibani 2022-04-08 00:54:06 -04:00 committed by GitHub
parent adb081fd22
commit a3e2ea6e86
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23

View file

@ -6,6 +6,7 @@ import Graphics.Engine (initialSpace, run)
import Graphics.Gloss
import Graphics.GlossUtils (playYampa)
-- random space just to test things
space :: ToroidalSpace Bool
space = tabulate (\(x, y) -> (x + y `mod` 5) * 10 + x - y > 30)
@ -15,4 +16,4 @@ main =
(InWindow "Conway's Game of Life" (200, 200) (10, 10))
black
30
(run (200, 200) space)
(run (200, 200) space)