racket/collects/2htdp/tests/perform-record.rkt
2011-05-13 12:55:44 -04:00

1317 lines
45 KiB
Racket

#reader(lib"read.ss""wxme")WXME0108 ##
#|
This file uses the GRacket editor format.
Open this file in DrRacket version 5.1.1.5 or later to read it.
Most likely, it was created by saving a program in DrRacket,
and it probably contains a program with non-text elements
(such as images or comment boxes).
http://racket-lang.org/
|#
44 7 #"wxtext\0"
3 1 6 #"wxtab\0"
1 1 8 #"wximage\0"
2 0 8 #"wxmedia\0"
4 1 34 #"(lib \"syntax-browser.ss\" \"mrlib\")\0"
1 0 16 #"drscheme:number\0"
3 0 44 #"(lib \"number-snip.ss\" \"drscheme\" \"private\")\0"
1 0 36 #"(lib \"comment-snip.ss\" \"framework\")\0"
1 0 43 #"(lib \"collapsed-snipclass.ss\" \"framework\")\0"
0 0 19 #"drscheme:sexp-snip\0"
0 0 36 #"(lib \"cache-image-snip.ss\" \"mrlib\")\0"
1 0 68
(
#"((lib \"image-core.ss\" \"mrlib\") (lib \"image-core-wxme.rkt\" \"mr"
#"lib\"))\0"
) 1 0 33 #"(lib \"bullet-snip.ss\" \"browser\")\0"
0 0 29 #"drscheme:bindings-snipclass%\0"
1 0 25 #"(lib \"matrix.ss\" \"htdp\")\0"
1 0 22 #"drscheme:lambda-snip%\0"
1 0 8 #"gb:core\0"
5 0 10 #"gb:canvas\0"
5 0 17 #"gb:editor-canvas\0"
5 0 10 #"gb:slider\0"
5 0 9 #"gb:gauge\0"
5 0 11 #"gb:listbox\0"
5 0 12 #"gb:radiobox\0"
5 0 10 #"gb:choice\0"
5 0 8 #"gb:text\0"
5 0 11 #"gb:message\0"
5 0 10 #"gb:button\0"
5 0 12 #"gb:checkbox\0"
5 0 18 #"gb:vertical-panel\0"
5 0 9 #"gb:panel\0"
5 0 20 #"gb:horizontal-panel\0"
5 0 33 #"(lib \"readable.ss\" \"guibuilder\")\0"
1 0 57
#"(lib \"hrule-snip.rkt\" \"macro-debugger\" \"syntax-browser\")\0"
1 0 45 #"(lib \"image-snipr.ss\" \"slideshow\" \"private\")\0"
1 0 26 #"drscheme:pict-value-snip%\0"
0 0 38 #"(lib \"pict-snipclass.ss\" \"slideshow\")\0"
2 0 55 #"(lib \"vertical-separator-snip.ss\" \"stepper\" \"private\")\0"
1 0 18 #"drscheme:xml-snip\0"
1 0 31 #"(lib \"xml-snipclass.ss\" \"xml\")\0"
1 0 21 #"drscheme:scheme-snip\0"
2 0 34 #"(lib \"scheme-snipclass.ss\" \"xml\")\0"
1 0 10 #"text-box%\0"
1 0 32 #"(lib \"text-snipclass.ss\" \"xml\")\0"
1 0 15 #"test-case-box%\0"
2 0 1 6 #"wxloc\0"
0 0 111 0 1 #"\0"
0 75 1 #"\0"
0 12 90 -1 90 -1 3 -1 0 1 0 1 0 0 0 0 0 0 0 0 0 0 0 255 255 255 1 -1 0 9
#"Standard\0"
0 75 23 #"Lucida Sans Typewriter\0"
0 11 90 -1 90 -1 1 -1 0 1 0 1 0 0 0 0 0 0 0 0 0 0 0 255 255 255 1 -1 2 1
#"\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 1 1 1 1 1 1 0 0 0 0 0 0 -1 -1 2 24
#"framework:default-color\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 2 1
#"\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 150 0 150 0 0 0 -1 -1 2 15
#"text:ports out\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 150 0 150 0 0 0 -1 -1 2 1
#"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 93 -1 -1 -1 0 0 0 0 0 0 0 0 0 1.0 1.0 1.0 255 0 0 0 0 0 -1
-1 2 15 #"text:ports err\0"
0 -1 1 #"\0"
1.0 0 -1 -1 93 -1 -1 -1 0 0 0 0 0 0 0 0 0 1.0 1.0 1.0 255 0 0 0 0 0 -1
-1 2 1 #"\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 0 175 0 0 0 -1 -1 2 17
#"text:ports value\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 0 175 0 0 0 -1 -1 2 1
#"\0"
0 -1 1 #"\0"
1.0 0 92 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1.0 1.0 1.0 34 139 34 0 0 0 -1
-1 2 27 #"Matching Parenthesis Style\0"
0 -1 1 #"\0"
1.0 0 92 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1.0 1.0 1.0 34 139 34 0 0 0 -1
-1 2 1 #"\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 38 38 128 0 0 0 -1 -1 2 37
#"framework:syntax-color:scheme:symbol\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 38 38 128 0 0 0 -1 -1 2 38
#"framework:syntax-color:scheme:keyword\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 38 38 128 0 0 0 -1 -1 2 1
#"\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 194 116 31 0 0 0 -1 -1 2
38 #"framework:syntax-color:scheme:comment\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 194 116 31 0 0 0 -1 -1 2 1
#"\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 41 128 38 0 0 0 -1 -1 2 37
#"framework:syntax-color:scheme:string\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 41 128 38 0 0 0 -1 -1 2 39
#"framework:syntax-color:scheme:constant\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 41 128 38 0 0 0 -1 -1 2 1
#"\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 132 60 36 0 0 0 -1 -1 2 42
#"framework:syntax-color:scheme:parenthesis\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 132 60 36 0 0 0 -1 -1 2 1
#"\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 255 0 0 0 0 0 -1 -1 2 36
#"framework:syntax-color:scheme:error\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 255 0 0 0 0 0 -1 -1 2 1
#"\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 2 36
#"framework:syntax-color:scheme:other\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 2 1
#"\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 81 112 203 0 0 0 -1 -1 2
38 #"drracket:check-syntax:lexically-bound\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 81 112 203 0 0 0 -1 -1 2 1
#"\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 178 34 34 0 0 0 -1 -1 2 28
#"drracket:check-syntax:set!d\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 178 34 34 0 0 0 -1 -1 2 1
#"\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 68 0 203 0 0 0 -1 -1 2 31
#"drracket:check-syntax:imported\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 68 0 203 0 0 0 -1 -1 2 47
#"drracket:check-syntax:my-obligation-style-pref\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 178 34 34 0 0 0 -1 -1 2 1
#"\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 116 0 0 0 0 -1 -1 2 50
#"drracket:check-syntax:their-obligation-style-pref\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 116 0 0 0 0 -1 -1 2 48
#"drracket:check-syntax:unk-obligation-style-pref\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 2 1
#"\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 139 142 28 0 0 0 -1 -1 2
49 #"drracket:check-syntax:both-obligation-style-pref\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 139 142 28 0 0 0 -1 -1 2
26 #"plt:htdp:test-coverage-on\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 2 1
#"\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 0 0 0 255 56 81 0 0 0 -1 -1 2 27
#"plt:htdp:test-coverage-off\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 0 0 0 255 56 81 0 0 0 -1 -1 4 1
#"\0"
0 70 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 1.0 1.0 1.0 1.0 1.0 1.0 0 0 0 0 0 0
-1 -1 4 4 #"XML\0"
0 70 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 1.0 1.0 1.0 1.0 1.0 1.0 0 0 0 0 0 0
-1 -1 2 1 #"\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 34 139 34 0 0 0 -1 -1 2 37
#"plt:module-language:test-coverage-on\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 34 139 34 0 0 0 -1 -1 2 1
#"\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 176 48 96 0 0 0 -1 -1 2 38
#"plt:module-language:test-coverage-off\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 176 48 96 0 0 0 -1 -1 4 1
#"\0"
0 71 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 1.0 1.0 1.0 1.0 1.0 1.0 0 0 0 0 0 0
-1 -1 4 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 1 0 0 0 0 0 0 0 0 1.0 1.0 1.0 0 0 255 0 0 0 -1
-1 4 1 #"\0"
0 71 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 1 0 0 0 0 0 0 0 0 1.0 1.0 1.0 0 0 255 0 0 0 -1
-1 4 1 #"\0"
0 71 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1.0 1.0 1.0 0 100 0 0 0 0 -1
-1 4 1 #"\0"
0 -1 1 #"\0"
1.0 0 92 -1 -1 -1 -1 -1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 255 255 0 -1 -1 0
1 #"\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 200 0 0 0 0 0 -1 -1 0 1
#"\0"
0 -1 1 #"\0"
0 13 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 1.0 1.0 1.0 1.0 1.0 1.0 0 0 0 0 0 0
-1 -1 2 1 #"\0"
0 -1 1 #"\0"
0 13 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 1.0 1.0 1.0 1.0 1.0 1.0 0 0 0 0 0 0
-1 -1 0 1 #"\0"
0 75 12 #"Courier New\0"
0.0 13 90 -1 90 -1 3 -1 0 1 0 1 0 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255
255 255 1 -1 0 1 #"\0"
0 75 23 #"Lucida Sans Typewriter\0"
0.0 12 90 -1 90 -1 1 -1 0 1 0 1 0 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255
255 255 1 -1 2 38 #"drscheme:check-syntax:lexically-bound\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 81 112 203 0 0 0 -1 -1 2
28 #"drscheme:check-syntax:set!d\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 178 34 34 0 0 0 -1 -1 2 31
#"drscheme:check-syntax:imported\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 68 0 203 0 0 0 -1 -1 8 1
#"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 255 0 0 0 0
0 -1 -1 8 24 #"drscheme:text:ports err\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 255 0 0 0 0
0 -1 -1 22 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 1.0 1.0 1.0 0 0 0 0 0 0
-1 -1 15 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 1.0 1.0 1.0 0 0 0 0 0 0
-1 -1 4 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 1.0 1.0 1.0 0 0 0 0 0 0
-1 -1 14 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 1.0 1.0 1.0 0 0 0 0 0 0
-1 -1 19 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 1.0 1.0 1.0 0 0 0 0 0 0
-1 -1 22 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0.0 0.0 0.0 0.0 0.0 0.0 255 165 0 0
0 0 -1 -1 14 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0.0 0.0 0.0 0.0 0.0 0.0 255 165 0 0
0 0 -1 -1 4 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0.0 0.0 0.0 0.0 0.0 0.0 255 165 0 0
0 0 -1 -1 4 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255
255 255 -1 -1 22 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255
255 255 -1 -1 15 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255
255 255 -1 -1 14 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255
255 255 -1 -1 19 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255
255 255 -1 -1 15 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0.0 0.0 0.0 0.0 0.0 0.0 255 165 0 0
0 0 -1 -1 20 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0.0 0.0 0.0 0.0 0.0 0.0 255 165 0 0
0 0 -1 -1 19 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0.0 0.0 0.0 0.0 0.0 0.0 255 165 0 0
0 0 -1 -1 17 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255
255 255 -1 -1 20 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255
255 255 -1 -1 0 1 #"\0"
0 75 7 #"Monaco\0"
0.0 14 90 -1 90 -1 3 -1 0 1 0 1 0 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255
255 255 1 -1 0 1 #"\0"
0 75 1 #"\0"
0.0 10 90 -1 90 -1 3 -1 0 1 0 1 0 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255
255 255 1 -1 0 1 #"\0"
0 75 12 #"Courier New\0"
0.0 10 90 -1 90 -1 3 -1 0 1 0 1 0 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255
255 255 1 -1 2 1 #"\0"
0 71 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 1.0 1.0 1.0 1.0 1.0 1.0 0 0 0 0 0 0
-1 -1 2 1 #"\0"
0 71 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 0 100 0 0 0
0 -1 -1 2 41 #"profj:syntax-colors:scheme:block-comment\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 194 116 31 0 0 0 -1 -1 2
35 #"profj:syntax-colors:scheme:keyword\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 2 1
#"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 139 0 139 0
0 0 -1 -1 2 37 #"profj:syntax-colors:scheme:prim-type\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 139 0 139 0
0 0 -1 -1 2 38 #"profj:syntax-colors:scheme:identifier\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 38 38 128 0 0 0 -1 -1 2 34
#"profj:syntax-colors:scheme:string\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 34 139 34 0 0 0 -1 -1 2 35
#"profj:syntax-colors:scheme:literal\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 34 139 34 0 0 0 -1 -1 2 35
#"profj:syntax-colors:scheme:comment\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 194 116 31 0 0 0 -1 -1 2
33 #"profj:syntax-colors:scheme:error\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 255 0 0 0 0 0 -1 -1 2 35
#"profj:syntax-colors:scheme:default\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 2 37
#"profj:syntax-colors:scheme:uncovered\0"
0 -1 1 #"\0"
1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 2 35
#"profj:syntax-colors:scheme:covered\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 139 0 139 0
0 0 -1 -1 20 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 1.0 1.0 1.0 0 0 0 0 0 0
-1 -1 2 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 1 0 0 0 0 0 1.0 1.0 1.0 1.0 1.0 1.0 0 0 0 0 0 0
-1 -1 2 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 1 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 65 105 225 0
0 0 -1 -1 0 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 1.0 1.0 1.0 1.0 1.0 1.0 0 0 0 0 0 0
0 -1 17 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 1.0 1.0 1.0 0 0 0 0 0 0
-1 -1 17 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0.0 0.0 0.0 0.0 0.0 0.0 255 165 0 0
0 0 -1 -1 24 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 1.0 1.0 1.0 0 0 0 0 0 0
-1 -1 24 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255
255 255 -1 -1 0 1 #"\0"
0 75 12 #"Courier New\0"
0.0 12 90 -1 90 -1 3 -1 0 1 0 1 0 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255
255 255 1 -1 24 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0.0 0.0 0.0 0.0 0.0 0.0 255 165 0 0
0 0 -1 -1 0 1 #"\0"
0 75 15 #"Lucida Console\0"
0.0 15 90 -1 90 -1 3 -1 0 1 0 1 0 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255
255 255 1 -1 14 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 0 0 0
-1 -1 20 1 #"\0"
0 -1 1 #"\0"
1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 0 0 0
-1 -1 0 452 0 26 3 12 #"#lang racket"
0 0 4 3 1 #" "
0 0 4 29 1 #"\n"
0 0 4 29 1 #"\n"
0 0 17 3 102
(
#";; -----------------------------------------------------------------"
#"----------------------------------"
) 0 0 4 29 1 #"\n"
0 0 17 3 74
(
#";; can world/universe cope with large backgrounds and small moving t"
#"hing? "
) 0 0 4 29 1 #"\n"
0 0 4 29 1 #"\n"
0 0 22 3 1 #"("
0 0 14 3 7 #"require"
0 0 4 3 1 #" "
0 0 14 3 14 #"2htdp/universe"
0 0 22 3 1 #")"
0 0 4 29 1 #"\n"
0 0 22 3 1 #"("
0 0 14 3 7 #"require"
0 0 4 3 1 #" "
0 0 14 3 11 #"2htdp/image"
0 0 22 3 1 #")"
0 0 4 29 1 #"\n"
0 0 4 29 1 #"\n"
0 0 17 3 3 #"; ("
0 0 17 3 6 #"struct"
0 0 17 3 1 #" "
0 0 17 3 4 #"posn"
0 0 17 3 1 #" "
0 0 17 3 1 #"("
0 0 17 3 1 #"x"
0 0 17 3 4 #" y))"
0 0 4 29 1 #"\n"
0 0 4 29 1 #"\n"
0 0 17 3 12 #";; CONSTANTS"
0 0 4 29 1 #"\n"
0 0 17 3 34 #";; I can now do 24 and it is okay "
0 0 4 29 1 #"\n"
0 0 22 3 1 #"("
0 0 15 3 6 #"define"
0 0 4 3 1 #" "
0 0 14 3 9 #"num-grass"
0 0 4 3 1 #" "
0 0 20 3 2 #"24"
0 0 22 3 1 #")"
0 0 4 29 1 #"\n"
0 0 4 29 1 #"\n"
0 0 17 3 3 #";; "
0 0 17 3 20 #"GRAPHICAL CONSTANTS:"
0 0 4 29 1 #"\n"
0 0 22 3 1 #"("
0 0 15 3 6 #"define"
0 0 4 3 1 #" "
0 0 14 3 6 #"hammer"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 6 #"circle"
0 0 4 3 1 #" "
0 0 20 3 1 #"3"
0 0 4 3 1 #" "
0 0 19 3 7 #"\"solid\""
0 0 4 3 1 #" "
0 0 19 3 8 #"\"yellow\""
0 0 22 3 2 #"))"
0 0 4 29 1 #"\n"
0 0 4 29 1 #"\n"
0 0 22 3 1 #"("
0 0 15 3 6 #"define"
0 0 4 3 1 #" "
0 0 14 3 9 #"mole-look"
0 0 4 3 1 #" "
0 2 27 4 1 #"\0"
2 -1.0 -1.0 0.0 0.0 0 8 500
(
#"\211PNG\r\n\32\n\0\0\0\rIHDR\0\0\0(\0\0\0(\b"
#"\2\0\0\0\3\234/:\0\0\0\6bKGD\0\377\0\377\0\377\240\275\247"
#"\223\0\0\16\eIDATX\205M\227k\214]\327U\307\327\332{\237\307}"
#"\317\334\271w</\317x2\266\343W"
#"\234\207\233WI\223&\270\221\332\252\241\17\"T\"\212HPZ\204DA\251\4"
#"-\bQ>\0\245*\2\265&D\211\250*T\276P$$J)\205>\2224"
#"\220\264M\342\264I\354x<\266\347i"
#"\317\314\275w\356\373\234\263\367^k\361"
#"\341\332U\217\366\221\216\326\227\265\367Z"
#"\353\374\377\277\215\247\2770\23\307\2216"
#"&\bL\232\244\365\311Zc\267\231$\351^\243-\0GO\34\n\202\260?\350"
#"\347\313Q\261X|\343\245\225\2557\373"
#"\335u\3526\23\4\b\202`8\260\245"
#"\261\\\232$\343\363\321\241\367L\344j"
#"R,\25|\312\271|\f\f\205b\241\325\3323\306\30\243\327\257l\2\2021\246"
#"\\)U\306\312\246>9\261\276\272Y\31\253\24\213y\"\332\334\270Z(\3461"
#"\305#'\16]8\277\22\305a\273\323"
#"\3514\373/\177\243u\355\r\267\210\205"
#"\343\v\325\303\207\306n\376\345j\20h"
#"T\210\210\316q\273\227\235\273\322\374\341"
#"\327\266.d\355\3w\27&o5\205RT\31\253\300`\20\6\2411zkk"
#"\373\360\321\203\347\337^\276\351\340\201\213"
#"\27.i\243\361c\317\34\31\364\207\371"
#"B\256\333\351\25\212\371,\265J!\""
#"\246i\326\335\353\335q\357-\27\177\272"
#"\365\372W\e\307\242\302\335\307\353\367\235"
#"\232%AP\n\224B\245\21\1\1\21\0\0204B>\320/\374d\343\205\3277"
#"_\332\332<\365\370de&d\a\23\265\361\265+\e\0p\350\346\245^"
#"\257\337l\264J\245b\222\244\272v"
#"\247\314\355\237y\343\325\267k\365\361K"
) 500
(
#"\357\254M\324\253D<5=\231/\344"
#"\362\225h\371\245\306\213\177\275\376\a\247\17>t\327l\255VH=0\"\340("
#"\253\2T\200(\240X\304\263\fR\267"
#"\257\236\177\367mS\357\232\235|\356o"
#"\317\233\252\34\273\367\300\325\215\355\271\375"
#"3\v\213\363I\222\354l\357\216W\307V\226W\231Y\37\373P}8Lf\366"
#"O\r\a\311\342\241\371 \320\205B\276"
#"\275\327\351\r\272\347\236\337Y\371\247\316W>y\fB\355\4\225R:4&\320"
#"\312\30\255\225\322Z)\205J\215v\2"
#"\2\2\342\231\207\211\213b\374\324\a\16"
#"?\367\345\345\264\220b\321Fa\264\276\27215\263\257\331h1q\257;(\225"
#"\v\252>9Q\235\30\363\336O\324\306"
#"{\235~\241X\34\16\2238\37\25\342"
#"\312\325\177\317\376\360\303s\253\315\324:"
#"b\26\1\4\1\21\24A\1\0\26\26\20\6\0`\31\225\34\5@\0\274\345\213"
#"W\273g~\377\256\325\177\35h\t\202"
#"\320,\35Z\274t\361\312\334\376\231("
#"\n\367/\314\224\312E=\377\336\234R"
#"*\227\213\257\\Z_:\274\330\336\353\0\200g\367\243\2577\2161\326'\2A"
#"\fL\20\204F\ec\2\243\224B\205\nQ\20\0\0D\4\4DDD\230="
#"1\239G\326\271\324Z\337\263o\\N\352G\364^\263\233\317\307\271|\16\21"
#"\366Z\235d\230\250\301`HDY\226\205Q\270ve\243P\310G\271p\355\342"
#".\234\355\335s\274\2309 \22\357\310"
#"{&f\357\330\263\20\221\363d\235\267\316Y\357\235#K\336zr$D\354\211"
#"\35\21\21\17\206\356\241wM\344/\372v#i\3546Q\341\356Ns\320\37F"
#"QX*\227Te\254\354\235\367\236\3020\0\200K\27\257\240\222\366E\312iL"
#"\2540\210\bZ\362\236\274\367\344\210\274\263\316yk"
#"\255\265>\2636\313\234\265\326f\336;\347\234\363\336"
) 500
(
#"{O\336\263\367\3369j\17l\301\340"
#"\352O:\323\363\365~o\320\353\366\312"
#"\225\22\21U\306Jj\364\347\30c\20QDf\366Ow\372\235\215W\374\an"
#"+'V\230\205D\4@<3\221\263>\313|\226\2724\265Y\232eI\226%"
#"i\232fY\226\245\231\315\254\265\231g"
#"O\300\344\211\254s\335^\372\341\273\306"
#"w_\207\376\260\237\245\351xulg"
#"\273\21\206\341\325\255\0353\222\222\341`"
#"86^\216\343\330:k$\366\3336=\314\fJ\0304\310\332N\362\326z\363"
#"\364\35\373\26f\306\310\0033#\242\b \0 \"\"\2\b\200Q\210\302\e;"
#"\335o\377h\343\226\371\322\276\262\"\346"
#"DH\232\204\336\2041\306\271\330{\""
#"\"\245\3200\263\367^k\275\327\352h\335g!\311r\2139m\t\4\201\205\211"
#"%2j\263\221<\367\255\225{\216\327"
#"\37\274c\272\220\v\275\37\245\5\0\4"
#"\0\205\2505\366\206\376\a\257n\375\360"
#"g;\221\301\333\17\24=\t\21\210\300RA+\227/O\30\357}\241\230/\24"
#"\362\233\eW\315^\253\35\206a\232\246"
#"\343\325\261~o@\354\262\16\22\0\v"
#"\3\0\211\262$\265J\360[\357\233{"
#"\375R\377\ag\267_~\273\365\321\373\347nY\252\262\b3\0\200B\20\205g"
#"\227\333\377\366\302\3320\365\367\337V;"
#"\265TA\241a\342D\230E\34\263\22"
#"\243\24\222\343n\247\327iw\353\223\23"
#"\2462V\316\347sJ\251\235\355\0063"
#"\357\233\236\334\354\365\0@\4XD\263"
#"0\263u\34\307\372\275\267M\334}|"
#"\342{\257m\177\355\333\227\26gv\236"
#"\374\320\301\221\\z\222g\277y\361\362"
#"V\377\356c\265\323wL\306\6\372Ck\0353\v\263 \2000Dq\250\265\f"
#"{\3\243M\24\207\210h\2141\315\306^\222\244\245Ra"
#"\274Z\351vz6\315@\200\275\210\6a\20f&a\342"
) 500
(
#"A\342\343(\370\310}s\247\216\324V"
#"\257\r\230\31@\1\210\210\34\235\257\274"
#"\377\356\231\375\265(K)I\274'f\22!f\1d@\304v\253\23U\363\314"
#"<^\255t\332\2754\315\214R\230$"
#"i\261\230\217\342\250\337\eL\316\324m"
#"\267\275);\4\0\2$\314\254\30\204\2045\213'N\254\237\231\210gk9\26"
#"\6`\20\21\300w\237\230\20\346$#\"\362\302\302B\314^\200Xp\2440\0"
#"a\20\2547\266\306\306\313\205b~\347"
#"\332\256\352\367\6\265z5\316\305\315f"
#"+\314\233\213\313+\227_j)\203\"\",\2\302\"\302\314\"\f<\352\231'"
#"\357\311\217b,,B\236\274#ff/\314\302\304\3142\352\225\210\260\0x\246"
#"|%W\251\226\226\317_\266\231\r\302"
#"\300\230\300x\357Q\301\336\372\260y\216"
#"\372\257\311\326[{3\365\200E\0\220\5D\200D\210\205Y\210\30\24j\255\3"
#"\203JiD\20\21\357\311z!\26a\21\26f\21\30m\26D\4\1LN]"
#"\371\372.uaj\261r\354\344d\30D\210h\202 \330X\333:t\313Bo"
#"\235/}\263\t\0!\2\260(D\6\20b\322\34\220\322 (\4\300\21J/"
#"\201\377~~\263?L<Q!\216\26f+\35791\236\272\214@P\20\5\210"
#"\204X\200E+\30\246\322\267\274\333\246"
#"\235g\257\35\3775w|\266\236\365\\\261T0\375\336`naz{\255\335~"
#"\331G\0\240\3002l\266)\1775]\252Ea\2505\202\367\366\354r\e\nS"
#"A\241F\240\337~\375\225{\17G\3459\243\321X/\313[;\317\254\271cG"
#"\217fI\323\17\32S\5;]+\212\202\276\347\v\e\303s\233\351 \343\251\b"
#"\v\"\215\357\367\324\373g\aIG\251\2>\362\345\2450\257\277\363"
#"\347+v\225\224\206P\0011\222\6\20\0\304C\323\321|U7e"
) 500
(
#"\352\323\177\362\305\323\247OW+\305\27"
#"\377\367\265O?z\352\300l\354\371\272"
#"|h\360\233~\341\225\263\27Y`u"
#"\355\352\27\376\342O\317\275\370\317\216\365"
#"\233\253CK\262X\17\272)/0[O\233\3\325\233W\367\177f*P\221Q"
#"\1\264W\251\267J\201\6\255\20P\4a_I\37\231\nW\32\376\374f\372\306"
#"\252|\356\217?\376\321G>h\214\1\200K+\357\264:\220/\22\313H\263\300"
#";\277=\274\n\0\300T\257\26\217\237"
#"\270\365\231g\277\212B\307\347s\207&\243b\4/\\\30j\324%\203\23J\266"
#"W\275\335\t\3439\324\267\177|\372\277"
#">\177Q%\202\32\265\22\r\212\1\342"
#"@\355\37\3233\325(\4\373\301_\377"
#"\335\177|\356\231\327^{\355W\36y"
#"\244\325j\335z\342\370\353\313k\337}"
#"\376\254Q4\314h\365\32\3658\377\371"
#"\277\372\312\341\203K\"\362\e\237\370\304"
#"\231\277?\363\364\2313\235\306\225\223\265"
#"\201 \222\207\265=;\16\30j\360\314"
#"\342\341g\257\356\335\376\261i|\364\351"
#"[\376\345w~\26(P\b\32\301(\364$\265\262>9\e\231\0\177|~\260"
#"\334H\227\317\277\265\275\263\263\264\264\344"
#"\254UZW*\225\37\375\370\325\257\234"
#"\371r\222$\17\277\357\341\307\36{L!\244ij\214YYY\251\327\353'O"
#"\336\372\370o?\341.|\303r\250\200"
#"\377oe8/\230\17\244\233I\303\302\312\220>\3647\207L{g0\362\26\274"
#".\223 \2\b\b\0\326C\30\301SO=u\356\334\233\17=\370`\275VK"
#"\323\24\0\232\215\306\354\364\276\277\373\322"
#"\227\224\326i\232\356^\273J\314\0\20"
#"\307\361\313\257\274\362?\337\375\356\3\367"
#"?p\356\315\263\213F\1\2148\5EDH\242@\205\336\207\0v(\306:"
#"{\235ap\224[\4\241\227\311O7\263\346\2203\aO\377\303\231\373\357{"
) 500
(
#"O\251P\330k4\254sp\335\2230\n\2P\312;GD\243X\22\4\205\\"
#"\216\211\316<\375L\253\265{>\247\252E3UR\0311\"j\205\n\20\1\2"
#"\2004\315Lh\2\6\320\b\302\340\0\210A\0\262\204\210\325tY\317V\203a"
#"j\2438^<\260d\235\367\316\v\210"
#"R*\216r\337\372\316\367\377\343\333\377"
#"\371g\237\373l\271\\\364\316\t\b\21"
#"\335\365\256;\a)o\257\375\345]\363"
#"\305\265]\267\265\347\327\233\216X:\b"
#"\32395\237\203\320h\r\236\210\314\350"
#"\20\2\210(D\240\25\200\300\276\262\276e6\4@mp\242\230\37^{\341\367"
#">\365\203\371\233\216O\315.\306\271B"
#"\253q\365\312\345\363U\275sj\272\360"
#"G\237\371\315\231\371cS3\243\370\326"
#"\345\225\363y\272v\357MeG\252\24"
#"\353#\323<L\351\325\265Lg\262\223\361d\0\210\n\0\\\346\215\204\366:+"
#"\"\4\32\24\0023\0\202\363\f\210\f"
#"\n\220\363\271\360\335G\264s\313\331\372;\31@!2\367,FQPe\201\207"
#"\357\b\373\203+\303k\313]/9\203"
#"\247\346\2\245\3062\313\344\331\23x\307"
#"\241\202@\301B\16c\255\235@\346\205"
#"\1\352\v\0253\271P\251\314\266\272\233\0365(\274>\b \327\251U\2030\3"
#"\221x/a\20\344sJ+D\205\302\220d\f\0\210\20\4A\305\4\"\314\2"
#"Db\35\23\213'!\22\"a\4\6\20@\0V\332\370\241\213\246P\27H\265"
#"w{G\37\255\312\215\231\1\4\301\237\e\3x\26\"q\314\316\263#\266\2363"
#"\"\353\3109\362\344\275\367\316{g\275"
#"s\336:\266\236\234'\347\305{\342\21c\v\320\310\247@Pi\0\30\246r\362"
#"\311\3i\317\252\\\224+-\250\303\2774\341i\344)#>\37\331\341"
#"\b\2\200\348\"g\3319\262\226"
#"\254\343\314\223\265l\35[\313\231\247\314"
) 500
(
#"q\346\310Yv\236\275\367\336\213\365B\304\376\206C2\b \f;6\274\2672"
#"}\264@\226M\253\331\326F\235|\242"
#"\266}\251\323\273\352\215\36\235X\204\205G\25\0B@p\n4\263\0*Dd"
#"\24\4u\275J\300 x\375:\301\f\314@,\314L,D\250@\0\200\31$"
#"\343\356\\|\354\211}\203\275\244\\)"
#"\351\375\17\304&\b\222a:ug\276\361\323$\35\b\0\24B\34\217\25\313\365"
#"\352\213\0\b\b\200\220\260 1\b_o!\2210\213' \17\344\331\263\0203"
#"\21\23\1\23\b\3\210\354\364\270\344\241"
#"W\v\247>Y\315\347B\233\270$I"
#"\365\341\367\217+\245\210$\227\17\357\371"
#"\370\221\356\306\260\265\236\3465\216\347\221"
#"\361\6\276\302H\321DD\210\371\6Q\375\302\242\eA\22O@#Vb \26"
#"!i\3551\34\vo\373\354\341\341\240\3473\212\242\260X*\350}\367\350C7"
#"\337\204\b\n\325\265k\333\a\37\252\205U\244\r\210\206\26Q\201\32]?a4"
#"\232\f \f#\264 \2\276\361\315\4,\300\204\302\3027\20\211Ih\300]\255"
#"'>R\271\375\361\203n\230\225KecL\226\331^\257\257o\377\325Ykm"
#">\237K\223\24QEA\34\214\373\362\335\301@\an\327S\217\f \213\334h"
#"<\260\0\v\n\303\317\27\217\202$?"
#"\317\307\231\244\251d\221Nn\213\36\376"
#"\342\375q\r8\345^wP\256\224\262"
#"\314v\332]\347\34>\366\265[\213\245"
#"\342\352\345\365\353\230\4P(\346\373\375"
#"\301\324\376I\266\260\361\343\335\215\357m"
#"M$\261\37dZDi@\255\20\341\27\37\31\275\"@\340\0040g\314\201B"
#"|2\257g%\314\233R\2768>>vmk;_\310\245if3\253\224\32"
#"\f\206\372\310\a'Z\315\275(\216\264\321\0000"
#"7?\263\261\272\31\307\261Ml\234\213\212\263a\356"
) 186
(
#"D\344\346\261zgu\30\242\212r\16\311\1\v\2022JE\310!r\250|A"
#"\253}\305\3364\301\235\272\366\276\351\211"
#"\373J6H\3420\212\2020\f\203v\273\323\357\r\32243Z\347\3629\245\324"
#"\240?4\271\\\214\b\316yD\f\242`\345\302e\357\2512V\332\335i\256\257"
#"ni\255\347o\232\315*Y\206\331\235O\36o\355\355\241\306v\273W\252\24;"
#"\333\203\3469;6U\ff\263Zu"
#"\334fn\257\321\256\216\215\271\314\31\16"
#"\252\225\361~o\320\334m\205Q\330nu'\247j\265z\25\21\367Z\355~\177"
#"P\251\224\376\37\251\307\277\272\326K9x\0\0\0\0IEND\256B`\202"
) 0 0 22 3 1 #")"
0 0 4 29 1 #"\n"
0 0 22 3 1 #"("
0 0 15 3 6 #"define"
0 0 4 3 1 #" "
0 0 14 3 10 #"grass-look"
0 0 4 3 1 #" "
0 2 29 4 1 #"\0"
2 -1.0 -1.0 0.0 0.0 0 9 500
(
#"\211PNG\r\n\32\n\0\0\0\rIHDR\0\0\0(\0\0\0(\b"
#"\2\0\0\0\3\234/:\0\0\0\6bKGD\0\377\0\377\0\377\240\275\247"
#"\223\0\0\17\267IDATX\205%\227Yo]\327u\307\317\331{\237y\274"
#"\367\334sg^\222\242H\212\32\"Y\36\342!\266\343(\215\v\a\t\320\300-"
#"\222\242c\2\24E\363\220\227~\206~\201\364\245}\353c\201\240\1R#h3"
#"9NjK\261\24\331\262F\222\22\305"
#"\341\362\316\303\231\207\275\317>\273\17\374"
#"\6k\375\327\177\375\326\372\363\337\376\361"
#"F\226\345v\305\204\20\3469^\337X\r\374p1_\372^\20\370\241[w0"
#"&\224\322\376\321\350\325\257\\_\314\227"
#"\252\246\0\0TM\35\364G\313\205\347"
#"\326\235\203\247\307U\307b\214]\270\264"
#"\305q\34\307q\267o~6\354\343\257\277w\3050\215\311xZ\322\322m\324\16"
#"\17\21676\327\2634\333{\362\f\0"
#"\36\26\335\3457\277}\343\323O\356b"
#"\214\213\202\n\202\0 \210\343\4\347\230"
#"\a \211\23\3234\32M\367\302\245\315"
#"\243\303\223\311h\3466\234(\214\a\375"
#"\321\253\257\277d\230:\317so\274\371"
#"J{\245\325l\3251\306\34\307\321\202"
#"\366\326\2737\336}\271\336p\177\376\263"
#"_\225%\5\0L\306\263J\325j4\335\321p\"\313R\34\247\374\17\177\366\326"
#"\a?\375\335\233\357\\;9\36\310\262"
#"\264\276\261\312q\334x4\361\275\240\323m\35<=\264ls2\2321\306\2420"
#"\375\253\357\277\377_\377\371\201\333p."
#"]\271\360\321\257?y\355\315\227\212\202"
#"\206AX\226e\273\333\362\275\340\254cMS\37=\330\245\224nl\2567\32."
#")\212\242(\206\247\243_|p\337\252p\257\277u-\f#H\273SV"
#"\26\355n#\216\23B\212\376\361)\301XU\225\345\334\e\364\307;\227\266"
) 500
(
#"\2420\246\224J\212L0\371\315/\356"
#"\377\345\337~\263\323m-\227^Y\226\207\a\3075\327\21%\261\177<@\bA"
#"\b\31c\34\307\335\374\375\235\232[\205"
#"\20\2\0\3428\211\302(K\363\301\351"
#"\350[\337y\313\264\224\305\334\303\230\240\212c\21R`LTUy\355+\257p"
#"\34\367\351\255?*\212\262\262\332\31\364"
#"G\212\252\254\235\353\335\372\277;\30\223"
#"\252c\275\365\265\313\373{\317\24E)\313RV$J\365\375\335\3E\221w."
#"m-\27^Q\24\20BM\327\4\1\1\b\334F\355l\242g\325t{\355\317"
#"\356|\221\304\311\352\372\n\306\4~\365"
#"\a;\25\307Z\314\227y\216o\376\376"
#"\316\356\343}\216\343\0\340\21\202\215V"
#"\375\227?\277y~\273\327\355\265\303 "
#"|\343\355Wo\337\272\253\e\332\37>"
#"\276G)\31\17\247\272\241\371\313@7\264\3337\277h\266k\204\24Q\30s\34"
#"w\361\312\5\210\240i\32y\216\333\335"
#"\346\352Z\327\256X\375\223!\317s\27.n\r\acI\22\341\366{\25\216\343"
#"\fCw\234\252\357\a\202(@\0\36\337?9\267\331\241\5m\264\252I\234\354"
#"\357\36\\\276\272s\373\346\335\213W\266"
#"\247\223\271\343\332q\224l_<\37E"
#"\361\326\316\306\243\373\373\246\245m]\330"
#"\320u-\317qY2Y\221\26s/\211\223v\267\365t\357\271\357\5\343\321\264"
#"\267\3329\267\271vtp\234$I\377"
#"h\0\257~\247\305q\\\222\244\263\351\3344uJ)\245\24B\3466\234\242("
#"\2?\22D\241,K\204 c\334r\341\361</\bH\226%\0@A\n\303"
#"\324\213\242\20\4T\251\332\363\331\202\322"
#"R\20\20-(\0|\245Z\361\26\336b\261l4\353\204\2203\301}/ \244"
#"p\353U\224e\371r\341\331\25\213\347\371<\307\30"
#"\223\252c{\313p\271\360tCc\214\315\246\213N\267"
) 500
(
#"\351-}\204`\222\244\252\252\30\246\316"
#"\30\v\374\20B\240(\262$\211v\305\3029\236M\27\202 \333\210\343D\226"
#"\245\242(\262,[\314\274\202\24<\0Q\224\20L\fS7-]\226eh]"
#"+l\3334M#\212\342\341\351\4\0\336q\253H\200\201\37\265;-Q\22x"
#"\216\3438NQ\344\300\17\233-7IR\2141\317\363\5)\2?,\212\2\347"
#"\304\363\374\222\226\206iDQ\254\e\32"
#"!D\226\245\247\273\a\226m\"\204\26"
#"3O7\265\202\24\202(\310\262\324\356"
#"\264\372'\3X\271\316\276\364\302\245\361"
#"h\262\377\344\344\312\265\355\316J{\320"
#"\37\236\231s:\231\263\262\f\202(\364CQ\22\275e\220\304I\311JB\nE"
#"UdE\302\230\304q\352\326\2358Jx\36xK_\20\4\0\200(\n\0\0"
#"\3136\3?\304\230l\357\234\217\243D\323U\0@QP\216\343</\0\e["
#"\253\373\273\317\4Qh\264lE\2215"
#"]\3418\216`\262\276\261\232\245\231\357"
#"\5\212\"\213\222\270\230y\232\256\26E"
#"Q\322\3224\215\343\347\375\321`\242(rAH\377xP\322\222\3438V\226\20"
#"\302\311hj\230\6c\314\256Xv\305J\2234\317s\204 \22P\34'\232\256"
#"\216GS\3232\220\256k\b!\0\370"
#"\305\314\27\304\301\305\313\27\30c\265\272"
#"3\32\216\257\277|\2251\346-=\337"
#"\vy\205'\204\344\31v\272\325\361h\252\352j\236\345\246e\3449>\363KQ"
#"\24\315vc4\30;\265\252 \bLa\37\177\364i\273\333\240\264$\244`\214"
#"\1\0\20Bi\232I\262\b!\0y\216\5\1\35=\357k\272\262\261\271\316\363"
#"\334\306\346\272\267\364\313\262|\266\377\374"
#"\360\340x\357\361\301l:7-C\3235Y\221L\313\210\302\364\205\27"
#"\277\304q\334\311\321i\236\345\242("
#"\330\25\253\346:\275\325\256(\211U"
) 500
(
#"\247\362\370\341\236\357\5\246\245\207AD"
#"0\t\3740IR\234\343\242(\0\0005\327\t\374\b\276\370\27\335\323\376p2"
#"\\|\355\3357\21\202\17\357\357\366V;\30c\204P\30D\214\225\222,\372^"
#"\324YiZ\266i\331f\30\306\0\0I\22g\323y\34%\30\223\225\265\316r"
#"\276,\212b1\3674M\235Nf\202 0\30666\327\t!\242$\252\232B"
#"HQ\226\fB\30\205\21\317\363\222,!Q\22\1\0\0\360Y\226\211\242`\331"
#"\346\335\333\367\334F\r\347x1\363^"
#"~\355\32B(\216\222\307\17\2366Z\265\311x\32Gi\315\265w\37\3573\306"
#"DQ \204*\212\\\251\332\20\3010\210\312R(Kv\365\372\3454I\177\377"
#"\341\255\27_\271J)\365\226\276$\211"
#"\315v\243\244\345x4\365\226~o\265\v\257\377y\267 E\325\261\262,\3<"
#"\264l\303[\372\203\3768\216\22\273jV*\326r\341U\252\266[w\262\f\263"
#"\222\251\2722\233.\3430\3039\21\4D\b!\204\344Y^\226\345\215o\274\375"
#"\360\301.\301$\216\342\331tQu\354\321p\322\356\266V\327V\346\363%-h"
#"YR]\327\222$\345y\36*;q\305\251tW\332\264(G\303\311b\356A"
#"\b\352\315\32\307\361\255v]\325\224\375"
#"\335C\273b.\346\36c\245 \212n\335I\223\3240\325z\2636\31\315-["
#"\267,3\n\343\300\v\21\202q\234\30\246\36\206qYR\216\343G\203\251(\t"
#"q\24{\313`t:.\31\303\30\227e\31\4\21|\363\357\267\206\247#\306q"
#"5\327\31\364G\226mlm\237\a\0"
#"\250\252\312q\245,K\214\225\30\223\305"
#"\334c\214-\346\213\247\273\303v\267\266"
#"v\256\207\20\264l]\224d\3136x\236o\264\334\317\357<\334"
#"\330\\\275\376\322\325\203\247\207i"
#"\222\211\222\270ua\343\301\347\273\264"
) 500
(
#"\244\226m\22B,\333\3049\341y\236"
#"\322\22\276\367\243\27G\303\261$Ki"
#"\222b\234\317g\vQ\24\217\17\217W"
#"\327W\346\363\345\275\273{\206\251\204a"
#"bW\214\242\2405\267Zo\332\276\27"
#"Z\266\371\273_\337\257\326\254\343\347\375"
#"4M\335\272#\bH7\264\351d\316q\334\340t\324h\272\353\ek\222,\251"
#"\272R\226%\301$\216\22\b\241$\211\b!\0\0t\277\3145[\215\213\227\267"
#"\237\355\37\"\204\220 M\306\263z\263\1\0<<8RU\265R\265\2238\1"
#"\0LF\363K_\272\300\363`:\236K\22j\264\354$IW\327\333O\36\f"
#"*\216\206\220\0\21\32\364G\252\256\250"
#"\252\322?\36j\272r\347\326=\273j\362\0347<\235\314g\t\340K$\2408"
#"\2127\2677\340\346\2736\307sy\216\31+\25U\221$\311\264LM\223'\343"
#"Y\273\323\270\376\322\345\317\356|\261\261"
#"\271\16\0?8\31W\35k1\367\4\21\t\202`\331\226\353:i\232W\34\325"
#"\367\202\252cU\35\247\331\256s\214\315"
#"\347KI\226\30c\315v\375\213\273{\262\"\22L\266/\255-\346\336r\356k"
#"\272Z\220\2\266\336\20Z\235\346\335O"
#"\357ei\346\326k\222$\316g\213(\212{k]\303\324\217\16\373g\204\201\20"
#"RJ\222$\353\255v}?\4\0\360\200?>\34\250\232\334l\3251&I\222"
#"RZ4\32\365\243\303\23\3232*U\2131\326j7\335\272-J\242S\2534"
#"[\215\347\317\216\335\206Su\354(\212a\373\r\30104LH\325\251,\346\313"
#",\313\274\245oWL\204P\236\343(\214\0@\254\244\202(\214\6\23\335P\203"
#" J\2234\212bQ\24\30\307\332\335\346\331U\365\226~Yr\204\340z\303\235"
#"Mf8'8\307\303\301X\222\2458J\346\323"
#"\371\321\301\tcl\347\322&B\260\352T\340W"
) 500
(
#"\376\356|\236\347I\234\245I\306q\314\367BMWUM-K\372t\357y\315"
#"u\316(\266Xx\242(2\306\342(AH\3408\276dl>]\236\351\266\367"
#"\370\240\335m\245i\3061N\24\3050\214%I\322\ru\330\37SJ\1\340\5"
#"Q\0\0\30\226nW\254\345\302K\323"
#"\fn\376\251]\20\252\250\262\200\20\245"
#"%\22\20c\234(\tY\232\327\\\247(\b!e\232\246Y\232\313\212H\213\302"
#"\2519\263\311\\\3235QD\b\301\252c\207A4\35/\332\335\206$\211H\20"
#"\306\243\261\246iEA8\236o\265\353"
#"W_\270\34\206\21D\360\f\264\336\322\317\262\2141\6\2624/\313\"M2E"
#"UZ\355F\340\205I\234\322\202\16\372"
#"c\204`\236\221,K\355\212\245j2\316\tD(\360\3US\316\376g\335\320"
#"\262,3L\343\374\366j\34%\214\361Q\30\26\204FQ\4\0 \230@\b}"
#"? \230\34>;\241\224J\262D)UU\305\264\f\270\372\216\252\351\332r\341"
#"\305Q\254\351\352x4\243\5].\202k/^\t|\237168\31s\34\227"
#"\245\231\254(\232\246ei\16!\217\20"
#"\342y\16c\222\246y\236\343v\247\31\205!!8\313r\335\320\31+1\306\242"
#"(\0\b\367\236<\5\0tVZ\315v\303[\372\315V]V\344\331t\16\354"
#"\212\305q<\317\363n\243\366l\357P\24\5US$IPT9\317i\226\341"
#"\336z'\n#\b\201\246\251H\200\0p<\317\a^Hi\t\0o\30:\245"
#"t8\230\264\273\315J\325\3468\256,\313\265s\275$Ny\236?9:\325t"
#"\2151\206\20\214\243\30\0\200\4t|t\272v\256\a\233\257#\b\0\22\220e"
#"\31eYRJ\355\212\305\3\376\336\37\37\v\"\f\203\270\325\251"
#"\37\37\16%Y\221\25a4\30\3\b)\245\20A\177\0312\306"
) 500
(
#"\272\275\266$K\207\317\216\252\216\235\347"
#"8I2\234cE\221\355\212\225e\271\252)\206\251K\222T\251\332Q\30\27E"
#"\221ey\24D\233\333\e\360\3747\254\371la\333f\232\244\34\307\373K\37c"
#"\222&\331\225\27\266\363<g\214zK\277R5qNUM\254\272\325(\210\6"
#"}okg=\317RZ0J\251\254\310%+1&\225\252MH\241\e\232\357"
#"\5\224R\0\200\252)\276\27\362\34\307"
#"\363\\\232\244\206\251\317\246\213z\323]"
#"\314\227\360\235\177\270\370\331\355\347a\340"
#"-\346~\30D\365fm6^\352\206\362\326;o\f\6C\267^+\n\312\30"
#"Ws\3554\315q\216k\256\3\0=|v\272\261\265\256j\352\363\247\307n\243"
#"\246\250J\232\246\0\202f\253\316\363\374l:\217\3434M\3230\210\362<W5"
#"\365\321\27{i\232v\272-\216\347\30c\263\311\34!\204^y}+\f\"\306"
#"s\200\347+U\333\251T\226\236\347\326"
#"k\221\37\347\31\3469>\t\223z\323"
#"\35\364\307\232\246<\333?|\353\235/"
#"\337\277\367\30\347X\3214B\230S\253&qb\30\232\357\a8\307\203\323a\24"
#"&\216[)\n\232\304I\253\335\0\20"
#"\230\266^\251\332\206\251\213\222X\24\5"
#"\301\0046_\203\264\244\235V\23\tPU\344\262,EEr\233\356\307\37\335<"
#">\30;\256\5\20hw\e\317\17\372/~\371\205\337\376\357c\313FG\317\373"
#"\3476\327(-\237<\334\333\334^[.\374\222\321+\327.}\374\333[+k"
#"\235A\177\334]m\323\242\3448\326[\355\234e\327n\257%J\242 \n\367\357"
#">\324t5I2\330z\35!\21-\27\236\242*\254d\214\225\244\240\343\341T"
#"\221\305\267\277\376\32\311sQ\225B?\372\306{_{\364`\367\306"
#"\273/lno\234\366\307\0\2\216qU\307RT\235\261\322\260\365"
) 500
(
#"\373w\37l\357\234\337}\274\217\363\2"
#"!\16\343\"\313\363v\247\371l\367(\n\2\247^e\214\371~\240\310r\226e"
#"\206\255\303\213\337r\1\340\1\200\0\0"
#"\0!\317\3\234\347i\232\324\e\356\317"
#"~\362\177\353\233\315\320\217\335\272\373\253"
#"\377\371\210\20\3028\276\336p\206\303\221"
#",\313\264\240\255n;\360<U\223\247\343\305|2?\35L\316\235_3,\335"
#"\262-I\222z\253\235f\263\256\32jo\275\227e9\306D\327\265\262,\335F"
#"\355\360\351\t\2507j\365\272k\230\232"
#"\252*\214\261,\315\220\210.^\271\300"
#"q\334W\377\344\352\177\377\344\276eW"
#"\f\323x\377{\177\366\366\215W\337\271"
#"\361F\247\333\3069\236N\246\212*\377"
#"\356\327\237(\252R\226\234$Ha\204\257]\277(I\342\345+;eY^\274"
#"\264=\35\317\376\375\307\37@\4?\375"
#"\344\356d<C\b\336\276\371yY\226"
#"\237\337\271\37\0061\264\256\2218N\30"
#"c\373O\16$Y\222\25\211\347\370\376"
#"\321\351\323\335\303\27_\271\272\265S\237"
#"Og\303\301\230\340\374\362\225\253\377\366"
#"\257\377q\373\326g?\372\347\37\6\201\27x\201(\vQ\24/f\vZ\322\357"
#"\375\315\373\307G\307\307\207\375\207_\354"
#"\n\242\360\301O\377\360\322\253;\253\347"
#"\234\345\334\v\2038K3LHo\275\263\322\3534Z\365F\313\2057\376\361\262"
#"\242\310\246m\356\\\332J\323\364\336\37w76{\272\241U\35{6\235[\226"
#"u\357\356\243\367\277\373mB\310\207\277"
#"\372\260\333kU\252\346\207\277\374m\24%g[\2041\276|\365\342h0\342\1"
#"{|\177\377\257\177\360\335\325\265\266]"
#"\265\eM\343\341\375'\347\316\257\335\273"
#"\373\350\237~\364}\323\326\5\204|/<z~\242j\212\242(\374W\377\245"
#"a\350Z\377x\370\322\253\327\306\303\t\245t1\367\2624\357\255w\nR\264"
) 98
(
#"\273\255\225^\347\27?\377\315\365\227\257"
#"\336\277\367\350,6bL\fS?:\350C\4\20Bi\222i\272\342\324\252\307"
#"\207\247\0\200\303gIo]\226\25\251"
#"\263\322\352\37\17Z\235\306\240?\212\243"
#"\364\334\371\236\333\250=~\260\267\271}n2\236\375?\24"
#"\252)\356\300\30w\222\0\0\0\0IEND\256B`\202"
) 0 0 22 3 1 #")"
0 0 4 29 1 #"\n"
0 0 22 3 1 #"("
0 0 15 3 6 #"define"
0 0 4 3 1 #" "
0 0 14 3 7 #"sc-size"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 1 #"*"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 11 #"image-width"
0 0 4 3 1 #" "
0 0 14 3 10 #"grass-look"
0 0 22 3 1 #")"
0 0 4 3 1 #" "
0 0 14 3 9 #"num-grass"
0 0 22 3 2 #"))"
0 0 4 29 1 #"\n"
0 0 4 29 1 #"\n"
0 0 17 3 42 #";; Functions for building the grass field:"
0 0 4 29 1 #"\n"
0 0 22 3 1 #"("
0 0 15 3 6 #"define"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 6 #"mt-row"
0 0 4 3 1 #" "
0 0 14 3 8 #"num-left"
0 0 22 3 1 #")"
0 0 4 29 1 #"\n"
0 0 4 3 2 #" "
0 0 22 3 1 #"("
0 0 14 3 5 #"apply"
0 0 4 3 1 #" "
0 0 14 3 6 #"beside"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 9 #"make-list"
0 0 4 3 1 #" "
0 0 14 3 8 #"num-left"
0 0 4 3 1 #" "
0 0 14 3 10 #"grass-look"
0 0 22 3 3 #")))"
0 0 4 29 1 #"\n"
0 0 4 29 1 #"\n"
0 0 22 3 1 #"("
0 0 15 3 6 #"define"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 7 #"make-mt"
0 0 4 3 1 #" "
0 0 14 3 8 #"num-left"
0 0 22 3 1 #")"
0 0 4 29 1 #"\n"
0 0 4 3 2 #" "
0 0 22 3 1 #"("
0 0 14 3 5 #"apply"
0 0 4 3 1 #" "
0 0 14 3 5 #"above"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 9 #"make-list"
0 0 4 3 1 #" "
0 0 14 3 8 #"num-left"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 6 #"mt-row"
0 0 4 3 1 #" "
0 0 14 3 8 #"num-left"
0 0 22 3 4 #"))))"
0 0 4 29 1 #"\n"
0 0 4 29 1 #"\n"
0 0 22 3 1 #"("
0 0 15 3 6 #"define"
0 0 4 3 1 #" "
0 0 14 3 9 #"simple-mt"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 9 #"rectangle"
0 0 4 3 1 #" "
0 0 14 3 7 #"sc-size"
0 0 4 3 1 #" "
0 0 14 3 7 #"sc-size"
0 0 4 3 1 #" "
0 0 19 3 7 #"\"solid\""
0 0 4 3 1 #" "
0 0 19 3 7 #"\"brown\""
0 0 22 3 2 #"))"
0 0 4 29 1 #"\n"
0 0 22 3 1 #"("
0 0 15 3 6 #"define"
0 0 4 3 1 #" "
0 0 14 3 2 #"mt"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 17 #"place-image/align"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 7 #"make-mt"
0 0 4 3 1 #" "
0 0 14 3 9 #"num-grass"
0 0 22 3 1 #")"
0 0 4 3 1 #" "
0 0 20 3 1 #"0"
0 0 4 3 1 #" "
0 0 20 3 1 #"0"
0 0 4 3 1 #" "
0 0 19 3 6 #"\"left\""
0 0 4 3 1 #" "
0 0 19 3 5 #"\"top\""
0 0 4 3 1 #" "
0 0 14 3 9 #"simple-mt"
0 0 22 3 2 #"))"
0 0 4 29 1 #"\n"
0 0 4 29 1 #"\n"
0 0 17 3 11 #";; DATA DEF"
0 0 4 29 1 #"\n"
0 0 22 3 1 #"("
0 0 15 3 13 #"define-struct"
0 0 4 3 1 #" "
0 0 14 3 5 #"world"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 9 #"mole-time"
0 0 22 3 2 #"))"
0 0 4 29 1 #"\n"
0 0 4 29 1 #"\n"
0 0 17 3 11 #";; Example:"
0 0 4 29 1 #"\n"
0 0 22 3 1 #"("
0 0 15 3 6 #"define"
0 0 4 3 1 #" "
0 0 14 3 6 #"ticks1"
0 0 4 3 1 #" "
0 0 20 3 4 #"1000"
0 0 22 3 1 #")"
0 0 4 29 1 #"\n"
0 0 22 3 1 #"("
0 0 15 3 6 #"define"
0 0 4 3 1 #" "
0 0 14 3 6 #"world1"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 10 #"make-world"
0 0 4 3 1 #" "
0 0 14 3 6 #"ticks1"
0 0 22 3 2 #"))"
0 0 4 29 1 #"\n"
0 0 4 29 1 #"\n"
0 0 17 3 16 #";; Tick handler:"
0 0 4 29 1 #"\n"
0 0 22 3 1 #"("
0 0 15 3 6 #"define"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 12 #"update-world"
0 0 4 3 1 #" "
0 0 14 3 3 #"wrl"
0 0 22 3 1 #")"
0 0 4 29 1 #"\n"
0 0 4 3 2 #" "
0 0 22 3 1 #"("
0 0 14 3 10 #"make-world"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 4 #"sub1"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 15 #"world-mole-time"
0 0 4 3 1 #" "
0 0 14 3 3 #"wrl"
0 0 22 3 4 #"))))"
0 0 4 29 1 #"\n"
0 0 4 29 1 #"\n"
0 0 17 3 16 #";; Draw handler:"
0 0 4 29 1 #"\n"
0 0 22 3 1 #"("
0 0 15 3 6 #"define"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 13 #"render-rotate"
0 0 4 3 1 #" "
0 0 14 3 3 #"wrl"
0 0 22 3 1 #")"
0 0 4 29 1 #"\n"
0 0 4 3 2 #" "
0 0 22 3 1 #"("
0 0 14 3 6 #"rotate"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 1 #"*"
0 0 4 3 1 #" "
0 0 20 3 2 #"45"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 6 #"modulo"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 15 #"world-mole-time"
0 0 4 3 1 #" "
0 0 14 3 3 #"wrl"
0 0 22 3 1 #")"
0 0 4 3 1 #" "
0 0 20 3 1 #"4"
0 0 22 3 2 #"))"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 6 #"render"
0 0 4 3 1 #" "
0 0 14 3 3 #"wrl"
0 0 22 3 3 #")))"
0 0 4 29 1 #"\n"
0 0 4 29 1 #"\n"
0 0 22 3 1 #"("
0 0 15 3 6 #"define"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 6 #"render"
0 0 4 3 1 #" "
0 0 14 3 3 #"wrl"
0 0 22 3 1 #")"
0 0 4 29 1 #"\n"
0 0 4 3 2 #" "
0 0 22 3 1 #"("
0 0 15 3 6 #"define"
0 0 4 3 1 #" "
0 0 14 3 1 #"t"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 15 #"world-mole-time"
0 0 4 3 1 #" "
0 0 14 3 3 #"wrl"
0 0 22 3 2 #"))"
0 0 4 29 1 #"\n"
0 0 4 3 2 #" "
0 0 22 3 1 #"("
0 0 14 3 11 #"place-image"
0 0 4 3 1 #" "
0 0 14 3 9 #"mole-look"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 1 #"-"
0 0 4 3 1 #" "
0 0 14 3 6 #"ticks1"
0 0 4 3 1 #" "
0 0 14 3 1 #"t"
0 0 22 3 1 #")"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 1 #"-"
0 0 4 3 1 #" "
0 0 14 3 6 #"ticks1"
0 0 4 3 1 #" "
0 0 14 3 1 #"t"
0 0 22 3 1 #")"
0 0 4 3 1 #" "
0 0 14 3 2 #"mt"
0 0 22 3 2 #"))"
0 0 4 29 1 #"\n"
0 0 4 29 1 #"\n"
0 0 17 3 14 #";; final-state"
0 0 4 29 1 #"\n"
0 0 22 3 1 #"("
0 0 15 3 6 #"define"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 4 #"main"
0 0 4 3 1 #" "
0 0 14 3 3 #"cmd"
0 0 22 3 1 #")"
0 0 4 29 1 #"\n"
0 0 4 3 2 #" "
0 0 22 3 1 #"("
0 0 15 3 6 #"define"
0 0 4 3 1 #" "
0 0 14 3 4 #"yes?"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 4 #"read"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 17 #"open-input-string"
0 0 4 3 1 #" "
0 0 14 3 3 #"cmd"
0 0 22 3 3 #")))"
0 0 4 29 1 #"\n"
0 0 4 3 2 #" "
0 0 22 3 1 #"("
0 0 14 3 6 #"printf"
0 0 4 3 1 #" "
0 0 19 3 11 #"\"recording?"
0 0 19 3 6 #" ~a\\n\""
0 0 4 3 1 #" "
0 0 14 3 4 #"yes?"
0 0 22 3 1 #")"
0 0 4 29 1 #"\n"
0 0 4 3 2 #" "
0 0 22 3 1 #"("
0 0 14 3 15 #"collect-garbage"
0 0 22 3 1 #")"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 15 #"collect-garbage"
0 0 22 3 1 #")"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 15 #"collect-garbage"
0 0 22 3 1 #")"
0 0 4 29 1 #"\n"
0 0 4 3 2 #" "
0 0 22 3 1 #"("
0 0 14 3 4 #"time"
0 0 4 29 1 #"\n"
0 0 4 3 3 #" "
0 0 22 3 1 #"("
0 0 14 3 8 #"big-bang"
0 0 4 3 1 #" "
0 0 14 3 6 #"world1"
0 0 4 29 1 #"\n"
0 0 4 3 13 #" "
0 0 22 3 1 #"("
0 0 14 3 7 #"on-tick"
0 0 4 3 1 #" "
0 0 14 3 12 #"update-world"
0 0 4 3 1 #" "
0 0 20 3 5 #"1/100"
0 0 22 3 1 #")"
0 0 4 29 1 #"\n"
0 0 4 3 13 #" "
0 0 22 3 1 #"("
0 0 14 3 9 #"stop-when"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 15 3 6 #"lambda"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 1 #"w"
0 0 22 3 1 #")"
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 2 #"<="
0 0 4 3 1 #" "
0 0 22 3 1 #"("
0 0 14 3 15 #"world-mole-time"
0 0 4 3 1 #" "
0 0 14 3 1 #"w"
0 0 22 3 1 #")"
0 0 4 3 1 #" "
0 0 20 3 1 #"0"
0 0 22 3 3 #")))"
0 0 4 29 1 #"\n"
0 0 4 3 13 #" "
0 0 22 3 1 #"("
0 0 14 3 7 #"record?"
0 0 4 3 1 #" "
0 0 14 3 4 #"yes?"
0 0 22 3 1 #")"
0 0 4 29 1 #"\n"
0 0 4 3 13 #" "
0 0 22 3 1 #"("
0 0 14 3 7 #"on-draw"
0 0 4 3 1 #" "
0 0 14 3 6 #"render"
0 0 22 3 4 #"))))"
0 0 4 29 1 #"\n"
0 0 4 29 1 #"\n"
0 0 17 3 24 #";; -- run program run --"
0 0 4 29 1 #"\n"
0 0 22 3 1 #"("
0 0 14 3 4 #"main"
0 0 4 3 1 #" "
0 0 19 3 8 #"\"#false\""
0 0 22 3 1 #")"
0 0