Add slightly more informative comment
This commit is contained in:
parent
adb081fd22
commit
a3e2ea6e86
1 changed files with 2 additions and 1 deletions
1
Main.hs
1
Main.hs
|
|
@ -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)
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue