#reader(lib"read.ss""wxme")WXME0108 ## #| This file is in PLT Scheme editor format. Open this file in DrScheme version 370 or later to read it. Most likely, it was created by saving a program in DrScheme, and it probably contains a program with non-text elements (such as images or comment boxes). http://www.plt-scheme.org |# 28 7 #"wxtext\0" 3 1 6 #"wxtab\0" 1 1 8 #"wxmedia\0" 4 1 8 #"wximage\0" 2 0 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 33 #"(lib \"bullet-snip.ss\" \"browser\")\0" 0 0 29 #"drscheme:bindings-snipclass%\0" 1 0 36 #"(lib \"cache-image-snip.ss\" \"mrlib\")\0" 1 0 22 #"drscheme:lambda-snip%\0" 1 0 56 ( #"(lib \"hrule-snip.ss\" \"macro-debugger\" \"syntax-browse" #"r\")\0" ) 1 0 18 #"java-comment-box%\0" 1 0 23 #"java-interactions-box%\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" 00000000000 1 100 0 1 #"\0" 0 75 1 #"\0" 0 11 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 11 #" Monospace\0" 0 11 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 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 -1 -1 93 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 255 0 0 0 0 0 -1 -1 2 15 #"text:ports err\0" 0 -1 1 #"\0" 1 0 -1 -1 93 -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 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 92 -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 27 #"Matching Parenthesis Style\0" 0 -1 1 #"\0" 1 0 92 -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 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 1 #"\0" 0 -1 1 #"\0" 1 0 92 -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 92 -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 224 0 0 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 224 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 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 14 #"Html Standard\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 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 #"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 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 #"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 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 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 139 0 139 0 0 0 -1 -1 2 37 #"profj:syntax-colors:scheme:prim-type\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 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 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 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 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 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 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 139 0 139 0 0 0 -1 -1 4 1 #"\0" 0 70 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 4 4 #"XML\0" 0 70 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 8 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 8 24 #"drscheme:text:ports err\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 0 1 #"\0" 0 75 1 #"\0" 0 10 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 1 #"\0" 0 75 12 #"Courier New\0" 0 16 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 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 168 0 0 0 0 0 -1 -1 4 1 #"\0" 0 71 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 4 1 #"\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 -1 -1 -1 1 0 0 0 0 0 0 0 0 1 1 1 0 0 255 0 0 0 -1 -1 4 1 #"\0" 0 71 1 #"\0" 1 0 -1 -1 -1 -1 -1 -1 1 0 0 0 0 0 0 0 0 1 1 1 0 0 255 0 0 0 -1 -1 4 1 #"\0" 0 71 1 #"\0" 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 100 0 0 0 0 -1 -1 2 1 #"\0" 0 71 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 1 #"\0" 0 71 1 #"\0" 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 100 0 0 0 0 -1 -1 0 1 #"\0" 0 75 11 #" Monospace\0" 0 11 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 23 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 16 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 4 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 14 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 21 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 23 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 14 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 4 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 21 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 4 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 0 0 0 255 255 255 -1 -1 23 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 0 0 0 255 255 255 -1 -1 16 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 0 0 0 255 255 255 -1 -1 14 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 0 0 0 255 255 255 -1 -1 21 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 0 0 0 255 255 255 -1 -1 4 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 178 34 34 255 255 255 -1 -1 16 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 28 1 #"\0" 0 70 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 28 1 #"\0" 0 70 1 #"\0" 2 0 92 -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 28 1 #"\0" 0 70 1 #"\0" 1 0 92 -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 28 1 #"\0" 0 70 1 #"\0" 1 0 92 -1 -1 -1 -1 -1 1 0 0 0 0 0 0 0 0 1 1 1 0 0 255 0 0 0 -1 -1 28 1 #"\0" 0 70 1 #"\0" 1 0 -1 -1 -1 -1 -1 -1 1 0 0 0 0 0 0 0 0 1 1 1 0 0 255 0 0 0 -1 -1 28 1 #"\0" 0 70 1 #"\0" 1 0 92 -1 -1 -1 -1 -1 1 0 0 0 0 0 0 0 0 1 1 1 34 139 34 0 0 0 -1 -1 28 1 #"\0" 0 70 1 #"\0" 1 0 -1 -1 93 -1 -1 -1 0 0 0 0 0 0 1 1 1 1 1 1 0 0 0 0 0 0 -1 -1 28 1 #"\0" 0 70 1 #"\0" 1.5 0 92 -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 28 1 #"\0" 0 -1 1 #"\0" 1.5 0 92 -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 28 1 #"\0" 0 70 1 #"\0" 1.5 0 92 -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 28 1 #"\0" 0 70 1 #"\0" 1.2 0 92 -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 28 1 #"\0" 0 75 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 28 1 #"\0" 0 75 1 #"\0" 1 0 -1 -1 93 -1 -1 -1 0 0 0 0 0 0 1 1 1 1 1 1 0 0 0 0 0 0 -1 -1 28 1 #"\0" 0 75 1 #"\0" 1 0 -1 -1 -1 -1 -1 -1 1 0 0 0 0 0 0 0 0 1 1 1 0 0 255 0 0 0 -1 -1 28 1 #"\0" 0 75 1 #"\0" 1 0 92 -1 -1 -1 -1 -1 1 0 0 0 0 0 0 0 0 1 1 1 0 0 255 0 0 0 -1 -1 20 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 25 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 25 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 20 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 0 0 0 255 255 255 -1 -1 25 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 0 0 0 255 255 255 -1 -1 25 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 178 34 34 255 255 255 -1 -1 18 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 0 0 0 255 255 255 -1 -1 18 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 20 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 00000000002 0 00000000000 3 00000000000 806 0 18 3 85 ( #";; The first three lines of this file were inserted by DrScheme. Th" #"ey record metadata" ) 0 0 69 29 1 #"\n" 0 0 18 3 85 ( #";; about the language level of this file in a form that our tools c" #"an easily process." ) 0 0 69 29 1 #"\n" 0 0 25 3 7 #"#reader" 0 0 23 3 1 #"(" 0 0 14 3 3 #"lib" 0 0 69 3 1 #" " 0 0 20 3 29 #"\"htdp-intermediate-reader.ss\"" 0 0 69 3 1 #" " 0 0 20 3 6 #"\"lang\"" 0 0 23 3 3 #")((" 0 0 14 3 7 #"modname" 0 0 69 3 1 #" " 0 0 14 3 8 #"kangaroo" 0 0 23 3 1 #")" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 19 #"read-case-sensitive" 0 0 69 3 1 #" " 0 0 21 3 2 #"#t" 0 0 23 3 1 #")" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 10 #"teachpacks" 0 0 69 3 1 #" " 0 0 23 3 2 #"((" 0 0 14 3 3 #"lib" 0 0 69 3 1 #" " 0 0 20 3 10 #"\"world.ss\"" 0 0 69 3 1 #" " 0 0 20 3 11 #"\"teachpack\"" 0 0 69 3 1 #" " 0 0 20 3 6 #"\"htdp\"" 0 0 23 3 3 #")))" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 13 #"htdp-settings" 0 0 69 3 1 #" " 0 0 23 3 3 #"#8(" 0 0 21 3 2 #"#t" 0 0 69 3 1 #" " 0 0 14 3 11 #"constructor" 0 0 69 3 1 #" " 0 0 14 3 17 #"repeating-decimal" 0 0 69 3 1 #" " 0 0 21 3 2 #"#f" 0 0 69 3 1 #" " 0 0 21 3 2 #"#t" 0 0 69 3 1 #" " 0 0 14 3 4 #"none" 0 0 69 3 1 #" " 0 0 21 3 2 #"#f" 0 0 69 3 1 #" " 0 0 23 3 2 #"((" 0 0 14 3 3 #"lib" 0 0 69 3 1 #" " 0 0 20 3 10 #"\"world.ss\"" 0 0 69 3 1 #" " 0 0 20 3 11 #"\"teachpack\"" 0 0 69 3 1 #" " 0 0 20 3 6 #"\"htdp\"" 0 0 23 3 5 #")))))" 0 0 69 29 1 #"\n" 0 0 18 3 43 #";; ****************************************" 0 0 69 29 1 #"\n" 0 0 18 3 25 #";; * Csu 211 : 1/31/2008" 0 0 69 29 1 #"\n" 0 0 18 3 22 #";; * Lecture #10 Code" 0 0 69 29 1 #"\n" 0 0 18 3 26 #";; * Some Game Structures" 0 0 69 29 1 #"\n" 0 0 18 3 43 #";; ****************************************" 0 0 69 29 1 #"\n" 0 0 69 29 1 #"\n" 0 0 69 29 1 #"\n" 0 0 18 3 52 #";; A World is (make-world Number Number Posn Number)" 0 0 69 29 1 #"\n" 0 0 18 3 42 #";; pic is the number of the animated Roo" 0 0 69 29 1 #"\n" 0 0 18 3 26 #";; and x is it's x coord" 0 0 69 29 1 #"\n" 0 0 23 3 1 #"(" 0 0 16 3 13 #"define-struct" 0 0 69 3 1 #" " 0 0 14 3 5 #"world" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 3 #"pic" 0 0 69 3 1 #" " 0 0 14 3 1 #"x" 0 0 69 3 1 #" " 0 0 14 3 4 #"targ" 0 0 69 3 1 #" " 0 0 14 3 3 #"scr" 0 0 23 3 2 #"))" 0 0 69 29 1 #"\n" 0 0 69 29 1 #"\n" 0 0 69 29 1 #"\n" 0 0 18 3 25 #";; image: Number -> Image" 0 0 69 29 1 #"\n" 0 0 18 3 50 #";; Return the correct 'frame' for the given number" 0 0 69 29 1 #"\n" 0 0 23 3 1 #"(" 0 0 16 3 6 #"define" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 5 #"image" 0 0 69 3 1 #" " 0 0 14 3 1 #"n" 0 0 23 3 1 #")" 0 0 69 29 1 #"\n" 0 0 69 3 2 #" " 0 0 23 3 1 #"(" 0 0 16 3 4 #"cond" 0 0 69 3 1 #" " 0 0 23 3 2 #"[(" 0 0 14 3 1 #"=" 0 0 69 3 1 #" " 0 0 14 3 1 #"n" 0 0 69 3 1 #" " 0 0 21 3 1 #"0" 0 0 23 3 1 #")" 0 0 69 3 1 #" " 0 3 00000000019 69 1 #"\0" 2 -1 -1 0 0 0 00000000004 500 ( #"\211PNG\r\n\32\n\0\0\0\rIHDR\0\0\0\205\0\0\0I\b\2\0\0" #"\0\234\222r\244\0\0\a\16IDATx\234\355\233Kl\eU\24\206\317\275" #"3c\317\214_\261\235\332N\232\304i\23P\203*J\v4\245\240\"\332" #"\5 \1m\5\345Q\36B 6\b\tT$(\22\202\260\0\361Z Q\244\26" #"\t(\210J\5!!\26,\200\"\204@@\213\240\205\24JQ\222:" #"\315\323\211\35'\35;\343\31{\346\2620\2044\17?\307\365\35w\276" #"UT\251\366\321|\372\3179\367\332F\204\20\260\240\6\\\353\2," #"\316\303\362A\27\226\17\272\260|\320\205\345\203.,\37ta\371\240" #"\v\313\a]X>\350\302\362A\27\226\17\272\260|\320\205\345" #"\203.,\37ta\371\240\v\313\a]X>\350\2025\352\205~}:\230\373c" #"\303+Q\243^\363\"\304\230|\314\311X\360\267E\251\30\337\257" #"\254|T\202\1>\254@\30H\245\363c\201\214\202\341\310\234;GR\251" #"^m\2647y\262\221o\f\361\301\225\256\226\240\30\300\310\332,\0" #"*\361\2618\26Eu\252C\a\207?|\351\201g\375\243.\25\b\0\311\266" #"\342\25\233\370\2536\270\326]\346]\273\301\273\316\3119\313." #"\251\16@\345}\377j\271\36UP\211\332\337\367\356\301g^\274c\202" #"C\214Dd\242g1h\230\20\320UEW\333\301\377D\323c\327\373\267\204\305" #"V\4\250\214\302\314N9>\362\f\214b\"\222\230M\334\377\375C\307" #"\334gU.CX\316ms\331t.\251'Y\226h\210\5%\25@\366;\305\35\3674" #"\335\331\341X]jmf\247\344\256]\371\364\366\212\336w6\355\337*" #"\255A)U\226&\345\330\344\2244\342\262\t.\261\301\206\220M\260'=" #"\334o\334\e\37M\355\222\365\211\n\337\313t\224\220\217bL" ) 500 ( #"\24\277\354J\262t\340\304\201\17\324OQ\243\227\315\246\207g\6" #"\244T*\264j\225\307\27\0222CO\206N\205\1\261h\215\27\36Y\0017" #"\213\270\r.\216\366U\263\255\306%\270\366t\357\331\232\356\36" #"\214\34\217L\237U\224,'\n\321\341\3613\375\275\327\260\23\215X" #"\0\334\230E\3q\275\247O\3371\240\275\230\324O\21\320kU\355\5" #"\303`\37%u\263#C\337|\233\372&9:=;\21\313\260\254M\24\3m\341" #"\326\200\177\263o\212\321U\4N\236t\221t\260o 4\243\357\353\327vG" #"\264\347$r\262\276\255\224<\317\215\352Z:\321\37\375\375\211\317" #"\265c*J'#Qej\6\32x1\324\330\342\201\275m\221vg\26\21\206U=\323" #"\375w\37\353\277\272\315\366C\32\305\257\331\372=f\3N\262\315" #"\3\2675\340M\f\22J\252\334\24\224\271\357\346(\350&\217\30B" #"\310\363\277\276\360\246|HE\234\303\331\200\344Yet\"\231\232v\370" #"\354;\354\374\316n\305!\312L\212\377\345\223]v|\211\3028\273" #"\231~\377\354\317\375+UG\207\346\v\216\331\334\353\233\310\343" #"\r\350:\214\354e\327O!\25\371\200\312\326\2558\203?h\266\35" #"\t\302l\200\347|n\221\23@IKc1\220S\327\212\235\333Zf;\303\343X" #"\322\245\201{\246\3076z\6\377t\237\376\373\217\326\244\204\205" #"\333\357:\211:\306Y\20XX\327L^u\341\313\353f\332\327\322G\2168" #"\213\277v\301{a\373l\230\367\270W\260\34\a\272\222Vcr<\32\216" #"\333o\b\3727v(\261\223\316\366fQ\352\353\374\375t\b\216\306\356" #"{(\306\335r\2@\316\202\206\241\265\225|\350\306\227WX\6%\324" #"\336G\216w:\205\317\235\232_\325\3164\363\356\246\240\215e\262,#+C" #"\351x\"4h\333\334\354\270i\275\22" ) 500 ( #"t$\270\304\252\344\210\337\321|\302\25B\30x\0\242\1\16\221\367" #"\3\370FC\312\2509\225\372\0\203\224\fz\205s<{\345L\352K\273\360" #"\266\26\35\333\262\322\353k{\360\250\203oR\336n\351KHQ_\204\335" #"\26\360\356\336\310z\204A\304e0\260\204\350@8\204V\267\223\217\334" #"xm\3455\320\0-\267\252\366\264.\310\31\226\350\267Lf\366}\241fc" #"\361D\374\354PP\21\372\322\255\321K=M\3533k\233?s'\216|\341\351P" #"\177t\234\355\3422+\1\\,\272\244Q{\332\205\273j]\276a\30" #"\220\0170\"\"\242\0\247\4~\f3\302\231l`8\266\343q?\226T\335" #"\316:\5N\346\31l\343]\254\203$b\37\37Nu\215`\327\303\257" #"\333o\335.\303(\3\16\0017\327\3150\a\3??\257\4Q\0\0\350" #"\222\323]\0#-\314\376\216\6\20\262\232\235_-\261{\216i\303NM" #"\266e~\302\343\333%\256S\5\367tl\362\207\247\332\266\337\353\204K" #"k]\270\361\30\223\17\250 \"\342\242S\335q\247\375\276n\r" #"\261\334\316Q\356\265^5\367\217:\0\6 \4\230iE\367\376{\346h" #"\357\31,\267^J1l~\224\367\261\371b\31\0\320g\317@\226 B&\347" #"\35\365r\205\"\4s2\0 \322\23.\343Mi\306\310y^\252\222%e" #"\20\200\237E\215d5\244\352\31(\234\335HO\270\236\254\30\274_mx%Z" #"\244\225%e\0\300w\210|\325\220\306@\262l\306\227)vP\327\215\222\252" #"\354\273\5\225,'\3\0\24\0013\230\1lC\200\256\230*aq\252\17%" #"\206\315\363\305,7\341\363\310\3101\3122\207\233l\275>\374\326\37" #"\304\227-\355v\335\354\23\276Z>\312\2261\a\1\20\200/\365}\315" #"\356\343B\234?\346\332\327_=%\354\304\345\235\361" ) 363 ( #"\"=aS+\251J>\346\207c\361,)\336\n_z>r\230W\211\361\363<\277\f" #"\0X\323\23]\323Sx\a+[\206\251\251\331}b\316\312rb*\224a" #"\336]\253\366\367W\27g\16\226\243\212\371\250\345\17\17x\210" #"\274l\312\210T\321G\2217\214\306\317\336\377\362fF%U\374=\216(\224" #"\266\340\32\203\311\233_\265\366\335\371\347\276b\266\251R'\360" #"\374T\375\377\177\27\311h\337k\262\305\267\212\367%\363\303a\254" #"\222%[\334r\335\311\\J\2528?\212q` \313=wsM\221*\346\243\f" #"\212\211H\376\371o\366\224\320\345\3\212\356Zy\254\230Z\tu>\346" #"((\246T%\226\17c\310#\246\376\224\230\300\307\34\v\305\360\0y" #"\37\261\31\225\320\362\375\304b8/\rE\34\302\227|\364\224\257" #"[f\362\1sJ\316?\367\325\223\0223\365\253\371,~\246\365\321\270" #"\352\307G\16\263[1Y\277\232\243\214\323\270)z\227Y}\224\307rJ" #"\350\261Bu\277\312sq\233\207\202-(\377\323\317]L\ak\324\307" #"\350\365Q%\31\377\277\376RV\26|;\354\302[\251\375\347\347\5(" #"NF\31c\271}\357\340\2%4\374\234\235\336|\\0rV\26\313\250I\313" #"\262|\320\305?\373\350\362;\bF\31k\0\0\0\0IEND\256B`\202" ) 0 0 23 3 1 #"]" 0 0 69 29 1 #"\n" 0 0 69 3 8 #" " 0 0 23 3 2 #"[(" 0 0 14 3 1 #"=" 0 0 69 3 1 #" " 0 0 14 3 1 #"n" 0 0 69 3 1 #" " 0 0 21 3 1 #"1" 0 0 23 3 1 #")" 0 0 69 3 1 #" " 0 3 00000000019 69 1 #"\0" 2 -1 -1 0 0 0 00000000004 500 ( #"\211PNG\r\n\32\n\0\0\0\rIHDR\0\0\0\205\0\0\0I\b\2\0\0" #"\0\234\222r\244\0\0\aoIDATx\234\355\233Kl\e\307\31\200\377\231" #"\335\235}\360\375\220\250\207eI\226\344W\320\227\340\4\210\35" #"\27\1\02249DE\323\26E\221\233o9\344qt.\1t*l \227\264@Q\344" #"\322k\201\276\362D\22\344\346\4p\333\24v\332\330\t\235\304" #"\261UK\262i\211\21\305\307.\311\335\231\351\201\6\243P\24\271" #"\\>\264\273\346w\22\210%\371k\276\371\347\377gv\2118\3470\3045" #"\340\375\16`\310w\350\300\307\245\263\251KgS\375\ve\b\330\367Q" #"71T\322W\206\353\225\273\260\345c\230\23\3\243\357\371\301a\330" #"\277u\200\330\247\317\245@\267\215m@\3008\227\5\22\220\2UZ\5" #"\4\4\23\214\206\213\344\236\240\326\373\217\275V\252\305\363" #"\231=\337cYfv\363\323\365\317/*\351-\232\343\214\e\\O\221\321" #"\tm2$\205\27\302s!1D\4\22\225\"]\206\356KZ\345\207" #"\303\262\261r#\367\332\357\336\325.\237\377Y\211U\f\4(\212\345" #"\242Y\225\vB\2k_\255\335\371\251r\352\321\310\351yenA\233\eW'" #"TAq\30\273\37\331\323\207\363\32>6A\237\\*\255\2274\364\245$" #"\aKP\256`1\210C\214ZYLG\304\311\v\374\353O\n\327-]_*\235" #"\370u\374\347'#O9\374\"?\322\334GW\r\225\246%N\236\376\345FB" #"\272\373\366\337+\37l\212yL\1\t\232BT\225\4@\0\31q*\210\323" #"ri\214\374\245D\376\3755|\34\204\a5\230\225aR\202\20\200\340" #"\374\253\275Oc\375\260iBS\341\350\362\336%\4\200q\266\226[{" #"\343\306[\177\315\275\371\tYI\4G03\267\362\267+\324\324b#" #"\262" ) 500 ( #"\246<\236\330\374U<;&`\306\303\2\235\227\330\221 9\34\200\37" #"\310\245\360Y\202\222\22\304" #"\1P\347\377\240\307h\364\261x>\323b\311j\310\214\266JLf^\315" #"\177~1\374\251*\215\232z\331\314\344*w\231\30\313\243 \374\223\t" #"\311\24\36\211\32\272\311\266\267K\252\2363\330\302A\2327\336" #"\313\337\206\333\231\3\342\354\302\225\251\37\275_Q>\220\321\367" #"\25X\214\301O4\230\366}ui\263\377\200\35\25\305\3162\265\233W" #"\347\264?\315+\\\0220\23E\206X\261X5t\16\326\30\300\351H\350" #"\304\270z R\262\f\301\274{\334\310=\3147P$\233^\335\220n\24" #"\371\3\311\354c\317\254\224g\376\a\300(\247\1\364\374\4\177" #"AF#N\202\360\16\355}\0\300\245\263)g2\0\340\vMx#)\374+\214\213" #"\21\245\30W\261\242\212\214\263\212\245\27\nA \252X\210V\n" #"\363a\361XX\v\347\305(&3\243\240o\305\327\256$\23\302\355\371" #"\307\257\vI\vq\314\221\245\300\231q\376b\0\315:\214\303#\330" #"\252\37\216e\0\300!\235\236Yc\2476\320]b^\b\226\3761A" #"\254\250&\22926\212D\313\242\332z9T\330\326?\333,\a\252\346\221" #"\321\342W\233\346\17\23[\213O" ) 500 ( #"W\220@\31\331B\0\0\2p,\303\202\204\302\316\343\360\b\266\362" #"\3\0\322\313=8\342\315\20\364\207\203\352*\342\207*\354J\234d" #"\25\301\230\b%\204\370\351/, \345\267\247\326\365R)U\22\347#" #"\350\31I{\364\360\363\206\371:\204&\30\n\22>\233@Oi\350\b" #"\6\251\3730\334L\277\316\23\233\22\243\360\213M\310Sx\260H\257" #"^3\376V\330xw))\204,\265<\36\313\363\3\201c\253S\205\234Q\274" #"X\330\\zOB\253\277\225b\205\361\337\374\271\212\262\4\245$\210" #"\0162\324\375\302n~@/R\304D(+IyA\b\233\326\344-\363\2779\375\345'" #"\224\364\214zP\227C\234\256\307\20\307\262b\242\205L\351\225\367" #"\213\307o\226\263\307d=yo\306\264\357\255}A\a>\240'J\0006\210\264" #"\r\230g\351\177P\365\217'\361\2551\351\3007\350\351uv\270\0E\202" #"\21G\223\6=\2211\303\5\323\210\bf\360\333\6\367~P2\320\365" #"\n\0$\200\321\2529\1\300Cp'\250\232\1\212Ea\\\220\226\266" #"\364)\203V\1\0\200\0@\30\345C\4}w\252\324f\203\277\255tv@\324" #"\223\261\250M\1\4p\254J\343\25@&\333TxQ\4\0 5\31p\357\n" #"\336,\272\364r\252'\315\205;\351\370\300\256W\323\223\3l\t\26T" #"-f\261\"\242\327C\235m\274o\236\233\276yn\272'\221\270\n'\a" #"\250=Q\3028\\\23\331\212T\5f!\306\nb\a>\24\345\336-," #"\377)qx\240}t9\323\245\225m\16\227eV\0260 \254Q\30)3\233o\254\313" #"\250\3413%\235\365WMq\266\232\227\21\244e\270\34\306\37\246\310" #"!\3\316\254V'\355)i\360Qc\346\245\25\a1\270\220\36\370\250" #"\323\251\30\nP\301\350\226,\210\300\247\313T\264\21HS" ) 460 ( #"\0315\374\241d?o\300\t\0\32\343G\fk\316\350V\6\370e\341\362" #"\314\r\321\3262j\370@I\277\366\203;\253}\367\333\5;2j\334<7\355" #"\351\205k\20\371\321e3\266S\306\314K+m\207\333\323Y\322G\37\r" #"\eigJ\32d\324\377hm\305\273J\372\345\243\351\32\325\251\222\246" #"2Z\274\262\23\217*qo=o-\243\376z\v+^T2h\0376S\304\216\f;xNI" #"/}\354\36\353\246\243\337VI\247'\"~Z\270z\271?\257a\363.\305^" #"M\360^\255\255\235,i1\364^i\202{\357\303>\273\225\264\336g" #"\334\17J\366\323G\215\272\25;\233>\337+\331\177\0375\322\313)\233" #"\233p\177+q\213\217\6Z\27\341.\225\330\374\204}\301\245>\352t3" #"\323\275\250\304\355>j\330\351Y\233\216o\227\275\362\340\361\206" #"\217\32\216\a\327\261\316\301\343%\37\320g%\r\324\36\"O" #"\r\326\223{\317\257\232\342x\26\3339\250\337I\375\211\376\314`" #"\267\367\36\363\1-\225\264\35\361N\255\f\236A?/\332?\354\17t" #"\375\312\275\26\261.~\356\322-\36\253\37uv\17e\227\23\277\376" #"\201;e\f\270x\200G}\364\\\206{\360^\375\200]\243\357\e" #"\31\340Q\37;\363\303O2\300\243>|\314\320\207\273\30\372p\27C" #"\37\356b\350\303]x\336\207\267\36\37i\213'}\370\254\307\335" #"\211'}4\340\247\337vz\325\307\356\24\361\207\22\257\372\360+\36" #"\366\341\313*\342\311\363\335\6j+\225?\364\370\301\207\237\360" #"\360z\345K\206>\334\305\320\207\273\30\372p\27C\37\356\342\3771" #"\347\31\224\245\327Yd\0\0\0\0IEND\256B`\202" ) 0 0 23 3 1 #"]" 0 0 69 29 1 #"\n" 0 0 69 3 8 #" " 0 0 23 3 2 #"[(" 0 0 14 3 1 #"=" 0 0 69 3 1 #" " 0 0 14 3 1 #"n" 0 0 69 3 1 #" " 0 0 21 3 1 #"2" 0 0 23 3 1 #")" 0 0 69 3 1 #" " 0 3 00000000019 69 1 #"\0" 2 -1 -1 0 0 0 00000000004 500 ( #"\211PNG\r\n\32\n\0\0\0\rIHDR\0\0\0\205\0\0\0I\b\2\0\0" #"\0\234\222r\244\0\0\a.IDATx\234\355\232Ol#W\35\307\177\357\317" #"\274\31\217\355\330\336\365\237\374\333uv\333mR\272\354!\\" #"\26\20p\340\0tW\2$\340\304\245\247\252U\245\36z\330\236\252" #"\34\333\36\221*\304\245 \16\34\340\202\200\n\250h\267UU\t" #"\20DZ\322\252\201\3566\331\244\233\3404\361\237\330\361\374}\363z" #"\360b\2058v\374gl\277\231\344s\21323y\363>\376\376~\357=\a\t" #"!\340\fi\300\343\36\300\31\377\307\231\17\2718\363!\27g" #">\344\342\314\207\\\f\335\307\362\255\334\362\255\334\260\377Jh" #"\30\256\217\246\2113%]B\307=\200\243x\302\3\0\204\20\0024" #"\356\261\214\201!\3728\234\211\305W\n\235/\26 \n\a;\an" #"\315\346\16A8\241%\271\347\326\271\221RS\32\321\20\200F4\214\302" #"\337\355\320\220\366\347\255\5\252\223\222r\371?\367V~\257\374c" #"\235o\330\236\375\300\335Zs7\362J~V\235T\211:\243N=\22{dV\235\311" #"\261\\FK\307h,\304\321\31J>z\353\26\246a\275\376\263\325\17" #"\177\367\352\2636\a\356\b\aS\3124\262\217\266\226\371}\27" #"\\\260\330\5K\337\206\335o\250W\277\237\370\352w\323?\216\340" #"\224\20\200P\b\255\370\357\243\235\214\345[\271\343#\302T\364" #"\255\e(C\322\316\eU\346\34\20\213#A\251\2169R45\251\353\246c" #"\226\220\eW3q\366\226\247\275qW\274\37\203\305\30z\\\205)\6" #"\223\n$\1\24\f\f\1\202\340\347ft\375\\\217\264\371\5" #"\306\312\374\302Wfs\257\356~\341\317\305\267\376h\274\263\211\312" #"\302\253F\251\316\30)\225\n\202\222x*\235\360\314\307\243\344" #"\213Q\342\210\267\313b" ) 500 ( #"\271\342^\304|&\251\315a~E#\31\35\256(\220D\240R\210\215\354" #"\215\206\201\317\375\243]8\2322\26\226\332v\21\3231?)\255\335~" #"\360\316\355\203w\377\311\326'\"\211\362\376v\271\276\vLU\365" #"\211\371d\375\231\331\322|\204\0221M9\373l7\276\261=\233\213\257\0" #"\360\213\323e\227$\231\230W\311bDy4\16\v\24R\24&\bD}|\265" #"\321\340\247\217\23e4\350\240\4\0\34\307\376\313\275\267_\273" #"\373\323w\305\337\200\2518B\224H\4+\321\353\231\362\323\271\215" #"\24\26\30Q\2572s\177\345\346\332\306\374\4\331\231\26\237\346" #"\325;\17(\206I>5W\213e\323\f\36\243\220\327\341\352\4\\g" #"\220E\201:\203\360\255^u)\3\0V\227r\320\336\nU\230\247x\25" #"\263l\333& [\200\347$b4\356l\241\372\212 _:\357\350\21\253\356V" #"\204\270\227di\352\345\225\22)l\326\356\332\365\"\245\327\257U" #"\317?\271f%WL\0205H:\360RV\374\200\242\270_\3578\2\206\333?\332" #"\366\214\377Yi\245L\311O\256%\356^\216%\320\234Su\300\260\34" #"\243\356\354\225>.\211\337~\32+dSW\317)\251\211}:}g:S-m-T\3435m" #"\312u\267\247\310\32w\341A\35U\20\0\b\"\320\236\3%\17Y\0A" #"\3621\254z\265\370J\241\335\214\237\310K\v\372\233\323\302\26Te:" #"\325\25\354\b$87\\\3038H\263$\320\35\275b\315$\330\264\n" #"\211=\345\312E\234\23742,\205\16\230`\233Z\262J0\1\300\b -~" #"\236A7\350\251\365\321J\177J\n\24\377]'wb\310\324\360Gq\272" #"\225\325\231\256)\204Q\225\2\266\200\v\356Z\211R=j\271Ubf5\373" #"\234\201\26\317'\276\234u\37\235z\3120\177\215\325K\36JD\274" ) 500 ( #"'2\350\207\21t\31\1\361\375\275\206\307p}@\277J\0\300DP\305\360" #"\241\206\177yA-\2520i\210\355\0043\0311\262\321\fN\177o\205j\264" #"\376\253K\225-R\326\16\200\321\375\347>\230\371\321\226\211\343" #"\225\314\363\267]lj\220g\350\234\277\3572\2\206\356\3\6P" #"\2\0\26F\357g\264=\27\276]rW]\374\247\302\177\377p3ER\351" #"\357\354\346\"\365\372{\263\264<\345\201m{\305\322/~S\373\372\a" #"V\3451R\233\244p\322*NZ\244;\337=\2\25p\255\342U\20F\340]" #"\337w\347\n\352'\233\356_\243\373o\222\332l\4\235+\212\370>Ul2" #"\277\307\263\fY9\317U\36V\247\316\2538i\221\335\a\26\"j9" #"\6\243\377V\31\322\274\335\v\236\245\t\210\v\354\300\327v" #"\370\223[\216\2418\21.2\\Dc\242xY;r\373\352R.XJFQ\257`\260" #"\222\5\0\34\0\0\b\300\277\"\312k\27\341\275Kh\322R^X\345" #"7\266\315\243\227\212\343\17\261\202beD{\327\1\247\203\300\303E" #"\322\202\311/\331B\265D\205\212M\35\214\326\245S\233\23\305\325" #"\245\334\200\237\211\321\20\244\263\4\0\340\310\263\271\v\266c" #"{|]GU\332\303\3705M[\1779?\274\261\371\302\350|\370R1\\\16" #"+\212\355\272\36Gv\215b\334u\255\325\264\207\255e\375\345\274\314V" #"F\232\217\301\225\254c(\22\20\24\3\220\224\341Ex\237\315OZ+#" #"\352\347G\350\273\224\27\t\334\211\300\307q\345\243\4\375f\221" #"\337\334\261\273\271\253\31\216V\346^\274\337\337H\206\304x|4" #"\351C\214\3`cTRp\224{)\367\344\301w\220\321D\36+c\366\1\3/" #"\205;\323\215\214\6\222(\221h}\265\260T\360w\227\320\275\f\220" #"\246\243H\267?o*\03107\207e4" ) 395 ( #">\373\335Lw\343\2321fE\242z\325!\34\275\272i\225\321\240\247" #"\4\214\305\212D\365\252\3=\325\261v2\32?v?\313c\251`\22\345" #"\3\0\26\226\n\355\316eO\214H\343\226\346\f\2368\357#\310J" #"\37\325O.\37\2079\242\244\203\217\1W\1\335\213\351if\17?\266" #"\373\e\307\357\3\332\314u\367\21\361eU6x\\:\240e\256" #"\333Mq\253\22\337\17\322}\357\31=\245J\226~~xZ\307\373]EO=" #"\277\233\247\365t\275D\373\17\251\2762\352{\225|\354\23\272G\226z" #"\325=]V6\337\351\322\312\200\331\222(\37}\320\323\211\310\200" #"\214f{(K\377\350\203Q\312\30\31\301\363\321(P\241\224\1A\364" #"\1\341\225\1A\364!\303\251\370\360\b\236\17\177\367\a" #"\262\21<\37\341&\360>BV\276\2\351#d\16\16\23\274\375y\223" #"\376\16\264%'\220\371\b1!\361\21\232\n\26T\37\241\21p" #"\204@\3728VF8\f\5\322G\210\t\330y{8B\320\201 \345#\3642 (\371" #"8\321Dh\366\37\1\360\341\313\377\321\4\5\331}\264\223\21>" #"\23\r\244\366q\254\214\260\232h o??\2052@f\37\255\204^\6H" #"\353\2435\34\247A\6H\353\343\b\247D\6\4\302\307\351\221" #"\1\322\372h:8U2 \320\337\17\206\22I\363qj9\363!\27\237\3" #"\366{\3\352=VqZ\0\0\0\0IEND\256B`\202" ) 0 0 23 3 1 #"]" 0 0 69 29 1 #"\n" 0 0 69 3 8 #" " 0 0 23 3 2 #"[(" 0 0 14 3 1 #"=" 0 0 69 3 1 #" " 0 0 14 3 1 #"n" 0 0 69 3 1 #" " 0 0 21 3 1 #"3" 0 0 23 3 1 #")" 0 0 69 3 1 #" " 0 3 00000000019 69 1 #"\0" 2 -1 -1 0 0 0 00000000004 500 ( #"\211PNG\r\n\32\n\0\0\0\rIHDR\0\0\0\205\0\0\0I\b\2\0\0" #"\0\234\222r\244\0\0\6\234IDATx\234\355\332\311o\eU\34\300\361" #"\337[f\3658\211\355\254mI\322\262(\215PQA\250l\25\2\304r@\b" #"\204\4\27$.\b\t\376\0@B\202\300\tN\2348 !U\b\4' " #"\301\1\204\4\227\242*U\233\3224]\222\206P\245i\223\306N\34/" #"\343\361\314\274\37\aK\221\23'nj\307\366\233t\276\267*\333\270" #"\37\375\336{\36\17AD\b\223&\332\352\v\b[W\350!W\241" #"\207\\\205\36r\25z\310U\350!W\241\207\\\205\36r\25z\310U" #"\350!W\241\207\\\205\36r\25z\310U\350!W\241\207\\\205" #"\36r\3252\217\v#=\255\372\3232\327\32\217\22FHR\31o\365\5l" #"\231\353\273\253\305\f\202P\230\222*\244V\275lL\217\1\n$\30S" #"\343\24\251\306T\205*\255\276\314\35\256\5\0367\31\v\304L" #"!;\236\32\277\224\235Ztn\\p.\315\270\263Q\336\246p~\312\233" #"\214\360\310#\306\341\244\237\272K\37|\242\343\276g\23/0\242#\372" #"\214\30\0\b@\232\365\"\32\225\\\363\201B\300\265\3713c\277}" #"\332\373\353\37\3424\243\212\302U\313T<\222q\321S#V\206\353\277xcJ" #"\3044\264?op\373\274\370I\247\aL\350\247\30U\240['=\210T#=" #"\24TDPI\34\1I\240\220\232\355Q}8\210[t\276>\226<\361\371\231" #"\17\357\356\243\3\31\314{ \204j\250.(\34\"\226i;\271\250\225" #"\340\n\34\260\224Cm\216\207\177e\341\367UG\317f\273\23\t{9" #"\5]\361~\4N\34\223\3430\327\242\26\fs\350\340\320a\302" #"\235\224\230\362\333\220&?\357S\35114\262P\376O\274~}\374\362" ) 500 ( #"\331/\304\350/p<\243\2706u\324\"\230\314\214h\352Jz\321C\21\351" #"\3504\270\363V\377\362c\355\256\6}*F\263)\375\370\331\247\343\305" #"\177\235\34>\324=\266\224c\253\21#\326u#1\220&:\20\0\300\376\b" #"<\337\vo\350dO\363^jM5\317\243\312dl \1\200\224\235:\26789:" #"\367\363I\347\314Em\261\247\2757\227O&\323\327Pc\214[\3551\355" #"\243\375S\203\252\303@\245>&\317?71\3768\0206H\212{g\316\315\247" #"\257\216\eF\27\203\347_^\360\16M\1\242\0\1\344\256>\374," #"N\36n\360\253\254\267f\254W5\234k\343F\374\261\376G\217\354yp:y" #"\371\313\211c?.\215.\262,\30\232\312U\0361<\341\237Z\346\355V!" #"\26-\270@\35\365\\o\237@\361\310\312\262\305\6\274\\~\237" #"\277b\341\312\325$\233\213\210\2!\24\301\27x\221 \5\"" #"\373\236\337p\217\355`\\\30\351\251\34\21B\210\252h\3\211AC" #"\325\346\347\257Q]\27+v\301wYt\231PoT\2477\224\316\203\275\261}" #"\6\241\211%\237\216u\230S\263\347\375=\a\261;\232>(\332\260\0,~" #"UP$\30E\260\r|E\203>\3111\240\241\36;\362v/]LO\230\323\361C" #"\303\256p\320\6\16\302KgQ\203\225\"\376l\273'\227\264\f\\" #"\241K4\21\3\236\275\236\360\315\311\205\2\237\21\207\272\360" #"\336\230\235\270\322I\22\275j\374E.\366\305\340\t\223\366\327" #"\177=\215\256\201\373\307\255zT\216\b\0\234\372\270\367\315\373" #"\243\223\35.\24\271\246\e\324RUE\347\2241d\204\"\222\2\370" #"\0\324\337{-\337\16\374d|\251\230q\243\5]\323\363o\217\357{e:" #"'X:o\321\273?\230\241\304\220\377p\5Ry\224W\262)\375\206i\235\375" #"\243\263" ) 500 ( #"\313\32*\24&\0252\321\305\320\340\21\333\367,U\1\346\304\364." #"\350z\375\264\25\363\263\337\354g3\203Y\337+d\323\251\257\276\313<" #"u:\237\271G\311\364)%\210M\275e\253\341\347\253\35Y\265J\273\260" #"\217\220R\310\267w\30K>\276\266\350\317\v\345\357\331\271_\237i" #"\317uG\37\260\273\301\316\234\355r\24\244V\216\337\263h\277{\301" #"\31\236\313\27\242\324\351\\wOEr\225f\277\377\200\272\205\346-=" #"I\330\275\231<\365)\35\313\274s\224\217\0361\231\355\r\271\352" #"\253W\204Ahg\21\a\35\277\327\23\210@\4\0[\367\343\272\256" #"\3\300\340{\377\325s\r\215\253\5\36\245jV\3111v\235\363$\247" #"\236\r\346\234\375\303\240\377\375\223\252\342\251/\315\321\367" #"\317\347x\325=\242\204QJN\222\226}\376Q\363\272\21\361\375\3\216" #"3Tp\216\b{\317~:l\232\252C\\\16\377\265\221\25\255\232F9\6" #"\0\314~20\373\311@m\327\320\270\2\371\371 \1h\363\5\3\350v" #"\304Q\333\277s\31\211\347_\262\360Db\313\333\357\e0\326\222M\245" #"\225\36;\262\265R\341E\362\276(\272\266p'\332\330\246\337\263\25" #"\306Z\362\250\4r>\312C\17\256p\207\272\302V\334\34\243\5\272q" #"\311\272)\306Z2\250\264\370\363\217\241\221\205:\217[\v\0\212G" #"\0\b\363\224D\336W\304\272\343\311\3661\326Z#i\334\206_\345O\264" #"\354|U^=$+\24\376\325`\225+\323Q~\177\306;\234q\327\276T\3" #"\306V\355\210M\345\360\31\0=\353\177\263\24\36P\367\233\222\312" #"\333\266;\210\261\241\32l6]\6\r\0\220\326\243T\271J=KY\3430" #"*\333\212\247\372V\264)\6\310\346\261\241\r<\260\2751j&FmU.Sk" #"\5\354|54\262 \371\r\250\233V\5\3$\237\17" ) 249 ( #"(\e\210\r\f[\r\312-\rG\225\235\240A\a\337\233\356=r=" #"\357Sg;\205Q\371\325zxni\377\17\252G\345n\277}\214\32\16H\233" #"\376Hu\244\332\216\310\262\257W\260\275%k+\f9o\342V)\250\363Q\336" #"\246\30\201\223(\25\200\371\200\212\335\273\374\354\273\2330 p" #"\347\335R%\211\241\221\205]\206\1A\361\b\372{\216\355\27" #"\230\375\3436!\t\306|l\277@/V\260\373<\202^\260=\202>\r" #"\225\5\333c\367\25z\310U\350!W\241\207\\\205\36r\25z\310U" #"\350!W\241\207\\\205\36r\25l\217\226?n\273\343\5\333\243" #"\262\240\v\5\346~\373\206\202\376\377\276U\1\363\330\255\fk" #"\311\350\321\264\207\235$L\272\375\343v\306\0\331\346\243\6\214" #"]`P^0\236\367\271}\222n\275\272\315\373\37\317e\311a_~\313+" #"\0\0\0\0IEND\256B`\202" ) 0 0 23 3 3 #"]))" 0 0 69 29 1 #"\n" 0 0 69 29 1 #"\n" 0 0 69 29 1 #"\n" 0 0 18 3 27 #";; wrap-roo: World -> World" 0 0 69 29 1 #"\n" 0 0 18 3 65 #";; If the kangaroo jumps off the screen move it back to the right" 0 0 69 29 1 #"\n" 0 0 23 3 1 #"(" 0 0 16 3 6 #"define" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 8 #"wrap-roo" 0 0 69 3 1 #" " 0 0 14 3 1 #"w" 0 0 23 3 1 #")" 0 0 69 29 1 #"\n" 0 0 69 3 2 #" " 0 0 23 3 1 #"(" 0 0 14 3 10 #"make-world" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 9 #"world-pic" 0 0 69 3 1 #" " 0 0 14 3 1 #"w" 0 0 23 3 1 #")" 0 0 69 29 1 #"\n" 0 0 69 3 14 #" " 0 0 23 3 1 #"(" 0 0 16 3 4 #"cond" 0 0 69 3 1 #" " 0 0 23 3 2 #"[(" 0 0 14 3 1 #"<" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 7 #"world-x" 0 0 69 3 1 #" " 0 0 14 3 1 #"w" 0 0 23 3 1 #")" 0 0 69 3 1 #" " 0 0 21 3 1 #"0" 0 0 23 3 1 #")" 0 0 69 3 1 #" " 0 0 21 3 3 #"400" 0 0 23 3 1 #"]" 0 0 69 29 1 #"\n" 0 0 69 3 20 #" " 0 0 23 3 1 #"[" 0 0 14 3 4 #"else" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 7 #"world-x" 0 0 69 3 1 #" " 0 0 14 3 1 #"w" 0 0 23 3 3 #")])" 0 0 69 29 1 #"\n" 0 0 69 3 14 #" " 0 0 23 3 1 #"(" 0 0 14 3 10 #"world-targ" 0 0 69 3 1 #" " 0 0 14 3 1 #"w" 0 0 23 3 1 #")" 0 0 69 29 1 #"\n" 0 0 69 3 14 #" " 0 0 23 3 1 #"(" 0 0 14 3 9 #"world-scr" 0 0 69 3 1 #" " 0 0 14 3 1 #"w" 0 0 23 3 3 #")))" 0 0 69 29 1 #"\n" 0 0 69 29 1 #"\n" 0 0 18 3 38 #";; cross: Number Number Scene -> Scene" 0 0 69 29 1 #"\n" 0 0 18 3 46 #";; Add the cross-hair image to the given scene" 0 0 69 29 1 #"\n" 0 0 23 3 1 #"(" 0 0 16 3 6 #"define" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 5 #"cross" 0 0 69 3 1 #" " 0 0 14 3 1 #"x" 0 0 69 3 1 #" " 0 0 14 3 1 #"y" 0 0 69 3 1 #" " 0 0 14 3 3 #"scn" 0 0 23 3 1 #")" 0 0 69 29 1 #"\n" 0 0 69 3 2 #" " 0 0 23 3 1 #"(" 0 0 14 3 11 #"place-image" 0 0 69 29 1 #"\n" 0 0 69 3 3 #" " 0 0 23 3 1 #"(" 0 0 14 3 6 #"circle" 0 0 69 3 1 #" " 0 0 21 3 2 #"15" 0 0 69 3 1 #" " 0 0 21 3 1 #"'" 0 0 14 3 7 #"outline" 0 0 69 3 1 #" " 0 0 21 3 1 #"'" 0 0 14 3 3 #"red" 0 0 23 3 1 #")" 0 0 69 3 1 #" " 0 0 14 3 1 #"x" 0 0 69 3 1 #" " 0 0 14 3 1 #"y" 0 0 69 29 1 #"\n" 0 0 69 3 3 #" " 0 0 23 3 1 #"(" 0 0 14 3 11 #"place-image" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 4 #"line" 0 0 69 3 1 #" " 0 0 21 3 1 #"0" 0 0 69 3 1 #" " 0 0 21 3 2 #"40" 0 0 69 3 1 #" " 0 0 21 3 1 #"'" 0 0 14 3 3 #"red" 0 0 23 3 1 #")" 0 0 69 3 1 #" " 0 0 14 3 1 #"x" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 1 #"-" 0 0 69 3 1 #" " 0 0 14 3 1 #"y" 0 0 69 3 1 #" " 0 0 21 3 2 #"20" 0 0 23 3 1 #")" 0 0 69 29 1 #"\n" 0 0 69 3 16 #" " 0 0 23 3 1 #"(" 0 0 14 3 11 #"place-image" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 4 #"line" 0 0 69 3 1 #" " 0 0 21 3 2 #"40" 0 0 69 3 1 #" " 0 0 21 3 1 #"0" 0 0 69 3 1 #" " 0 0 21 3 1 #"'" 0 0 14 3 3 #"red" 0 0 23 3 1 #")" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 1 #"-" 0 0 69 3 1 #" " 0 0 14 3 1 #"x" 0 0 69 3 1 #" " 0 0 21 3 2 #"20" 0 0 23 3 1 #")" 0 0 69 3 1 #" " 0 0 14 3 1 #"y" 0 0 69 29 1 #"\n" 0 0 69 3 29 #" " 0 0 14 3 3 #"scn" 0 0 23 3 4 #"))))" 0 0 69 29 1 #"\n" 0 0 69 3 2 #" " 0 0 69 29 1 #"\n" 0 0 18 3 35 #";; add-score: Number Scene -> Scene" 0 0 69 29 1 #"\n" 0 0 18 3 45 #";; Add the Score to the top left of the Scene" 0 0 69 29 1 #"\n" 0 0 23 3 1 #"(" 0 0 16 3 6 #"define" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 9 #"add-score" 0 0 69 3 1 #" " 0 0 14 3 1 #"s" 0 0 69 3 1 #" " 0 0 14 3 3 #"scn" 0 0 23 3 1 #")" 0 0 69 29 1 #"\n" 0 0 69 3 2 #" " 0 0 23 3 1 #"(" 0 0 14 3 11 #"place-image" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 4 #"text" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 13 #"string-append" 0 0 69 3 1 #" " 0 0 20 3 9 #"\"Score: \"" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 14 #"number->string" 0 0 69 3 1 #" " 0 0 14 3 1 #"s" 0 0 23 3 2 #"))" 0 0 69 29 1 #"\n" 0 0 69 3 21 #" " 0 0 21 3 2 #"14" 0 0 69 3 1 #" " 0 0 21 3 1 #"'" 0 0 14 3 7 #"magenta" 0 0 23 3 1 #")" 0 0 69 29 1 #"\n" 0 0 69 3 3 #" " 0 0 21 3 1 #"5" 0 0 69 3 1 #" " 0 0 21 3 1 #"5" 0 0 69 3 1 #" " 0 0 14 3 3 #"scn" 0 0 23 3 2 #"))" 0 0 69 29 1 #"\n" 0 0 69 3 2 #" " 0 0 69 29 1 #"\n" 0 0 18 3 31 #";; world->scene: World -> Scene" 0 0 69 29 1 #"\n" 0 0 18 3 62 #";; Draw the correct roo image, the cross and the score into an" 0 0 69 29 1 #"\n" 0 0 18 3 16 #";; empty scene" 0 0 69 29 1 #"\n" 0 0 23 3 1 #"(" 0 0 16 3 6 #"define" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 12 #"world->scene" 0 0 69 3 1 #" " 0 0 14 3 1 #"w" 0 0 23 3 1 #")" 0 0 69 29 1 #"\n" 0 0 69 3 2 #" " 0 0 23 3 1 #"(" 0 0 14 3 9 #"add-score" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 9 #"world-scr" 0 0 69 3 1 #" " 0 0 14 3 1 #"w" 0 0 23 3 1 #")" 0 0 69 29 1 #"\n" 0 0 69 3 13 #" " 0 0 23 3 1 #"(" 0 0 14 3 5 #"cross" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 6 #"posn-x" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 10 #"world-targ" 0 0 69 3 1 #" " 0 0 14 3 1 #"w" 0 0 23 3 2 #"))" 0 0 69 29 1 #"\n" 0 0 69 3 20 #" " 0 0 23 3 1 #"(" 0 0 14 3 6 #"posn-y" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 10 #"world-targ" 0 0 69 3 1 #" " 0 0 14 3 1 #"w" 0 0 23 3 2 #"))" 0 0 69 29 1 #"\n" 0 0 69 3 20 #" " 0 0 23 3 1 #"(" 0 0 14 3 11 #"place-image" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 5 #"image" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 9 #"world-pic" 0 0 69 3 1 #" " 0 0 14 3 1 #"w" 0 0 23 3 2 #"))" 0 0 69 29 1 #"\n" 0 0 69 3 33 #" " 0 0 23 3 1 #"(" 0 0 14 3 7 #"world-x" 0 0 69 3 1 #" " 0 0 14 3 1 #"w" 0 0 23 3 1 #")" 0 0 69 3 1 #" " 0 0 21 3 3 #"150" 0 0 69 29 1 #"\n" 0 0 69 3 33 #" " 0 0 23 3 1 #"(" 0 0 14 3 11 #"empty-scene" 0 0 69 3 1 #" " 0 0 21 3 3 #"400" 0 0 69 3 1 #" " 0 0 21 3 3 #"400" 0 0 23 3 5 #")))))" 0 0 69 29 1 #"\n" 0 0 69 3 2 #" " 0 0 69 29 1 #"\n" 0 0 18 3 31 #";; update-world: World -> World" 0 0 69 29 1 #"\n" 0 0 18 3 47 #";; Update the world based on a single time tick" 0 0 69 29 1 #"\n" 0 0 23 3 1 #"(" 0 0 16 3 6 #"define" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 12 #"update-world" 0 0 69 3 1 #" " 0 0 14 3 1 #"w" 0 0 23 3 1 #")" 0 0 69 29 1 #"\n" 0 0 69 3 2 #" " 0 0 23 3 1 #"(" 0 0 14 3 8 #"wrap-roo" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 10 #"make-world" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 9 #"remainder" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 1 #"+" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 9 #"world-pic" 0 0 69 3 1 #" " 0 0 14 3 1 #"w" 0 0 23 3 1 #")" 0 0 69 3 1 #" " 0 0 21 3 1 #"1" 0 0 23 3 1 #")" 0 0 69 3 1 #" " 0 0 21 3 1 #"4" 0 0 23 3 1 #")" 0 0 69 29 1 #"\n" 0 0 69 3 24 #" " 0 0 23 3 1 #"(" 0 0 14 3 1 #"-" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 7 #"world-x" 0 0 69 3 1 #" " 0 0 14 3 1 #"w" 0 0 23 3 1 #")" 0 0 69 3 1 #" " 0 0 21 3 2 #"20" 0 0 23 3 1 #")" 0 0 69 29 1 #"\n" 0 0 69 3 24 #" " 0 0 23 3 1 #"(" 0 0 14 3 10 #"world-targ" 0 0 69 3 1 #" " 0 0 14 3 1 #"w" 0 0 23 3 1 #")" 0 0 69 29 1 #"\n" 0 0 69 3 24 #" " 0 0 23 3 1 #"(" 0 0 14 3 9 #"world-scr" 0 0 69 3 1 #" " 0 0 14 3 1 #"w" 0 0 23 3 4 #"))))" 0 0 69 29 1 #"\n" 0 0 69 29 1 #"\n" 0 0 18 3 46 #";; dist: Number Number Number Number -> Number" 0 0 69 29 1 #"\n" 0 0 18 3 58 #";; Calculate the distance between a point and the kangaroo" 0 0 69 29 1 #"\n" 0 0 23 3 1 #"(" 0 0 16 3 6 #"define" 0 0 23 3 1 #"(" 0 0 14 3 4 #"dist" 0 0 69 3 1 #" " 0 0 14 3 1 #"x" 0 0 69 3 1 #" " 0 0 14 3 1 #"y" 0 0 69 3 1 #" " 0 0 14 3 2 #"kx" 0 0 69 3 1 #" " 0 0 14 3 2 #"ky" 0 0 23 3 1 #")" 0 0 69 29 1 #"\n" 0 0 69 3 2 #" " 0 0 23 3 1 #"(" 0 0 14 3 4 #"sqrt" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 1 #"+" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 3 #"sqr" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 1 #"-" 0 0 69 3 1 #" " 0 0 14 3 1 #"x" 0 0 69 3 1 #" " 0 0 14 3 2 #"kx" 0 0 23 3 2 #"))" 0 0 69 3 1 #" " 0 0 69 29 1 #"\n" 0 0 69 3 11 #" " 0 0 23 3 1 #"(" 0 0 14 3 3 #"sqr" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 1 #"-" 0 0 69 3 1 #" " 0 0 14 3 1 #"y" 0 0 69 3 1 #" " 0 0 14 3 2 #"ky" 0 0 23 3 5 #")))))" 0 0 69 29 1 #"\n" 0 0 69 29 1 #"\n" 0 0 18 3 32 #";; shoot-to-kil Number -> Number" 0 0 69 29 1 #"\n" 0 0 18 3 41 #";; Update the score based on a fresh kill" 0 0 69 29 1 #"\n" 0 0 23 3 1 #"(" 0 0 16 3 6 #"define" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 13 #"shoot-to-kill" 0 0 69 3 1 #" " 0 0 14 3 3 #"scr" 0 0 23 3 1 #")" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 1 #"+" 0 0 69 3 1 #" " 0 0 14 3 3 #"scr" 0 0 69 3 1 #" " 0 0 21 3 2 #"10" 0 0 23 3 2 #"))" 0 0 69 29 1 #"\n" 0 0 69 29 1 #"\n" 0 0 18 3 40 #";; roo-hit?: Number Number Number Symbol" 0 0 69 29 1 #"\n" 0 0 18 3 37 #";; Did we shoot and hit the kangaroo?" 0 0 69 29 1 #"\n" 0 0 23 3 1 #"(" 0 0 16 3 6 #"define" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 8 #"roo-hit?" 0 0 69 3 1 #" " 0 0 14 3 1 #"x" 0 0 69 3 1 #" " 0 0 14 3 1 #"y" 0 0 69 3 1 #" " 0 0 14 3 5 #"roo-x" 0 0 69 3 1 #" " 0 0 14 3 3 #"sym" 0 0 23 3 1 #")" 0 0 69 29 1 #"\n" 0 0 69 3 2 #" " 0 0 23 3 1 #"(" 0 0 14 3 3 #"and" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 8 #"symbol=?" 0 0 69 3 1 #" " 0 0 14 3 3 #"sym" 0 0 69 3 1 #" " 0 0 21 3 1 #"'" 0 0 14 3 11 #"button-down" 0 0 23 3 1 #")" 0 0 69 29 1 #"\n" 0 0 69 3 7 #" " 0 0 23 3 1 #"(" 0 0 14 3 1 #"<" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 4 #"dist" 0 0 69 3 1 #" " 0 0 14 3 1 #"x" 0 0 69 3 1 #" " 0 0 14 3 1 #"y" 0 0 69 3 1 #" " 0 0 14 3 5 #"roo-x" 0 0 69 3 1 #" " 0 0 21 3 3 #"150" 0 0 23 3 1 #")" 0 0 69 3 1 #" " 0 0 21 3 2 #"40" 0 0 23 3 3 #")))" 0 0 69 29 1 #"\n" 0 0 69 29 1 #"\n" 0 0 18 3 45 #";; mouse: World Number Number Symbol -> World" 0 0 69 29 1 #"\n" 0 0 18 3 61 #";; React to mouse events: shoot and/or update the target posn" 0 0 69 29 1 #"\n" 0 0 23 3 1 #"(" 0 0 16 3 6 #"define" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 5 #"mouse" 0 0 69 3 1 #" " 0 0 14 3 1 #"w" 0 0 69 3 1 #" " 0 0 14 3 1 #"x" 0 0 69 3 1 #" " 0 0 14 3 1 #"y" 0 0 69 3 1 #" " 0 0 14 3 3 #"sym" 0 0 23 3 1 #")" 0 0 69 29 1 #"\n" 0 0 69 3 2 #" " 0 0 23 3 1 #"(" 0 0 14 3 10 #"make-world" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 9 #"world-pic" 0 0 69 3 1 #" " 0 0 14 3 1 #"w" 0 0 23 3 1 #")" 0 0 69 29 1 #"\n" 0 0 69 3 14 #" " 0 0 23 3 1 #"(" 0 0 16 3 4 #"cond" 0 0 69 3 1 #" " 0 0 23 3 2 #"[(" 0 0 14 3 8 #"roo-hit?" 0 0 69 3 1 #" " 0 0 14 3 1 #"x" 0 0 69 3 1 #" " 0 0 14 3 1 #"y" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 7 #"world-x" 0 0 69 3 1 #" " 0 0 14 3 1 #"w" 0 0 23 3 1 #")" 0 0 69 3 1 #" " 0 0 14 3 3 #"sym" 0 0 23 3 1 #")" 0 0 69 3 1 #" " 0 0 21 3 3 #"400" 0 0 23 3 1 #"]" 0 0 69 29 1 #"\n" 0 0 69 3 20 #" " 0 0 23 3 1 #"[" 0 0 14 3 4 #"else" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 7 #"world-x" 0 0 69 3 1 #" " 0 0 14 3 1 #"w" 0 0 23 3 3 #")])" 0 0 69 29 1 #"\n" 0 0 69 3 14 #" " 0 0 23 3 1 #"(" 0 0 14 3 9 #"make-posn" 0 0 69 3 1 #" " 0 0 14 3 1 #"x" 0 0 69 3 1 #" " 0 0 14 3 1 #"y" 0 0 23 3 1 #")" 0 0 69 29 1 #"\n" 0 0 69 3 14 #" " 0 0 23 3 1 #"(" 0 0 16 3 4 #"cond" 0 0 69 3 1 #" " 0 0 23 3 2 #"[(" 0 0 14 3 8 #"roo-hit?" 0 0 69 3 1 #" " 0 0 14 3 1 #"x" 0 0 69 3 1 #" " 0 0 14 3 1 #"y" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 7 #"world-x" 0 0 69 3 1 #" " 0 0 14 3 1 #"w" 0 0 23 3 1 #")" 0 0 69 3 1 #" " 0 0 14 3 3 #"sym" 0 0 23 3 1 #")" 0 0 69 29 1 #"\n" 0 0 69 3 21 #" " 0 0 23 3 1 #"(" 0 0 14 3 13 #"shoot-to-kill" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 9 #"world-scr" 0 0 69 3 1 #" " 0 0 14 3 1 #"w" 0 0 23 3 3 #"))]" 0 0 69 29 1 #"\n" 0 0 69 3 20 #" " 0 0 23 3 1 #"[" 0 0 14 3 4 #"else" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 9 #"world-scr" 0 0 69 3 1 #" " 0 0 14 3 1 #"w" 0 0 23 3 5 #")])))" 0 0 69 29 1 #"\n" 0 0 69 29 1 #"\n" 0 0 18 3 45 #";; Setup the initial world and start the game" 0 0 69 29 1 #"\n" 0 0 23 3 1 #"(" 0 0 14 3 8 #"big-bang" 0 0 69 3 1 #" " 0 0 21 3 3 #"400" 0 0 69 3 1 #" " 0 0 21 3 3 #"300" 0 0 69 3 1 #" " 0 0 21 3 2 #".1" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 10 #"make-world" 0 0 69 3 1 #" " 0 0 21 3 1 #"0" 0 0 69 3 1 #" " 0 0 21 3 3 #"400" 0 0 69 3 1 #" " 0 0 23 3 1 #"(" 0 0 14 3 9 #"make-posn" 0 0 69 3 1 #" " 0 0 21 3 3 #"-40" 0 0 69 3 1 #" " 0 0 21 3 2 #"40" 0 0 23 3 1 #")" 0 0 69 3 1 #" " 0 0 21 3 1 #"0" 0 0 23 3 2 #"))" 0 0 69 29 1 #"\n" 0 0 23 3 1 #"(" 0 0 14 3 9 #"on-redraw" 0 0 69 3 1 #" " 0 0 14 3 12 #"world->scene" 0 0 23 3 1 #")" 0 0 69 29 1 #"\n" 0 0 23 3 1 #"(" 0 0 14 3 13 #"on-tick-event" 0 0 69 3 1 #" " 0 0 14 3 12 #"update-world" 0 0 23 3 1 #")" 0 0 69 29 1 #"\n" 0 0 23 3 1 #"(" 0 0 14 3 14 #"on-mouse-event" 0 0 69 3 1 #" " 0 0 14 3 5 #"mouse" 0 0 23 3 1 #")" 0 0 69 29 1 #"\n" 0 00000000000