suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

start animate from 0 not 1

Browse Source
This commit is contained in:
Matthias Felleisen 2010-11-19 11:57:22 -05:00
parent 747c735eb3
commit 2a3c66b731
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/2htdp/universe.rkt
View File

@ -230,7 +230,7 @@
(define (run-simulation f)
(check-proc 'run-simulation f 1 "first" "one argument")
(big-bang 1 (on-draw f) (on-tick add1)))
(big-bang 0 (on-draw f) (on-tick add1)))
(define animate run-simulation)