From 2a3c66b731f368cbc1ab031e011321296f905024 Mon Sep 17 00:00:00 2001 From: Matthias Felleisen Date: Fri, 19 Nov 2010 11:57:22 -0500 Subject: [PATCH] start animate from 0 not 1 --- collects/2htdp/universe.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/2htdp/universe.rkt b/collects/2htdp/universe.rkt index 1b0e22344c..791f5a68c3 100644 --- a/collects/2htdp/universe.rkt +++ b/collects/2htdp/universe.rkt @@ -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)