WXME0108 ## #| This file is in PLT Scheme editor format. Most likely, it was created by saving a program in DrScheme, and it probably contains a program with non-text elements (such as pictures, comment boxes, or test-cases boxes). Open this file in DrScheme to read its content. www.plt-scheme.org |# 30 7 #"wxtext\0" 3 1 6 #"wxtab\0" 1 1 8 #"wxmedia\0" 3 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 18 #"java-comment-box%\0" 1 0 23 #"java-interactions-box%\0" 1 0 15 #"make-line-snip\0" 1 0 15 #"make-line-snip\0" 1 0 13 #"example-box%\0" 2 0 18 #"interactions-box%\0" 2 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 34 #"drscheme:vertical-separator-snip%\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 15 #"test-case-box%\0" 2 0 10 #"text-box%\0" 1 0 1 6 #"wxloc\0" 00000000000 1 107 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 9 #"Standard\0" 0 75 12 #"Courier New\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 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 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 40 #"framework:syntax-coloring: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 41 #"framework:syntax-coloring: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 41 #"framework:syntax-coloring: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 40 #"framework:syntax-coloring: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 42 #"framework:syntax-coloring: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 45 #"framework:syntax-coloring: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 39 #"framework:syntax-coloring: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 39 #"framework:syntax-coloring: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 49 #"drscheme:check-syntax:lexically-bound-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 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 42 #"drscheme:check-syntax:imported-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 68 0 203 0 0 0 -1 -1 2 37 #"profj:syntax-coloring: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 39 #"profj:syntax-coloring: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 40 #"profj:syntax-coloring: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 36 #"profj:syntax-coloring: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 37 #"profj:syntax-coloring: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 37 #"profj:syntax-coloring: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 35 #"profj:syntax-coloring: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 37 #"profj:syntax-coloring: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 39 #"profj:syntax-coloring: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 37 #"profj:syntax-coloring: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 2 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 2 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 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 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 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 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 0 1 #"\0" 0 75 12 #"Courier New\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 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 9 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 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 0 0 0 0 0 0 -1 -1 11 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 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 9 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 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 178 34 34 0 0 0 -1 -1 11 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 11 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 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 9 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 8 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 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 21 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 21 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 21 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 21 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 21 1 #"\0" 0 70 1 #"\0" 1 -2 -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 21 1 #"\0" 0 70 1 #"\0" 1 -2 -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 21 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 50 205 50 0 0 0 -1 -1 21 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 21 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 21 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 21 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 21 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 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 -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 2 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 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 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 13 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 13 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 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 2 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 2 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 2 1 #"\0" 0 70 1 #"\0" 1 -2 -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 70 1 #"\0" 1 -2 -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 2 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 50 205 50 0 0 0 -1 -1 2 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 2 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 2 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 2 1 #"\0" 0 70 1 #"\0" 1.2000000476837158 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 2 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 2 1 #"\0" 0 75 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 2 1 #"\0" 0 -1 1 #"\0" 1 0 -1 -1 94 -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 0 0 0 0 0 0 255 255 255 -1 -1 13 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 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 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 1 1 1 0 0 0 0 0 0 -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 178 34 34 0 0 0 -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 0 0 0 178 34 34 255 255 255 -1 -1 0 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 0 -1 00000000002 0 00000000000 7 00000000000 4786 0 11 3 44 #";; snake.scm Daniel " 0 0 11 3 39 #"Azus 11-30-2006" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 1 #";" 0 0 11 3 1 #";" 0 0 11 3 1 #" " 0 0 11 3 1 #"T" 0 0 11 3 1 #"h" 0 0 11 3 1 #"i" 0 0 11 3 1 #"s" 0 0 11 3 1 #" " 0 0 11 3 1 #"p" 0 0 11 3 1 #"r" 0 0 11 3 1 #"o" 0 0 11 3 1 #"g" 0 0 11 3 1 #"r" 0 0 11 3 1 #"a" 0 0 11 3 1 #"m" 0 0 11 3 1 #" " 0 0 11 3 1 #"u" 0 0 11 3 1 #"s" 0 0 11 3 1 #"e" 0 0 11 3 1 #"s" 0 0 11 3 1 #" " 0 0 11 3 1 #"t" 0 0 11 3 1 #"h" 0 0 11 3 1 #"e" 0 0 11 3 1 #" " 0 0 11 3 1 #"w" 0 0 11 3 1 #"o" 0 0 11 3 1 #"r" 0 0 11 3 1 #"l" 0 0 11 3 1 #"d" 0 0 11 3 1 #" " 0 0 11 3 1 #"t" 0 0 11 3 1 #"e" 0 0 11 3 1 #"a" 0 0 11 3 1 #"c" 0 0 11 3 1 #"h" 0 0 11 3 1 #"p" 0 0 11 3 1 #"a" 0 0 11 3 1 #"c" 0 0 11 3 1 #"k" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 1 #";" 0 0 11 3 1 #";" 0 0 11 3 1 #" " 0 0 11 3 1 #"C" 0 0 11 3 1 #"o" 0 0 11 3 1 #"n" 0 0 11 3 1 #"t" 0 0 11 3 1 #"r" 0 0 11 3 1 #"o" 0 0 11 3 1 #"l" 0 0 11 3 1 #"s" 0 0 11 3 1 #":" 0 0 61 29 1 #"\n" 0 0 11 3 1 #";" 0 0 11 3 1 #";" 0 0 11 3 1 #" " 0 0 11 3 1 #"T" 0 0 11 3 1 #"h" 0 0 11 3 1 #"e" 0 0 11 3 1 #" " 0 0 11 3 1 #"a" 0 0 11 3 1 #"r" 0 0 11 3 1 #"r" 0 0 11 3 1 #"o" 0 0 11 3 1 #"w" 0 0 11 3 1 #" " 0 0 11 3 1 #"k" 0 0 11 3 1 #"e" 0 0 11 3 1 #"y" 0 0 11 3 1 #"s" 0 0 11 3 1 #" " 0 0 11 3 1 #"d" 0 0 11 3 1 #"i" 0 0 11 3 1 #"r" 0 0 11 3 1 #"e" 0 0 11 3 1 #"c" 0 0 11 3 1 #"t" 0 0 11 3 2 #"s " 0 0 11 3 1 #"t" 0 0 11 3 1 #"h" 0 0 11 3 1 #"e" 0 0 11 3 1 #" " 0 0 11 3 1 #"s" 0 0 11 3 1 #"n" 0 0 11 3 1 #"a" 0 0 11 3 1 #"k" 0 0 11 3 1 #"e" 0 0 11 3 1 #"'" 0 0 11 3 1 #"s" 0 0 11 3 1 #" " 0 0 11 3 1 #"h" 0 0 11 3 1 #"e" 0 0 11 3 1 #"a" 0 0 11 3 1 #"d" 0 0 11 3 1 #"'" 0 0 11 3 1 #"s" 0 0 11 3 1 #" " 0 0 11 3 1 #"d" 0 0 11 3 1 #"i" 0 0 11 3 1 #"r" 0 0 11 3 1 #"e" 0 0 11 3 1 #"c" 0 0 11 3 1 #"t" 0 0 11 3 1 #"i" 0 0 11 3 1 #"o" 0 0 11 3 1 #"n" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 1 #";" 0 0 11 3 1 #";" 0 0 11 3 1 #" " 0 0 11 3 1 #"R" 0 0 11 3 1 #"u" 0 0 11 3 1 #"l" 0 0 11 3 1 #"e" 0 0 11 3 1 #"s" 0 0 11 3 1 #":" 0 0 61 29 1 #"\n" 0 0 11 3 1 #";" 0 0 11 3 1 #";" 0 0 11 3 1 #" " 0 0 11 3 1 #"T" 0 0 11 3 1 #"r" 0 0 11 3 1 #"y" 0 0 11 3 1 #" " 0 0 11 3 1 #"t" 0 0 11 3 1 #"o" 0 0 11 3 1 #" " 0 0 11 3 1 #"\"" 0 0 11 3 1 #"e" 0 0 11 3 1 #"a" 0 0 11 3 1 #"t" 0 0 11 3 1 #"\"" 0 0 11 3 1 #" " 0 0 11 3 1 #"t" 0 0 11 3 1 #"h" 0 0 11 3 1 #"e" 0 0 11 3 1 #" " 0 0 11 3 1 #"r" 0 0 11 3 1 #"e" 0 0 11 3 1 #"d" 0 0 11 3 1 #" " 0 0 11 3 1 #"s" 0 0 11 3 1 #"q" 0 0 11 3 1 #"u" 0 0 11 3 1 #"a" 0 0 11 3 1 #"r" 0 0 11 3 1 #"e" 0 0 11 3 1 #"." 0 0 11 3 1 #" " 0 0 11 3 1 #" " 0 0 11 3 1 #"T" 0 0 11 3 1 #"h" 0 0 11 3 1 #"e" 0 0 11 3 1 #" " 0 0 11 3 1 #"g" 0 0 11 3 1 #"a" 0 0 11 3 1 #"m" 0 0 11 3 1 #"e" 0 0 11 3 1 #" " 0 0 11 3 1 #"e" 0 0 11 3 1 #"n" 0 0 11 3 1 #"d" 0 0 11 3 1 #"s" 0 0 11 3 1 #" " 0 0 11 3 1 #"i" 0 0 11 3 1 #"f" 0 0 11 3 1 #" " 0 0 11 3 1 #"y" 0 0 11 3 1 #"o" 0 0 11 3 1 #"u" 0 0 11 3 1 #" " 0 0 11 3 1 #"h" 0 0 11 3 1 #"i" 0 0 11 3 1 #"t" 0 0 11 3 1 #" " 0 0 11 3 1 #"a" 0 0 11 3 1 #"n" 0 0 11 3 1 #"y" 0 0 11 3 1 #" " 0 0 11 3 1 #"b" 0 0 11 3 1 #"o" 0 0 11 3 1 #"r" 0 0 11 3 1 #"d" 0 0 11 3 2 #"er" 0 0 11 3 1 #" " 0 0 11 3 1 #"o" 0 0 11 3 1 #"r" 0 0 11 3 1 #" " 0 0 11 3 1 #"c" 0 0 11 3 1 #"r" 0 0 11 3 1 #"o" 0 0 11 3 1 #"s" 0 0 11 3 1 #"s" 0 0 11 3 1 #" " 0 0 11 3 1 #"y" 0 0 11 3 1 #"o" 0 0 11 3 1 #"u" 0 0 11 3 1 #"r" 0 0 11 3 1 #" " 0 0 11 3 1 #"o" 0 0 11 3 1 #"w" 0 0 11 3 1 #"n" 0 0 11 3 1 #" " 0 0 11 3 1 #"t" 0 0 11 3 1 #"a" 0 0 11 3 1 #"i" 0 0 11 3 1 #"l" 0 0 11 3 1 #"." 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 12 #";; Constants" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 8 3 11 #"WindowWidth" 0 0 61 3 1 #" " 0 0 14 3 3 #"800" 0 0 16 3 1 #")" 0 0 61 3 12 #" " 0 0 11 3 13 #";; The width " 0 0 11 3 13 #"of the window" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 8 3 12 #"WindowHeight" 0 0 61 3 1 #" " 0 0 14 3 1 #"8" 0 0 14 3 1 #"0" 0 0 14 3 1 #"0" 0 0 16 3 1 #")" 0 0 61 3 11 #" " 0 0 11 3 14 #";; The height " 0 0 11 3 13 #"of the window" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 8 3 9 #"FrameRate" 0 0 61 3 1 #" " 0 0 14 3 2 #"15" 0 0 16 3 1 #")" 0 0 61 3 10 #" " 0 0 61 3 1 #" " 0 0 61 3 4 #" " 0 0 11 3 12 #";; The rate " 0 0 11 3 32 #"the window is updated per second" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 8 3 10 #"FrameDelay" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"/" 0 0 61 3 1 #" " 0 0 14 3 1 #"1" 0 0 61 3 1 #" " 0 0 8 3 9 #"FrameRate" 0 0 16 3 2 #"))" 0 0 61 3 1 #" " 0 0 11 3 13 #";; The delay " 0 0 11 3 39 #"between frames, based on the frame rate" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 12 #";; Constants" 0 0 61 29 1 #"\n" 0 0 11 3 1 #";" 0 0 11 3 1 #";" 0 0 11 3 1 #" " 0 0 11 3 1 #"S" 0 0 11 3 1 #"n" 0 0 11 3 1 #"a" 0 0 11 3 1 #"k" 0 0 11 3 1 #"e" 0 0 11 3 1 #" " 0 0 11 3 1 #"d" 0 0 11 3 1 #"i" 0 0 11 3 1 #"r" 0 0 11 3 1 #"e" 0 0 11 3 1 #"c" 0 0 11 3 1 #"t" 0 0 11 3 1 #"i" 0 0 11 3 1 #"o" 0 0 11 3 1 #"n" 0 0 11 3 1 #"s" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 1 #"d" 0 0 9 3 1 #"e" 0 0 9 3 1 #"f" 0 0 9 3 1 #"i" 0 0 9 3 1 #"n" 0 0 9 3 1 #"e" 0 0 61 3 1 #" " 0 0 8 3 1 #"S" 0 0 8 3 2 #"DU" 0 0 8 3 1 #"p" 0 0 61 3 1 #" " 0 0 14 3 1 #"0" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 1 #"d" 0 0 9 3 1 #"e" 0 0 9 3 1 #"f" 0 0 9 3 1 #"i" 0 0 9 3 1 #"n" 0 0 9 3 1 #"e" 0 0 61 3 1 #" " 0 0 8 3 1 #"S" 0 0 8 3 3 #"DLe" 0 0 8 3 1 #"f" 0 0 8 3 1 #"t" 0 0 61 3 1 #" " 0 0 14 3 1 #"1" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 1 #"d" 0 0 9 3 1 #"e" 0 0 9 3 1 #"f" 0 0 9 3 1 #"i" 0 0 9 3 1 #"n" 0 0 9 3 1 #"e" 0 0 61 3 1 #" " 0 0 8 3 1 #"S" 0 0 8 3 2 #"DD" 0 0 8 3 1 #"o" 0 0 8 3 1 #"w" 0 0 8 3 1 #"n" 0 0 61 3 1 #" " 0 0 14 3 1 #"2" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 1 #"d" 0 0 9 3 1 #"e" 0 0 9 3 1 #"f" 0 0 9 3 1 #"i" 0 0 9 3 1 #"n" 0 0 9 3 1 #"e" 0 0 61 3 1 #" " 0 0 8 3 1 #"S" 0 0 8 3 2 #"DR" 0 0 8 3 1 #"i" 0 0 8 3 1 #"g" 0 0 8 3 1 #"h" 0 0 8 3 1 #"t" 0 0 61 3 1 #" " 0 0 14 3 1 #"3" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 31 #";; Default values for variables" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 8 3 8 #"GridSize" 0 0 61 3 1 #" " 0 0 14 3 2 #"16" 0 0 16 3 1 #")" 0 0 61 3 20 #" " 0 0 61 3 25 #" " 0 0 61 3 1 #" " 0 0 11 3 7 #";; The " 0 0 11 3 22 #"size of snake and grid" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 8 3 11 #"SnakeStartX" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"*" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"/" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"/" 0 0 61 3 1 #" " 0 0 8 3 11 #"WindowWidth" 0 0 61 3 1 #" " 0 0 8 3 8 #"GridSize" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 14 3 1 #"2" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 8 3 8 #"GridSize" 0 0 16 3 2 #"))" 0 0 61 3 1 #" " 0 0 61 3 1 #" " 0 0 11 3 7 #";; The " 0 0 11 11 28 #"starting x position for the " 0 0 11 3 12 #"snake's head" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 8 3 10 #"SnakeStart" 0 0 8 3 1 #"Y" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"*" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"/" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"/" 0 0 61 3 1 #" " 0 0 8 3 6 #"Window" 0 0 8 3 1 #"H" 0 0 8 3 1 #"e" 0 0 8 3 1 #"i" 0 0 8 3 1 #"g" 0 0 8 3 1 #"h" 0 0 8 3 1 #"t" 0 0 61 3 1 #" " 0 0 8 3 8 #"GridSize" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 14 3 1 #"2" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 8 3 8 #"GridSize" 0 0 16 3 2 #"))" 0 0 61 3 1 #" " 0 0 11 3 7 #";; The " 0 0 11 3 9 #"starting " 0 0 11 11 19 #"y position for the " 0 0 11 3 12 #"snake's head" 0 0 61 29 1 #"\n" 0 0 11 3 1 #";" 0 0 11 3 2 #";(" 0 0 11 3 6 #"define" 0 0 11 3 1 #" " 0 0 11 3 11 #"SnakeStartX" 0 0 11 3 1 #" " 0 0 11 3 1 #"(" 0 0 11 3 1 #"*" 0 0 11 3 1 #" " 0 0 11 3 8 #"GridSize" 0 0 11 3 1 #" " 0 0 11 3 1 #"5" 0 0 11 3 2 #"))" 0 0 11 3 1 #" " 0 0 11 3 11 #" ;; The " 0 0 11 3 40 #"starting x position for the snake's head" 0 0 61 29 1 #"\n" 0 0 11 3 1 #";" 0 0 11 3 2 #";(" 0 0 11 3 6 #"define" 0 0 11 3 1 #" " 0 0 11 3 11 #"SnakeStartY" 0 0 11 3 1 #" " 0 0 11 3 1 #"(" 0 0 11 3 1 #"*" 0 0 11 3 1 #" " 0 0 11 3 8 #"GridSize" 0 0 11 3 1 #" " 0 0 11 3 1 #"1" 0 0 11 3 1 #"5" 0 0 11 3 2 #"))" 0 0 11 3 1 #" " 0 0 11 3 3 #" " 0 0 11 3 7 #";; The " 0 0 11 3 40 #"starting y position for the snake's head" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 8 3 5 #"FoodX" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"*" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"/" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"/" 0 0 61 3 1 #" " 0 0 8 3 11 #"WindowWidth" 0 0 61 3 1 #" " 0 0 8 3 8 #"GridSize" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 14 3 1 #"2" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 8 3 8 #"GridSize" 0 0 16 3 2 #"))" 0 0 61 3 8 #" " 0 0 11 11 35 #";; The starting x position for the " 0 0 11 3 12 #"snake's head" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 8 3 5 #"FoodY" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"*" 0 0 61 3 1 #" " 0 0 8 3 8 #"GridSize" 0 0 61 3 1 #" " 0 0 14 3 1 #"1" 0 0 14 3 1 #"0" 0 0 16 3 2 #"))" 0 0 61 3 10 #" " 0 0 61 3 23 #" " 0 0 61 3 1 #" " 0 0 61 3 2 #" " 0 0 61 3 1 #" " 0 0 11 3 7 #";; The " 0 0 11 3 8 #"starting" 0 0 11 3 1 #" " 0 0 11 3 1 #"y" 0 0 11 3 1 #" " 0 0 11 3 8 #"position" 0 0 11 3 1 #" " 0 0 11 3 3 #"for" 0 0 11 11 1 #" " 0 0 11 3 3 #"the" 0 0 11 3 1 #" " 0 0 11 3 5 #"snake" 0 0 11 3 1 #"'" 0 0 11 3 1 #"s" 0 0 11 3 1 #" " 0 0 11 3 4 #"head" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 49 #";; rand: start (num) end (num) --> random number " 0 0 11 3 19 #">= start and <= end" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"rand" 0 0 61 3 1 #" " 0 0 8 3 5 #"start" 0 0 61 3 1 #" " 0 0 8 3 3 #"end" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 8 3 2 #"if" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #">" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"-" 0 0 61 3 1 #" " 0 0 8 3 3 #"end" 0 0 61 3 1 #" " 0 0 8 3 5 #"start" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 14 3 1 #"0" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"+" 0 0 61 3 1 #" " 0 0 8 3 5 #"start" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 6 #"random" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"-" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"+" 0 0 61 3 1 #" " 0 0 8 3 3 #"end" 0 0 61 3 1 #" " 0 0 14 3 1 #"1" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 8 3 5 #"start" 0 0 16 3 3 #")))" 0 0 61 3 1 #" " 0 0 14 3 1 #"0" 0 0 16 3 2 #"))" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 13 #";; List stuff" 0 0 61 29 1 #"\n" 0 0 11 3 37 #";; Gets a specified element in a list" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"GetElement" 0 0 61 3 1 #" " 0 0 8 3 5 #"AList" 0 0 61 3 1 #" " 0 0 8 3 5 #"Index" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 9 3 4 #"cond" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 2 #"[(" 0 0 8 3 6 #"empty?" 0 0 61 3 1 #" " 0 0 8 3 5 #"AList" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 8 3 5 #"empty" 0 0 16 3 1 #"]" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 2 #"[(" 0 0 8 3 1 #"<" 0 0 61 3 1 #" " 0 0 8 3 5 #"Index" 0 0 61 3 1 #" " 0 0 14 3 1 #"1" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 8 3 5 #"empty" 0 0 16 3 1 #"]" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 2 #"[(" 0 0 8 3 1 #"=" 0 0 61 3 1 #" " 0 0 8 3 5 #"Index" 0 0 61 3 1 #" " 0 0 14 3 1 #"1" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 5 #"first" 0 0 61 3 1 #" " 0 0 8 3 5 #"AList" 0 0 16 3 2 #")]" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #"[" 0 0 8 3 4 #"else" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"GetElement" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"rest" 0 0 61 3 1 #" " 0 0 8 3 5 #"AList" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"-" 0 0 61 3 1 #" " 0 0 8 3 5 #"Index" 0 0 61 3 1 #" " 0 0 14 3 1 #"1" 0 0 16 3 3 #"))]" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 28 #";; Checks the size of a list" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 8 #"ListSize" 0 0 61 3 1 #" " 0 0 8 3 5 #"alist" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 9 3 4 #"cond" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 2 #"[(" 0 0 8 3 6 #"empty?" 0 0 61 3 1 #" " 0 0 8 3 5 #"alist" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 14 3 1 #"0" 0 0 16 3 1 #"]" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #"[" 0 0 8 3 4 #"else" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"+" 0 0 61 3 1 #" " 0 0 14 3 1 #"1" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 8 #"ListSize" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"rest" 0 0 61 3 1 #" " 0 0 8 3 5 #"alist" 0 0 16 3 4 #")))]" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 1 #";" 0 0 11 3 1 #";" 0 0 11 3 1 #" " 0 0 11 3 1 #"G" 0 0 11 3 1 #"e" 0 0 11 3 1 #"t" 0 0 11 3 1 #"s" 0 0 11 3 1 #" " 0 0 11 3 1 #"t" 0 0 11 3 1 #"h" 0 0 11 3 1 #"e" 0 0 11 3 1 #" " 0 0 11 3 1 #"l" 0 0 11 3 1 #"a" 0 0 11 3 1 #"s" 0 0 11 3 1 #"t" 0 0 11 3 1 #" " 0 0 11 3 1 #"e" 0 0 11 3 1 #"l" 0 0 11 3 1 #"e" 0 0 11 3 1 #"m" 0 0 11 3 1 #"e" 0 0 11 3 1 #"n" 0 0 11 3 1 #"t" 0 0 11 3 1 #" " 0 0 11 3 1 #"i" 0 0 11 3 1 #"n" 0 0 11 3 1 #" " 0 0 11 3 1 #"a" 0 0 11 3 1 #" " 0 0 11 3 1 #"l" 0 0 11 3 1 #"i" 0 0 11 3 2 #"st" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 2 #"de" 0 0 9 3 1 #"f" 0 0 9 3 1 #"i" 0 0 9 3 1 #"n" 0 0 9 3 1 #"e" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"last" 0 0 61 3 1 #" " 0 0 8 3 5 #"alist" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"GetElement" 0 0 61 3 1 #" " 0 0 8 3 3 #"ali" 0 0 8 3 1 #"s" 0 0 8 3 1 #"t" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 8 #"ListSize" 0 0 61 3 1 #" " 0 0 8 3 5 #"alist" 0 0 16 3 3 #")))" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 25 #";; Defining the SnakePart" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 13 #"define-struct" 0 0 61 3 1 #" " 0 0 8 3 9 #"SnakePart" 0 0 61 3 1 #" " 0 0 16 3 1 #"[" 0 0 8 3 1 #"x" 0 0 61 3 1 #" " 0 0 8 3 1 #"y" 0 0 16 3 2 #"])" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 21 #";; Defining the world" 0 0 61 29 1 #"\n" 0 0 11 3 18 #";; World variables" 0 0 61 29 1 #"\n" 0 0 11 3 43 #";; Frame = Frames since the program started" 0 0 61 29 1 #"\n" 0 0 11 3 3 #";; " 0 0 11 3 1 #"S" 0 0 11 3 1 #"n" 0 0 11 3 1 #"a" 0 0 11 3 1 #"k" 0 0 11 3 1 #"e" 0 0 11 3 2 #"Li" 0 0 11 3 1 #"s" 0 0 11 3 3 #"t =" 0 0 11 3 1 #" " 0 0 11 3 1 #"L" 0 0 11 3 1 #"i" 0 0 11 3 1 #"s" 0 0 11 3 1 #"t" 0 0 11 3 1 #" " 0 0 11 3 1 #"o" 0 0 11 3 1 #"f" 0 0 11 3 1 #" " 0 0 11 3 1 #"t" 0 0 11 3 1 #"h" 0 0 11 3 1 #"e" 0 0 11 3 1 #" " 0 0 11 3 1 #"s" 0 0 11 3 1 #"n" 0 0 11 3 1 #"a" 0 0 11 3 1 #"k" 0 0 11 3 1 #"e" 0 0 11 3 1 #"'" 0 0 11 3 1 #"s" 0 0 11 3 2 #" p" 0 0 11 3 1 #"a" 0 0 11 3 1 #"r" 0 0 11 3 1 #"t" 0 0 11 3 1 #"s" 0 0 61 29 1 #"\n" 0 0 11 3 3 #";; " 0 0 11 3 1 #"F" 0 0 11 3 1 #"o" 0 0 11 3 1 #"o" 0 0 11 3 5 #"dX = " 0 0 11 3 1 #"F" 0 0 11 3 1 #"o" 0 0 11 3 1 #"o" 0 0 11 3 1 #"d" 0 0 11 3 1 #"'" 0 0 11 3 12 #"s x position" 0 0 61 29 1 #"\n" 0 0 11 3 3 #";; " 0 0 11 3 1 #"F" 0 0 11 3 1 #"o" 0 0 11 3 1 #"o" 0 0 11 3 4 #"dY =" 0 0 11 3 1 #" " 0 0 11 3 1 #"F" 0 0 11 3 1 #"o" 0 0 11 3 1 #"o" 0 0 11 3 14 #"d's y position" 0 0 61 29 1 #"\n" 0 0 11 3 3 #";; " 0 0 11 3 1 #"S" 0 0 11 3 1 #"n" 0 0 11 3 1 #"a" 0 0 11 3 1 #"k" 0 0 11 3 1 #"e" 0 0 11 3 1 #"D" 0 0 11 3 1 #"i" 0 0 11 3 1 #"r" 0 0 11 3 1 #"e" 0 0 11 3 1 #"c" 0 0 11 3 1 #"t" 0 0 11 3 1 #"i" 0 0 11 3 1 #"o" 0 0 11 3 3 #"n =" 0 0 11 3 1 #" " 0 0 11 3 1 #"T" 0 0 11 3 1 #"h" 0 0 11 3 1 #"e" 0 0 11 3 1 #" " 0 0 11 3 1 #"d" 0 0 11 3 1 #"i" 0 0 11 3 1 #"r" 0 0 11 3 1 #"e" 0 0 11 3 1 #"c" 0 0 11 3 1 #"t" 0 0 11 3 1 #"i" 0 0 11 3 1 #"o" 0 0 11 3 1 #"n" 0 0 11 3 1 #" " 0 0 11 3 1 #"t" 0 0 11 3 1 #"h" 0 0 11 3 1 #"e" 0 0 11 3 1 #" " 0 0 11 3 1 #"s" 0 0 11 3 2 #"na" 0 0 11 3 2 #"ke" 0 0 11 3 1 #" " 0 0 11 3 1 #"i" 0 0 11 3 1 #"s" 0 0 11 3 1 #" " 0 0 11 3 1 #"m" 0 0 11 3 1 #"o" 0 0 11 3 1 #"v" 0 0 11 3 1 #"i" 0 0 11 3 1 #"n" 0 0 11 3 1 #"g" 0 0 61 29 1 #"\n" 0 0 11 3 3 #";; " 0 0 11 3 1 #"S" 0 0 11 3 1 #"c" 0 0 11 3 1 #"o" 0 0 11 3 1 #"r" 0 0 11 3 3 #"e =" 0 0 11 3 1 #" " 0 0 11 3 1 #"N" 0 0 11 3 1 #"u" 0 0 11 3 1 #"m" 0 0 11 3 1 #"b" 0 0 11 3 1 #"e" 0 0 11 3 1 #"r" 0 0 11 3 1 #" " 0 0 11 3 1 #"o" 0 0 11 3 1 #"f" 0 0 11 3 1 #" " 0 0 11 3 1 #"i" 0 0 11 3 1 #"t" 0 0 11 3 1 #"e" 0 0 11 3 1 #"m" 0 0 11 3 1 #"s" 0 0 11 3 1 #" " 0 0 11 3 1 #"e" 0 0 11 3 1 #"a" 0 0 11 3 1 #"t" 0 0 11 3 1 #"e" 0 0 11 3 1 #"n" 0 0 11 3 1 #" " 0 0 11 3 1 #"s" 0 0 11 3 1 #"o" 0 0 11 3 1 #" " 0 0 11 3 1 #"f" 0 0 11 3 1 #"a" 0 0 11 3 1 #"r" 0 0 61 29 1 #"\n" 0 0 11 3 4 #";; G" 0 0 11 3 1 #"a" 0 0 11 3 1 #"m" 0 0 11 3 1 #"e" 0 0 11 3 1 #"O" 0 0 11 3 2 #"ve" 0 0 11 3 3 #"r =" 0 0 11 3 1 #" " 0 0 11 3 1 #"H" 0 0 11 3 1 #"a" 0 0 11 3 1 #"s" 0 0 11 3 1 #" " 0 0 11 3 1 #"t" 0 0 11 3 1 #"h" 0 0 11 3 1 #"e" 0 0 11 3 1 #" " 0 0 11 3 1 #"p" 0 0 11 3 1 #"l" 0 0 11 3 1 #"a" 0 0 11 3 1 #"y" 0 0 11 3 1 #"e" 0 0 11 3 1 #"r" 0 0 11 3 1 #" " 0 0 11 3 1 #"l" 0 0 11 3 1 #"o" 0 0 11 3 1 #"s" 0 0 11 3 1 #"t" 0 0 61 29 1 #"\n" 0 0 11 3 34 #";; Paused = If the world is paused" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 13 #"define-struct" 0 0 61 3 1 #" " 0 0 8 3 5 #"World" 0 0 61 3 1 #" " 0 0 16 3 1 #"[" 0 0 8 3 5 #"Frame" 0 0 61 3 1 #" " 0 0 8 3 9 #"SnakeList" 0 0 61 3 1 #" " 0 0 8 3 5 #"FoodX" 0 0 61 3 1 #" " 0 0 8 3 5 #"FoodY" 0 0 61 3 1 #" " 0 0 8 3 1 #"S" 0 0 8 3 1 #"n" 0 0 8 3 1 #"a" 0 0 8 3 1 #"k" 0 0 8 3 2 #"eD" 0 0 8 3 1 #"i" 0 0 8 3 1 #"r" 0 0 8 3 1 #"e" 0 0 8 3 1 #"c" 0 0 8 3 1 #"t" 0 0 8 3 1 #"i" 0 0 8 3 2 #"on" 0 0 61 3 1 #" " 0 0 8 3 5 #"Score" 0 0 61 3 1 #" " 0 0 8 3 1 #"G" 0 0 8 3 1 #"a" 0 0 8 3 1 #"m" 0 0 8 3 1 #"e" 0 0 8 3 1 #"O" 0 0 8 3 1 #"v" 0 0 8 3 1 #"e" 0 0 8 3 1 #"r" 0 0 61 3 1 #" " 0 0 8 3 6 #"Paused" 0 0 16 3 2 #"])" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 48 #";; The first world that starts with the default " 0 0 11 3 6 #"values" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 8 3 12 #"InitialWorld" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"make-World" 0 0 61 3 1 #" " 0 0 14 3 1 #"0" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"list" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #"(" 0 0 8 3 14 #"make-SnakePart" 0 0 61 3 1 #" " 0 0 8 3 11 #"SnakeStartX" 0 0 61 3 1 #" " 0 0 8 3 11 #"SnakeStartY" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 11 3 1 #";" 0 0 11 3 2 #";(" 0 0 11 3 14 #"make-SnakePart" 0 0 11 3 1 #" " 0 0 11 3 11 #"SnakeStartX" 0 0 11 3 1 #" " 0 0 11 3 1 #"(" 0 0 11 3 1 #"-" 0 0 11 3 1 #" " 0 0 11 3 11 #"SnakeStartY" 0 0 11 3 1 #" " 0 0 11 3 8 #"GridSize" 0 0 11 3 2 #"))" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 11 3 1 #";" 0 0 11 3 2 #";(" 0 0 11 3 14 #"make-SnakePart" 0 0 11 3 1 #" " 0 0 11 3 11 #"SnakeStartX" 0 0 11 3 1 #" " 0 0 11 3 1 #"(" 0 0 11 3 1 #"-" 0 0 11 3 1 #" " 0 0 11 3 11 #"SnakeStartY" 0 0 11 3 1 #" " 0 0 11 3 1 #"(" 0 0 11 3 1 #"*" 0 0 11 3 1 #" " 0 0 11 3 8 #"GridSize" 0 0 11 3 1 #" " 0 0 11 3 1 #"2" 0 0 11 3 3 #")))" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 8 3 5 #"FoodX" 0 0 61 3 1 #" " 0 0 8 3 5 #"FoodY" 0 0 61 3 1 #" " 0 0 8 3 4 #"SDUp" 0 0 61 3 1 #" " 0 0 14 3 1 #"0" 0 0 61 3 1 #" " 0 0 8 3 1 #"f" 0 0 8 3 1 #"a" 0 0 8 3 1 #"l" 0 0 8 3 1 #"s" 0 0 8 3 1 #"e" 0 0 61 3 1 #" " 0 0 8 3 5 #"false" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 38 #";; Used when drawing images in a world" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 8 #"PutImage" 0 0 61 3 1 #" " 0 0 8 3 5 #"image" 0 0 61 3 1 #" " 0 0 8 3 1 #"x" 0 0 61 3 1 #" " 0 0 8 3 1 #"y" 0 0 61 3 1 #" " 0 0 8 3 6 #"image2" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"place-image" 0 0 61 3 1 #" " 0 0 8 3 5 #"image" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"+" 0 0 61 3 1 #" " 0 0 8 3 1 #"x" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"/" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"image-width" 0 0 61 3 1 #" " 0 0 8 3 5 #"image" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 14 3 1 #"2" 0 0 16 3 2 #"))" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"+" 0 0 61 3 1 #" " 0 0 8 3 1 #"y" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"/" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 12 #"image-height" 0 0 61 3 1 #" " 0 0 8 3 5 #"image" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 14 3 1 #"2" 0 0 16 3 2 #"))" 0 0 61 3 1 #" " 0 0 8 3 6 #"image2" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 48 #";; Used when drawing images in a world with out " 0 0 11 3 6 #"offset" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 12 #"PutImageNorm" 0 0 61 3 1 #" " 0 0 8 3 5 #"image" 0 0 61 3 1 #" " 0 0 8 3 1 #"x" 0 0 61 3 1 #" " 0 0 8 3 1 #"y" 0 0 61 3 1 #" " 0 0 8 3 6 #"image2" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"place-image" 0 0 61 3 1 #" " 0 0 8 3 5 #"image" 0 0 61 3 1 #" " 0 0 8 3 1 #"x" 0 0 61 3 1 #" " 0 0 8 3 1 #"y" 0 0 61 3 1 #" " 0 0 8 3 6 #"image2" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 36 #";; Used when drawing text in a world" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 7 #"PutText" 0 0 61 3 1 #" " 0 0 8 3 4 #"Text" 0 0 61 3 1 #" " 0 0 8 3 9 #"TextColor" 0 0 61 3 1 #" " 0 0 8 3 1 #"x" 0 0 61 3 1 #" " 0 0 8 3 1 #"y" 0 0 61 3 1 #" " 0 0 8 3 6 #"image2" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 8 3 12 #"PutImageNorm" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"text" 0 0 61 3 1 #" " 0 0 8 3 4 #"Text" 0 0 61 3 1 #" " 0 0 14 3 2 #"12" 0 0 61 3 1 #" " 0 0 8 3 9 #"TextColor" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 8 3 1 #"x" 0 0 61 3 1 #" " 0 0 8 3 1 #"y" 0 0 61 3 1 #" " 0 0 8 3 6 #"image2" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 36 #";; Used when drawing text in a world" 0 0 11 3 1 #" " 0 0 11 3 1 #"w" 0 0 11 3 1 #"i" 0 0 11 3 1 #"t" 0 0 11 3 1 #"h" 0 0 11 3 1 #" " 0 0 11 3 1 #"a" 0 0 11 3 1 #" " 0 0 11 3 1 #"f" 0 0 11 3 1 #"o" 0 0 11 3 1 #"n" 0 0 11 3 1 #"t" 0 0 11 3 1 #" " 0 0 11 3 1 #"s" 0 0 11 3 1 #"i" 0 0 11 3 1 #"z" 0 0 11 3 1 #"e" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 7 #"PutText" 0 0 8 3 1 #"S" 0 0 8 3 1 #"i" 0 0 8 3 1 #"z" 0 0 8 3 1 #"e" 0 0 8 3 1 #"d" 0 0 61 3 1 #" " 0 0 8 3 4 #"Text" 0 0 61 3 1 #" " 0 0 8 3 9 #"TextColor" 0 0 61 3 1 #" " 0 0 8 3 1 #"f" 0 0 8 3 3 #"ont" 0 0 8 3 1 #"s" 0 0 8 3 1 #"i" 0 0 8 3 1 #"z" 0 0 8 3 1 #"e" 0 0 61 3 1 #" " 0 0 8 3 1 #"x" 0 0 61 3 1 #" " 0 0 8 3 1 #"y" 0 0 61 3 1 #" " 0 0 8 3 6 #"image2" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 8 3 12 #"PutImageNorm" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"text" 0 0 61 3 1 #" " 0 0 8 3 4 #"Text" 0 0 61 3 1 #" " 0 0 8 3 1 #"f" 0 0 8 3 2 #"on" 0 0 8 3 1 #"t" 0 0 8 3 1 #"s" 0 0 8 3 1 #"i" 0 0 8 3 1 #"z" 0 0 8 3 1 #"e" 0 0 61 3 1 #" " 0 0 8 3 9 #"TextColor" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 8 3 1 #"x" 0 0 61 3 1 #" " 0 0 8 3 1 #"y" 0 0 61 3 1 #" " 0 0 8 3 6 #"image2" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 26 #";; Constant drawing colors" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 8 3 10 #"ColorWhite" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"make-color" 0 0 61 3 1 #" " 0 0 14 3 1 #"2" 0 0 14 3 2 #"55" 0 0 61 3 1 #" " 0 0 14 3 2 #"25" 0 0 14 3 1 #"5" 0 0 61 3 1 #" " 0 0 14 3 3 #"255" 0 0 16 3 2 #"))" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 8 3 10 #"ColorBlack" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"make-color" 0 0 61 3 1 #" " 0 0 14 3 1 #"0" 0 0 61 3 1 #" " 0 0 14 3 1 #"0" 0 0 61 3 1 #" " 0 0 14 3 1 #"0" 0 0 16 3 2 #"))" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 8 3 8 #"ColorRed" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"make-color" 0 0 61 3 1 #" " 0 0 14 3 3 #"255" 0 0 61 3 1 #" " 0 0 14 3 1 #"0" 0 0 61 3 1 #" " 0 0 14 3 1 #"0" 0 0 16 3 2 #"))" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 8 3 10 #"ColorGreen" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"make-color" 0 0 61 3 1 #" " 0 0 14 3 1 #"0" 0 0 61 3 1 #" " 0 0 14 3 3 #"255" 0 0 61 3 1 #" " 0 0 14 3 1 #"0" 0 0 16 3 2 #"))" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 8 3 9 #"ColorBlue" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"make-color" 0 0 61 3 1 #" " 0 0 14 3 1 #"0" 0 0 61 3 1 #" " 0 0 14 3 1 #"0" 0 0 61 3 1 #" " 0 0 14 3 3 #"255" 0 0 16 3 2 #"))" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 8 3 13 #"ColorDarkGrey" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"make-color" 0 0 61 3 1 #" " 0 0 14 3 3 #"100" 0 0 61 3 1 #" " 0 0 14 3 3 #"100" 0 0 61 3 1 #" " 0 0 14 3 3 #"100" 0 0 16 3 2 #"))" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 24 #";; Constants for drawing" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 8 3 10 #"Background" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 9 #"rectangle" 0 0 61 3 1 #" " 0 0 8 3 11 #"WindowWidth" 0 0 61 3 1 #" " 0 0 8 3 12 #"WindowHeight" 0 0 61 3 1 #" " 0 0 14 3 1 #"'" 0 0 8 3 5 #"solid" 0 0 61 3 1 #" " 0 0 8 3 13 #"ColorDarkGrey" 0 0 16 3 2 #"))" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 8 3 13 #"DrawSnakePart" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 9 #"rectangle" 0 0 61 3 1 #" " 0 0 8 3 8 #"GridSize" 0 0 61 3 1 #" " 0 0 8 3 8 #"GridSize" 0 0 61 3 1 #" " 0 0 14 3 1 #"'" 0 0 8 3 5 #"solid" 0 0 61 3 1 #" " 0 0 8 3 10 #"ColorGreen" 0 0 16 3 2 #"))" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 8 3 8 #"DrawFood" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 9 #"rectangle" 0 0 61 3 1 #" " 0 0 8 3 8 #"GridSize" 0 0 61 3 1 #" " 0 0 8 3 8 #"GridSize" 0 0 61 3 1 #" " 0 0 14 3 1 #"'" 0 0 8 3 5 #"solid" 0 0 61 3 1 #" " 0 0 8 3 8 #"ColorRed" 0 0 16 3 2 #"))" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 1 #";" 0 0 11 3 1 #";" 0 0 11 3 1 #" " 0 0 11 3 1 #"D" 0 0 11 3 1 #"r" 0 0 11 3 1 #"a" 0 0 11 3 1 #"w" 0 0 11 3 1 #"i" 0 0 11 3 1 #"n" 0 0 11 3 1 #"g" 0 0 11 3 1 #" " 0 0 11 3 1 #"t" 0 0 11 3 1 #"h" 0 0 11 3 1 #"e" 0 0 11 3 1 #" " 0 0 11 3 1 #"r" 0 0 11 3 1 #"e" 0 0 11 3 1 #"s" 0 0 11 3 1 #"t" 0 0 11 3 1 #" " 0 0 11 3 1 #"o" 0 0 11 3 1 #"f" 0 0 11 3 1 #" " 0 0 11 3 1 #"t" 0 0 11 3 1 #"h" 0 0 11 3 1 #"e" 0 0 11 3 1 #" " 0 0 11 3 1 #"s" 0 0 11 3 1 #"n" 0 0 11 3 1 #"a" 0 0 11 3 1 #"k" 0 0 11 3 1 #"e" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 16 3 1 #"(" 0 0 8 3 10 #"DrawSnake2" 0 0 61 3 1 #" " 0 0 8 3 5 #"image" 0 0 8 3 1 #"1" 0 0 61 3 1 #" " 0 0 8 3 9 #"SnakeList" 0 0 61 3 1 #" " 0 0 8 3 5 #"image" 0 0 8 3 1 #"2" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 9 3 4 #"cond" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 2 #"[(" 0 0 8 3 6 #"empty?" 0 0 61 3 1 #" " 0 0 8 3 9 #"SnakeList" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 8 3 1 #"i" 0 0 8 3 1 #"m" 0 0 8 3 1 #"a" 0 0 8 3 1 #"g" 0 0 8 3 1 #"e" 0 0 8 3 1 #"1" 0 0 16 3 1 #"]" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #"[" 0 0 8 3 4 #"else" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 8 #"PutImage" 0 0 61 3 1 #" " 0 0 8 3 13 #"DrawSnakePart" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-x" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 5 #"first" 0 0 61 3 1 #" " 0 0 8 3 9 #"SnakeList" 0 0 16 3 2 #"))" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-y" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 5 #"first" 0 0 61 3 1 #" " 0 0 8 3 9 #"SnakeList" 0 0 16 3 2 #"))" 0 0 61 29 1 #"\n" 0 0 61 3 6 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"DrawSnake2" 0 0 61 3 1 #" " 0 0 8 3 5 #"image" 0 0 8 3 1 #"1" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"rest" 0 0 61 3 1 #" " 0 0 8 3 9 #"SnakeList" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 8 3 5 #"image" 0 0 8 3 1 #"2" 0 0 16 3 3 #"))]" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 1 #";" 0 0 11 3 1 #";" 0 0 11 3 1 #" " 0 0 11 3 1 #"D" 0 0 11 3 1 #"r" 0 0 11 3 1 #"a" 0 0 11 3 2 #"wi" 0 0 11 3 1 #"n" 0 0 11 3 1 #"g" 0 0 11 3 1 #" " 0 0 11 3 1 #"t" 0 0 11 3 1 #"h" 0 0 11 3 1 #"e" 0 0 11 3 1 #" " 0 0 11 3 1 #"f" 0 0 11 3 1 #"i" 0 0 11 3 1 #"r" 0 0 11 3 1 #"s" 0 0 11 3 1 #"t" 0 0 11 3 1 #" " 0 0 11 3 1 #"p" 0 0 11 3 1 #"a" 0 0 11 3 1 #"r" 0 0 11 3 1 #"t" 0 0 11 3 1 #" " 0 0 11 3 1 #"o" 0 0 11 3 1 #"f" 0 0 11 3 1 #" " 0 0 11 3 1 #"t" 0 0 11 3 1 #"h" 0 0 11 3 1 #"e" 0 0 11 3 1 #" " 0 0 11 3 1 #"s" 0 0 11 3 1 #"n" 0 0 11 3 1 #"a" 0 0 11 3 1 #"k" 0 0 11 3 1 #"e" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 9 #"DrawSnake" 0 0 61 3 1 #" " 0 0 8 3 9 #"SnakeList" 0 0 61 3 1 #" " 0 0 8 3 6 #"image2" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"DrawSnake2" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 8 #"PutImage" 0 0 61 3 1 #" " 0 0 8 3 13 #"DrawSnakePart" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-x" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 5 #"first" 0 0 61 3 1 #" " 0 0 8 3 9 #"SnakeList" 0 0 16 3 2 #"))" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-y" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 5 #"first" 0 0 61 3 1 #" " 0 0 8 3 9 #"SnakeList" 0 0 16 3 2 #"))" 0 0 61 3 1 #" " 0 0 8 3 1 #"i" 0 0 8 3 1 #"m" 0 0 8 3 1 #"a" 0 0 8 3 1 #"g" 0 0 8 3 1 #"e" 0 0 8 3 1 #"2" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"rest" 0 0 61 3 1 #" " 0 0 8 3 9 #"SnakeList" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 8 3 6 #"image2" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 1 #";" 0 0 11 3 1 #";" 0 0 11 3 1 #" " 0 0 11 3 1 #"T" 0 0 11 3 1 #"h" 0 0 11 3 1 #"i" 0 0 11 3 1 #"s" 0 0 11 3 1 #" " 0 0 11 3 1 #"d" 0 0 11 3 1 #"r" 0 0 11 3 1 #"a" 0 0 11 3 1 #"w" 0 0 11 3 1 #"s" 0 0 11 3 1 #" " 0 0 11 3 1 #"t" 0 0 11 3 1 #"h" 0 0 11 3 1 #"e" 0 0 11 3 1 #" " 0 0 11 3 1 #"g" 0 0 11 3 1 #"a" 0 0 11 3 1 #"m" 0 0 11 3 1 #"e" 0 0 11 3 1 #" " 0 0 11 3 1 #"i" 0 0 11 3 1 #"n" 0 0 11 3 1 #" " 0 0 11 3 1 #"a" 0 0 11 3 1 #"c" 0 0 11 3 1 #"t" 0 0 11 3 1 #"i" 0 0 11 3 1 #"o" 0 0 11 3 1 #"n" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 1 #"d" 0 0 9 3 1 #"e" 0 0 9 3 1 #"f" 0 0 9 3 1 #"i" 0 0 9 3 1 #"n" 0 0 9 3 1 #"e" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"D" 0 0 8 3 1 #"r" 0 0 8 3 2 #"aw" 0 0 8 3 1 #"G" 0 0 8 3 1 #"a" 0 0 8 3 1 #"m" 0 0 8 3 1 #"e" 0 0 61 3 1 #" " 0 0 8 3 1 #"a" 0 0 8 3 1 #"w" 0 0 8 3 1 #"o" 0 0 8 3 1 #"r" 0 0 8 3 1 #"l" 0 0 8 3 1 #"d" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 8 3 7 #"PutText" 0 0 8 3 1 #"S" 0 0 8 3 1 #"i" 0 0 8 3 1 #"z" 0 0 8 3 1 #"e" 0 0 8 3 1 #"d" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 14 #"number->string" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"World-Score" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 2 #"))" 0 0 61 3 1 #" " 0 0 8 3 5 #"Color" 0 0 8 3 1 #"W" 0 0 8 3 1 #"h" 0 0 8 3 1 #"i" 0 0 8 3 2 #"te" 0 0 61 3 1 #" " 0 0 14 3 1 #"1" 0 0 14 3 1 #"8" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"/" 0 0 61 3 1 #" " 0 0 8 3 11 #"WindowWidth" 0 0 61 3 1 #" " 0 0 14 3 1 #"2" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 14 3 1 #"0" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 8 3 9 #"DrawSnake" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 15 #"World-SnakeList" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 8 3 8 #"PutImage" 0 0 61 3 1 #" " 0 0 8 3 8 #"DrawFood" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"World-FoodX" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 6 #"World-" 0 0 8 3 1 #"F" 0 0 8 3 1 #"o" 0 0 8 3 1 #"o" 0 0 8 3 1 #"d" 0 0 8 3 1 #"Y" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 8 3 8 #"PutImage" 0 0 61 3 1 #" " 0 0 8 3 10 #"Background" 0 0 61 3 1 #" " 0 0 14 3 1 #"0" 0 0 61 3 1 #" " 0 0 14 3 1 #"0" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"empty-scene" 0 0 61 3 1 #" " 0 0 8 3 11 #"WindowWidth" 0 0 61 3 1 #" " 0 0 8 3 12 #"WindowHeight" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 4 #"))))" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 50 #";; This takes care of making sure everything gets " 0 0 11 3 5 #"drawn" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"Draw-Window" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 9 3 1 #"c" 0 0 9 3 1 #"o" 0 0 9 3 1 #"n" 0 0 9 3 1 #"d" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 2 #"[(" 0 0 8 3 14 #"World-GameOver" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 6 #" " 0 0 16 3 1 #"(" 0 0 8 3 7 #"PutText" 0 0 8 3 1 #"S" 0 0 8 3 1 #"i" 0 0 8 3 1 #"z" 0 0 8 3 1 #"e" 0 0 8 3 1 #"d" 0 0 61 3 1 #" " 0 0 13 3 1 #"\"" 0 0 13 3 1 #"G" 0 0 13 3 1 #"A" 0 0 13 3 1 #"M" 0 0 13 3 1 #"E" 0 0 13 3 1 #" " 0 0 13 3 1 #"O" 0 0 13 3 1 #"V" 0 0 13 3 1 #"E" 0 0 13 3 2 #"R\"" 0 0 61 3 1 #" " 0 0 8 3 5 #"Color" 0 0 8 3 1 #"B" 0 0 8 3 1 #"l" 0 0 8 3 1 #"u" 0 0 8 3 1 #"e" 0 0 61 3 1 #" " 0 0 14 3 1 #"5" 0 0 14 3 1 #"0" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"/" 0 0 61 3 1 #" " 0 0 8 3 11 #"WindowWidth" 0 0 61 3 1 #" " 0 0 14 3 1 #"4" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"/" 0 0 61 3 1 #" " 0 0 8 3 6 #"Window" 0 0 8 3 2 #"He" 0 0 8 3 1 #"i" 0 0 8 3 1 #"g" 0 0 8 3 1 #"h" 0 0 8 3 1 #"t" 0 0 61 3 1 #" " 0 0 14 3 1 #"4" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 6 #" " 0 0 16 3 1 #"(" 0 0 8 3 7 #"PutText" 0 0 8 3 1 #"S" 0 0 8 3 1 #"i" 0 0 8 3 1 #"z" 0 0 8 3 1 #"e" 0 0 8 3 1 #"d" 0 0 61 3 1 #" " 0 0 13 3 1 #"\"" 0 0 13 3 1 #"P" 0 0 13 3 1 #"r" 0 0 13 3 1 #"e" 0 0 13 3 1 #"s" 0 0 13 3 1 #"s" 0 0 13 3 1 #" " 0 0 13 3 1 #"'" 0 0 13 3 1 #"n" 0 0 13 3 1 #"'" 0 0 13 3 1 #" " 0 0 13 3 1 #"t" 0 0 13 3 1 #"o" 0 0 13 3 1 #" " 0 0 13 3 1 #"r" 0 0 13 3 1 #"e" 0 0 13 3 1 #"s" 0 0 13 3 1 #"t" 0 0 13 3 1 #"a" 0 0 13 3 1 #"r" 0 0 13 3 2 #"t\"" 0 0 61 3 1 #" " 0 0 8 3 5 #"Color" 0 0 8 3 1 #"B" 0 0 8 3 1 #"l" 0 0 8 3 1 #"u" 0 0 8 3 1 #"e" 0 0 61 3 1 #" " 0 0 14 3 1 #"1" 0 0 14 3 1 #"6" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"+" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"/" 0 0 61 3 1 #" " 0 0 8 3 11 #"WindowWidth" 0 0 61 3 1 #" " 0 0 14 3 1 #"4" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 14 3 1 #"1" 0 0 14 3 1 #"0" 0 0 14 3 1 #"0" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"-" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"/" 0 0 61 3 1 #" " 0 0 8 3 6 #"Window" 0 0 8 3 2 #"He" 0 0 8 3 1 #"i" 0 0 8 3 1 #"g" 0 0 8 3 1 #"h" 0 0 8 3 1 #"t" 0 0 61 11 1 #" " 0 0 14 3 1 #"2" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 14 3 2 #"50" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 6 #" " 0 0 16 3 1 #"(" 0 0 8 3 8 #"DrawGame" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 3 #")))" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #"]" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 2 #"[(" 0 0 8 3 6 #"World-" 0 0 8 3 1 #"P" 0 0 8 3 1 #"a" 0 0 8 3 1 #"u" 0 0 8 3 1 #"s" 0 0 8 3 1 #"e" 0 0 8 3 1 #"d" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 6 #" " 0 0 16 3 1 #"(" 0 0 8 3 7 #"PutText" 0 0 8 3 1 #"S" 0 0 8 3 1 #"i" 0 0 8 3 1 #"z" 0 0 8 3 1 #"e" 0 0 8 3 1 #"d" 0 0 61 3 1 #" " 0 0 13 3 1 #"\"" 0 0 13 3 1 #"P" 0 0 13 3 1 #"A" 0 0 13 3 1 #"U" 0 0 13 3 1 #"S" 0 0 13 3 1 #"E" 0 0 13 3 2 #"D\"" 0 0 61 3 1 #" " 0 0 8 3 5 #"Color" 0 0 8 3 1 #"B" 0 0 8 3 1 #"l" 0 0 8 3 1 #"u" 0 0 8 3 1 #"e" 0 0 61 3 1 #" " 0 0 14 3 1 #"5" 0 0 14 3 1 #"0" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"+" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"/" 0 0 61 3 1 #" " 0 0 8 3 11 #"WindowWidth" 0 0 61 3 1 #" " 0 0 14 3 1 #"4" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 14 3 2 #"50" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"/" 0 0 61 3 1 #" " 0 0 8 3 6 #"Window" 0 0 8 3 2 #"He" 0 0 8 3 1 #"i" 0 0 8 3 1 #"g" 0 0 8 3 1 #"h" 0 0 8 3 1 #"t" 0 0 61 3 1 #" " 0 0 14 3 1 #"4" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 6 #" " 0 0 16 3 1 #"(" 0 0 8 3 8 #"DrawGame" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 2 #"))" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #"]" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #"[" 0 0 8 3 1 #"e" 0 0 8 3 1 #"l" 0 0 8 3 1 #"s" 0 0 8 3 1 #"e" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 8 #"DrawGame" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 2 #")]" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 1 #";" 0 0 11 3 1 #";" 0 0 11 3 1 #" " 0 0 11 3 1 #"U" 0 0 11 3 1 #"p" 0 0 11 3 1 #"d" 0 0 11 3 1 #"a" 0 0 11 3 1 #"t" 0 0 11 3 1 #"e" 0 0 11 3 1 #"s" 0 0 11 3 1 #" " 0 0 11 3 1 #"a" 0 0 11 3 1 #" " 0 0 11 3 1 #"i" 0 0 11 3 1 #"n" 0 0 11 3 1 #"d" 0 0 11 3 1 #"i" 0 0 11 3 1 #"v" 0 0 11 3 2 #"id" 0 0 11 3 1 #"u" 0 0 11 3 1 #"a" 0 0 11 3 1 #"l" 0 0 11 3 1 #" " 0 0 11 3 1 #"p" 0 0 11 3 1 #"a" 0 0 11 3 1 #"r" 0 0 11 3 1 #"t" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 1 #"d" 0 0 9 3 1 #"e" 0 0 9 3 1 #"f" 0 0 9 3 1 #"i" 0 0 9 3 1 #"n" 0 0 9 3 1 #"e" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"UpdatePart" 0 0 61 3 1 #" " 0 0 8 3 4 #"Part" 0 0 61 3 1 #" " 0 0 8 3 1 #"L" 0 0 8 3 1 #"a" 0 0 8 3 1 #"s" 0 0 8 3 1 #"t" 0 0 8 3 2 #"Pa" 0 0 8 3 1 #"r" 0 0 8 3 1 #"t" 0 0 61 3 1 #" " 0 0 8 3 1 #"D" 0 0 8 3 1 #"i" 0 0 8 3 1 #"r" 0 0 8 3 2 #"ec" 0 0 8 3 1 #"t" 0 0 8 3 1 #"i" 0 0 8 3 1 #"o" 0 0 8 3 1 #"n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 9 3 1 #"c" 0 0 9 3 1 #"o" 0 0 9 3 1 #"n" 0 0 9 3 1 #"d" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 2 #"[(" 0 0 8 3 1 #"n" 0 0 8 3 1 #"o" 0 0 8 3 1 #"t" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 6 #"empty?" 0 0 61 3 1 #" " 0 0 8 3 4 #"Part" 0 0 16 3 2 #"))" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 61 3 4 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"m" 0 0 8 3 1 #"a" 0 0 8 3 1 #"k" 0 0 8 3 1 #"e" 0 0 8 3 1 #"-" 0 0 8 3 9 #"SnakePart" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 61 3 2 #" " 0 0 61 3 1 #" " 0 0 61 3 2 #" " 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-x" 0 0 61 3 1 #" " 0 0 8 3 1 #"P" 0 0 8 3 3 #"art" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 1 #" " 0 0 61 3 2 #" " 0 0 61 3 2 #" " 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"SnakePart-" 0 0 8 3 1 #"y" 0 0 61 3 1 #" " 0 0 8 3 1 #"P" 0 0 8 3 1 #"a" 0 0 8 3 1 #"r" 0 0 8 3 1 #"t" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 61 3 1 #" " 0 0 61 3 2 #" " 0 0 61 3 1 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #"]" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #"[" 0 0 8 3 1 #"e" 0 0 8 3 1 #"l" 0 0 8 3 1 #"s" 0 0 8 3 1 #"e" 0 0 61 29 1 #"\n" 0 0 61 3 6 #" " 0 0 16 3 1 #"(" 0 0 9 3 1 #"c" 0 0 9 3 1 #"o" 0 0 9 3 1 #"n" 0 0 9 3 1 #"d" 0 0 61 29 1 #"\n" 0 0 61 3 8 #" " 0 0 16 3 2 #"[(" 0 0 8 3 1 #"=" 0 0 61 3 1 #" " 0 0 8 3 1 #"D" 0 0 8 3 1 #"i" 0 0 8 3 1 #"r" 0 0 8 3 2 #"ec" 0 0 8 3 1 #"t" 0 0 8 3 1 #"i" 0 0 8 3 1 #"o" 0 0 8 3 1 #"n" 0 0 61 3 1 #" " 0 0 8 3 1 #"S" 0 0 8 3 1 #"D" 0 0 8 3 1 #"U" 0 0 8 3 1 #"p" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 14 #"make-SnakePart" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-x" 0 0 61 3 1 #" " 0 0 8 3 1 #"L" 0 0 8 3 1 #"a" 0 0 8 3 1 #"s" 0 0 8 3 5 #"tPart" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"-" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-y" 0 0 61 3 1 #" " 0 0 8 3 1 #"L" 0 0 8 3 1 #"a" 0 0 8 3 1 #"s" 0 0 8 3 5 #"tPart" 0 0 16 3 1 #")" 0 0 61 11 1 #" " 0 0 8 3 8 #"GridSize" 0 0 16 3 3 #"))]" 0 0 61 29 1 #"\n" 0 0 61 3 8 #" " 0 0 16 3 2 #"[(" 0 0 8 3 1 #"=" 0 0 61 3 1 #" " 0 0 8 3 1 #"D" 0 0 8 3 1 #"i" 0 0 8 3 1 #"r" 0 0 8 3 2 #"ec" 0 0 8 3 1 #"t" 0 0 8 3 1 #"i" 0 0 8 3 1 #"o" 0 0 8 3 1 #"n" 0 0 61 3 1 #" " 0 0 8 3 1 #"S" 0 0 8 3 1 #"D" 0 0 8 3 1 #"L" 0 0 8 3 1 #"e" 0 0 8 3 1 #"f" 0 0 8 3 1 #"t" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 14 #"make-SnakePart" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"-" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-x" 0 0 61 3 1 #" " 0 0 8 3 1 #"L" 0 0 8 3 1 #"a" 0 0 8 3 1 #"s" 0 0 8 3 5 #"tPart" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 8 3 8 #"GridSize" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-y" 0 0 61 11 1 #" " 0 0 8 3 1 #"L" 0 0 8 3 1 #"a" 0 0 8 3 1 #"s" 0 0 8 3 5 #"tPart" 0 0 16 3 3 #"))]" 0 0 61 29 1 #"\n" 0 0 61 3 8 #" " 0 0 16 3 2 #"[(" 0 0 8 3 1 #"=" 0 0 61 3 1 #" " 0 0 8 3 1 #"D" 0 0 8 3 1 #"i" 0 0 8 3 1 #"r" 0 0 8 3 2 #"ec" 0 0 8 3 1 #"t" 0 0 8 3 1 #"i" 0 0 8 3 1 #"o" 0 0 8 3 1 #"n" 0 0 61 3 1 #" " 0 0 8 3 1 #"S" 0 0 8 3 1 #"D" 0 0 8 3 1 #"D" 0 0 8 3 1 #"o" 0 0 8 3 1 #"w" 0 0 8 3 1 #"n" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 14 #"make-SnakePart" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-x" 0 0 61 3 1 #" " 0 0 8 3 1 #"L" 0 0 8 3 1 #"a" 0 0 8 3 1 #"s" 0 0 8 3 5 #"tPart" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"+" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-y" 0 0 61 3 1 #" " 0 0 8 3 1 #"L" 0 0 8 3 1 #"a" 0 0 8 3 1 #"s" 0 0 8 3 5 #"tPart" 0 0 16 3 1 #")" 0 0 61 11 1 #" " 0 0 8 3 8 #"GridSize" 0 0 16 3 3 #"))]" 0 0 61 29 1 #"\n" 0 0 61 3 8 #" " 0 0 16 3 2 #"[(" 0 0 8 3 1 #"=" 0 0 61 3 1 #" " 0 0 8 3 1 #"D" 0 0 8 3 1 #"i" 0 0 8 3 1 #"r" 0 0 8 3 2 #"ec" 0 0 8 3 1 #"t" 0 0 8 3 1 #"i" 0 0 8 3 1 #"o" 0 0 8 3 1 #"n" 0 0 61 3 1 #" " 0 0 8 3 1 #"S" 0 0 8 3 1 #"D" 0 0 8 3 1 #"R" 0 0 8 3 1 #"i" 0 0 8 3 1 #"g" 0 0 8 3 1 #"h" 0 0 8 3 1 #"t" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 14 #"make-SnakePart" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"+" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-x" 0 0 61 3 1 #" " 0 0 8 3 1 #"L" 0 0 8 3 1 #"a" 0 0 8 3 1 #"s" 0 0 8 3 5 #"tPart" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 8 3 8 #"GridSize" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-y" 0 0 61 11 1 #" " 0 0 8 3 1 #"L" 0 0 8 3 1 #"a" 0 0 8 3 1 #"s" 0 0 8 3 5 #"tPart" 0 0 16 3 3 #"))]" 0 0 61 29 1 #"\n" 0 0 61 3 8 #" " 0 0 16 3 1 #"[" 0 0 8 3 1 #"e" 0 0 8 3 1 #"l" 0 0 8 3 1 #"s" 0 0 8 3 1 #"e" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 14 #"make-SnakePart" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-x" 0 0 61 3 1 #" " 0 0 8 3 1 #"L" 0 0 8 3 1 #"a" 0 0 8 3 1 #"s" 0 0 8 3 5 #"tPart" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-y" 0 0 61 3 1 #" " 0 0 8 3 1 #"L" 0 0 8 3 1 #"a" 0 0 8 3 1 #"s" 0 0 8 3 5 #"tPart" 0 0 16 3 3 #"))]" 0 0 61 29 1 #"\n" 0 0 61 3 6 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #"]" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 2 #";;" 0 0 11 3 1 #" " 0 0 11 3 1 #"U" 0 0 11 3 1 #"p" 0 0 11 3 1 #"d" 0 0 11 3 1 #"a" 0 0 11 3 1 #"t" 0 0 11 3 1 #"e" 0 0 11 3 2 #"s " 0 0 11 3 1 #"t" 0 0 11 3 1 #"h" 0 0 11 3 1 #"e" 0 0 11 3 1 #" " 0 0 11 3 1 #"p" 0 0 11 3 1 #"a" 0 0 11 3 1 #"r" 0 0 11 3 1 #"t" 0 0 11 3 1 #"s" 0 0 11 3 1 #" " 0 0 11 3 1 #"o" 0 0 11 3 1 #"f" 0 0 11 3 1 #" " 0 0 11 3 1 #"t" 0 0 11 3 1 #"h" 0 0 11 3 1 #"e" 0 0 11 3 1 #" " 0 0 11 3 1 #"s" 0 0 11 3 1 #"n" 0 0 11 3 1 #"a" 0 0 11 3 1 #"k" 0 0 11 3 1 #"e" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"UpdateSnake" 0 0 8 3 1 #"B" 0 0 8 3 1 #"o" 0 0 8 3 1 #"d" 0 0 8 3 1 #"y" 0 0 61 3 1 #" " 0 0 8 3 8 #"TheSnake" 0 0 61 3 1 #" " 0 0 8 3 9 #"Direction" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 9 3 4 #"cond" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 2 #"[(" 0 0 8 3 6 #"empty?" 0 0 61 3 1 #" " 0 0 8 3 1 #"T" 0 0 8 3 1 #"h" 0 0 8 3 1 #"e" 0 0 8 3 1 #"S" 0 0 8 3 2 #"na" 0 0 8 3 1 #"k" 0 0 8 3 1 #"e" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 8 3 1 #"e" 0 0 8 3 1 #"m" 0 0 8 3 1 #"p" 0 0 8 3 1 #"t" 0 0 8 3 1 #"y" 0 0 16 3 1 #"]" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #"[" 0 0 8 3 4 #"else" 0 0 61 29 1 #"\n" 0 0 61 3 6 #" " 0 0 16 3 1 #"(" 0 0 8 3 2 #"co" 0 0 8 3 1 #"n" 0 0 8 3 1 #"s" 0 0 61 29 1 #"\n" 0 0 61 3 8 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"U" 0 0 8 3 1 #"p" 0 0 8 3 1 #"d" 0 0 8 3 2 #"at" 0 0 8 3 2 #"eP" 0 0 8 3 1 #"a" 0 0 8 3 1 #"r" 0 0 8 3 1 #"t" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"i" 0 0 8 3 1 #"f" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"e" 0 0 8 3 1 #"m" 0 0 8 3 1 #"p" 0 0 8 3 1 #"t" 0 0 8 3 1 #"y" 0 0 8 3 1 #"?" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"rest" 0 0 61 3 1 #" " 0 0 8 3 8 #"TheSnake" 0 0 16 3 2 #"))" 0 0 61 3 1 #" " 0 0 8 3 1 #"e" 0 0 8 3 1 #"m" 0 0 8 3 1 #"p" 0 0 8 3 1 #"t" 0 0 8 3 1 #"y" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 5 #"first" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"rest" 0 0 61 3 1 #" " 0 0 8 3 8 #"TheSnake" 0 0 16 3 3 #")))" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"f" 0 0 8 3 1 #"i" 0 0 8 3 1 #"r" 0 0 8 3 1 #"s" 0 0 8 3 1 #"t" 0 0 61 3 1 #" " 0 0 8 3 1 #"T" 0 0 8 3 1 #"h" 0 0 8 3 1 #"e" 0 0 8 3 1 #"S" 0 0 8 3 2 #"na" 0 0 8 3 1 #"k" 0 0 8 3 1 #"e" 0 0 16 3 1 #")" 0 0 61 11 1 #" " 0 0 8 3 1 #"D" 0 0 8 3 1 #"i" 0 0 8 3 1 #"r" 0 0 8 3 3 #"ect" 0 0 8 3 1 #"i" 0 0 8 3 2 #"on" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 8 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"U" 0 0 8 3 1 #"p" 0 0 8 3 1 #"d" 0 0 8 3 1 #"a" 0 0 8 3 1 #"t" 0 0 8 3 3 #"eSn" 0 0 8 3 1 #"a" 0 0 8 3 1 #"k" 0 0 8 3 1 #"e" 0 0 8 3 1 #"B" 0 0 8 3 1 #"o" 0 0 8 3 1 #"d" 0 0 8 3 1 #"y" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"rest" 0 0 61 3 1 #" " 0 0 8 3 8 #"TheSnake" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 8 3 1 #"D" 0 0 8 3 1 #"i" 0 0 8 3 1 #"r" 0 0 8 3 1 #"e" 0 0 8 3 2 #"ct" 0 0 8 3 1 #"i" 0 0 8 3 2 #"on" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 6 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #"]" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 40 #";; Checks if the piece of foor was eaten" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"IsFoodEaten" 0 0 61 3 1 #" " 0 0 8 3 5 #"FoodX" 0 0 61 3 1 #" " 0 0 8 3 5 #"FoodY" 0 0 61 3 1 #" " 0 0 8 3 8 #"TheSnake" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 8 3 2 #"if" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #"(" 0 0 8 3 3 #"and" 0 0 61 29 1 #"\n" 0 0 61 3 6 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"=" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-x" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"last" 0 0 61 3 1 #" " 0 0 8 3 8 #"TheSnake" 0 0 16 3 2 #"))" 0 0 61 3 1 #" " 0 0 8 3 5 #"FoodX" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 6 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"=" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-y" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"last" 0 0 61 3 1 #" " 0 0 8 3 8 #"TheSnake" 0 0 16 3 2 #"))" 0 0 61 3 1 #" " 0 0 8 3 5 #"FoodY" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 8 3 4 #"true" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 8 3 5 #"false" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 1 #";" 0 0 11 3 1 #";" 0 0 11 3 1 #" " 0 0 11 3 1 #"U" 0 0 11 3 1 #"p" 0 0 11 3 1 #"d" 0 0 11 3 1 #"a" 0 0 11 3 1 #"t" 0 0 11 3 1 #"e" 0 0 11 3 1 #"s" 0 0 11 3 1 #" " 0 0 11 3 1 #"t" 0 0 11 3 1 #"h" 0 0 11 3 1 #"e" 0 0 11 3 1 #" " 0 0 11 3 1 #"s" 0 0 11 3 1 #"n" 0 0 11 3 1 #"a" 0 0 11 3 1 #"k" 0 0 11 3 1 #"e" 0 0 11 3 1 #" " 0 0 11 3 1 #"a" 0 0 11 3 1 #"n" 0 0 11 3 1 #"d" 0 0 11 3 1 #" " 0 0 11 3 1 #"a" 0 0 11 3 1 #"d" 0 0 11 3 1 #"d" 0 0 11 3 1 #"s" 0 0 11 3 1 #" " 0 0 11 3 1 #"a" 0 0 11 3 1 #" " 0 0 11 3 1 #"s" 0 0 11 3 1 #"n" 0 0 11 3 1 #"a" 0 0 11 3 1 #"k" 0 0 11 3 2 #"e " 0 0 11 3 1 #"p" 0 0 11 3 1 #"a" 0 0 11 3 1 #"r" 0 0 11 3 1 #"t" 0 0 11 3 1 #" " 0 0 11 3 1 #"i" 0 0 11 3 1 #"f" 0 0 11 3 1 #" " 0 0 11 3 1 #"i" 0 0 11 3 1 #"t" 0 0 11 3 1 #" " 0 0 11 3 1 #"n" 0 0 11 3 1 #"e" 0 0 11 3 1 #"e" 0 0 11 3 1 #"d" 0 0 11 3 1 #"s" 0 0 11 3 1 #" " 0 0 11 3 1 #"t" 0 0 11 3 1 #"o" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 1 #"d" 0 0 9 3 4 #"efin" 0 0 9 3 1 #"e" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"U" 0 0 8 3 1 #"p" 0 0 8 3 1 #"d" 0 0 8 3 2 #"at" 0 0 8 3 2 #"eS" 0 0 8 3 1 #"n" 0 0 8 3 1 #"a" 0 0 8 3 1 #"k" 0 0 8 3 1 #"e" 0 0 61 3 1 #" " 0 0 8 3 1 #"T" 0 0 8 3 1 #"h" 0 0 8 3 2 #"eS" 0 0 8 3 1 #"n" 0 0 8 3 1 #"a" 0 0 8 3 1 #"k" 0 0 8 3 1 #"e" 0 0 61 3 1 #" " 0 0 8 3 1 #"D" 0 0 8 3 1 #"i" 0 0 8 3 1 #"r" 0 0 8 3 1 #"e" 0 0 8 3 1 #"c" 0 0 8 3 1 #"t" 0 0 8 3 1 #"i" 0 0 8 3 1 #"o" 0 0 8 3 1 #"n" 0 0 61 3 1 #" " 0 0 8 3 1 #"F" 0 0 8 3 1 #"o" 0 0 8 3 1 #"o" 0 0 8 3 1 #"d" 0 0 8 3 1 #"X" 0 0 61 3 1 #" " 0 0 8 3 1 #"F" 0 0 8 3 1 #"o" 0 0 8 3 1 #"o" 0 0 8 3 1 #"d" 0 0 8 3 1 #"Y" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 8 3 2 #"if" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"IsFoodEaten" 0 0 61 3 1 #" " 0 0 8 3 2 #"Fo" 0 0 8 3 1 #"o" 0 0 8 3 1 #"d" 0 0 8 3 1 #"X" 0 0 61 3 1 #" " 0 0 8 3 2 #"Fo" 0 0 8 3 1 #"o" 0 0 8 3 1 #"d" 0 0 8 3 1 #"Y" 0 0 61 3 1 #" " 0 0 8 3 8 #"TheSnake" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"c" 0 0 8 3 1 #"o" 0 0 8 3 1 #"n" 0 0 8 3 1 #"s" 0 0 61 29 1 #"\n" 0 0 61 3 6 #" " 0 0 16 3 1 #"(" 0 0 8 3 14 #"make-SnakePart" 0 0 61 29 1 #"\n" 0 0 61 3 8 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-x" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"last" 0 0 61 3 1 #" " 0 0 8 3 8 #"TheSnake" 0 0 16 3 2 #"))" 0 0 61 29 1 #"\n" 0 0 61 3 8 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"SnakePart-" 0 0 8 3 1 #"y" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"last" 0 0 61 3 1 #" " 0 0 8 3 8 #"TheSnake" 0 0 16 3 3 #")))" 0 0 61 29 1 #"\n" 0 0 61 3 6 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"UpdateSnake" 0 0 8 3 1 #"B" 0 0 8 3 1 #"o" 0 0 8 3 1 #"d" 0 0 8 3 1 #"y" 0 0 61 3 1 #" " 0 0 8 3 8 #"TheSnake" 0 0 61 3 1 #" " 0 0 8 3 9 #"Direction" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"UpdateSnake" 0 0 8 3 3 #"Bod" 0 0 8 3 1 #"y" 0 0 61 3 1 #" " 0 0 8 3 8 #"TheSnake" 0 0 61 3 1 #" " 0 0 8 3 9 #"Direction" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 7 00000000415 61 00000000000 1 00000000000 68 0 11 3 40 #";; Checks if the piece of foor was eaten" 0 0 2 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 2 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"IsFoodEaten" 0 0 2 3 1 #" " 0 0 8 3 5 #"FoodX" 0 0 2 3 1 #" " 0 0 8 3 5 #"FoodY" 0 0 2 3 1 #" " 0 0 8 3 8 #"TheSnake" 0 0 16 3 1 #")" 0 0 2 29 1 #"\n" 0 0 2 3 2 #" " 0 0 16 3 1 #"(" 0 0 8 3 2 #"if" 0 0 2 29 1 #"\n" 0 0 2 3 4 #" " 0 0 16 3 1 #"(" 0 0 8 3 3 #"and" 0 0 2 29 1 #"\n" 0 0 2 3 6 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"=" 0 0 2 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-x" 0 0 2 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 5 #"first" 0 0 2 3 1 #" " 0 0 8 3 8 #"TheSnake" 0 0 16 3 2 #"))" 0 0 2 3 1 #" " 0 0 8 3 5 #"FoodX" 0 0 16 3 1 #")" 0 0 2 29 1 #"\n" 0 0 2 3 6 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"=" 0 0 2 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-y" 0 0 2 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 5 #"first" 0 0 2 3 1 #" " 0 0 8 3 8 #"TheSnake" 0 0 16 3 2 #"))" 0 0 2 3 1 #" " 0 0 8 3 5 #"FoodY" 0 0 16 3 1 #")" 0 0 2 29 1 #"\n" 0 0 2 3 4 #" " 0 0 16 3 1 #")" 0 0 2 29 1 #"\n" 0 0 2 3 4 #" " 0 0 8 3 4 #"true" 0 0 2 29 1 #"\n" 0 0 2 3 4 #" " 0 0 8 3 5 #"false" 0 0 2 29 1 #"\n" 0 0 2 3 2 #" " 0 0 16 3 1 #")" 0 0 2 29 1 #"\n" 0 0 16 3 1 #")" 0 00000000000 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 40 #";; Checks if the piece of foor was eaten" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 2 #"Is" 0 0 8 3 1 #"H" 0 0 8 3 1 #"i" 0 0 8 3 1 #"t" 0 0 61 3 1 #" " 0 0 8 3 5 #"FoodX" 0 0 61 3 1 #" " 0 0 8 3 5 #"FoodY" 0 0 61 3 1 #" " 0 0 8 3 8 #"TheSnake" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 8 3 2 #"if" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #"(" 0 0 8 3 3 #"and" 0 0 61 29 1 #"\n" 0 0 61 3 6 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"=" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-x" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"f" 0 0 8 3 1 #"i" 0 0 8 3 1 #"r" 0 0 8 3 1 #"s" 0 0 8 3 1 #"t" 0 0 61 3 1 #" " 0 0 8 3 8 #"TheSnake" 0 0 16 3 2 #"))" 0 0 61 3 1 #" " 0 0 8 3 5 #"FoodX" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 6 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"=" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-y" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"f" 0 0 8 3 1 #"i" 0 0 8 3 1 #"r" 0 0 8 3 1 #"s" 0 0 8 3 1 #"t" 0 0 61 3 1 #" " 0 0 8 3 8 #"TheSnake" 0 0 16 3 2 #"))" 0 0 61 3 1 #" " 0 0 8 3 5 #"FoodY" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 8 3 4 #"true" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 8 3 5 #"false" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 40 #";; Checks if a point is inside the snake" 0 0 61 29 1 #"\n" 0 0 11 3 36 #";; Gives 0 is not, otherwise a it is" 0 0 61 29 1 #"\n" 0 0 11 3 1 #";" 0 0 11 3 1 #";" 0 0 11 3 1 #" " 0 0 11 3 1 #"N" 0 0 11 3 1 #"o" 0 0 11 3 1 #"t" 0 0 11 3 1 #" " 0 0 11 3 1 #"i" 0 0 11 3 4 #"n th" 0 0 11 3 1 #"e" 0 0 11 3 1 #" " 0 0 11 3 1 #"l" 0 0 11 3 1 #"a" 0 0 11 3 1 #"s" 0 0 11 3 1 #"t" 0 0 11 3 1 #" " 0 0 11 3 1 #"o" 0 0 11 3 1 #"f" 0 0 11 3 1 #" " 0 0 11 3 1 #"t" 0 0 11 3 1 #"h" 0 0 11 3 1 #"e" 0 0 11 3 1 #" " 0 0 11 3 1 #"l" 0 0 11 3 1 #"i" 0 0 11 3 1 #"s" 0 0 11 3 1 #"t" 0 0 11 3 1 #" " 0 0 11 3 1 #"(" 0 0 11 3 1 #"h" 0 0 11 3 1 #"e" 0 0 11 3 1 #"a" 0 0 11 3 1 #"d" 0 0 11 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 7 #"InSnake" 0 0 8 3 1 #"N" 0 0 8 3 1 #"H" 0 0 61 3 1 #" " 0 0 8 3 9 #"SnakeList" 0 0 61 3 1 #" " 0 0 8 3 1 #"X" 0 0 61 3 1 #" " 0 0 8 3 1 #"Y" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 9 3 4 #"cond" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 2 #"[(" 0 0 8 3 6 #"empty?" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"rest" 0 0 61 3 1 #" " 0 0 8 3 9 #"SnakeList" 0 0 16 3 2 #"))" 0 0 61 3 1 #" " 0 0 14 3 1 #"0" 0 0 16 3 1 #"]" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #"[" 0 0 8 3 4 #"else" 0 0 61 29 1 #"\n" 0 0 61 3 6 #" " 0 0 16 3 1 #"(" 0 0 8 3 2 #"if" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 2 #"Is" 0 0 8 3 1 #"H" 0 0 8 3 1 #"i" 0 0 8 3 1 #"t" 0 0 61 3 1 #" " 0 0 8 3 1 #"X" 0 0 61 3 1 #" " 0 0 8 3 1 #"Y" 0 0 61 3 1 #" " 0 0 8 3 9 #"SnakeList" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 8 #" " 0 0 14 3 1 #"1" 0 0 61 29 1 #"\n" 0 0 61 3 8 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"+" 0 0 61 3 1 #" " 0 0 14 3 1 #"0" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 7 #"InSnake" 0 0 8 3 2 #"NH" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"rest" 0 0 61 3 1 #" " 0 0 8 3 9 #"SnakeList" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 8 3 1 #"X" 0 0 61 3 1 #" " 0 0 8 3 1 #"Y" 0 0 16 3 2 #"))" 0 0 61 29 1 #"\n" 0 0 61 3 6 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #"]" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 1 #"d" 0 0 9 3 1 #"e" 0 0 9 3 1 #"f" 0 0 9 3 1 #"i" 0 0 9 3 1 #"n" 0 0 9 3 1 #"e" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"O" 0 0 8 3 1 #"n" 0 0 8 3 2 #"Sc" 0 0 8 3 1 #"r" 0 0 8 3 1 #"e" 0 0 8 3 1 #"e" 0 0 8 3 1 #"n" 0 0 61 3 1 #" " 0 0 8 3 1 #"X" 0 0 61 3 1 #" " 0 0 8 3 1 #"Y" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 2 #"if" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 3 #"and" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #">" 0 0 8 3 1 #"=" 0 0 61 3 1 #" " 0 0 8 3 1 #"X" 0 0 61 3 1 #" " 0 0 14 3 1 #"0" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"<" 0 0 8 3 1 #"=" 0 0 61 3 1 #" " 0 0 8 3 1 #"X" 0 0 61 3 1 #" " 0 0 8 3 11 #"WindowWidth" 0 0 16 3 2 #")(" 0 0 8 3 1 #">" 0 0 8 3 1 #"=" 0 0 61 3 1 #" " 0 0 8 3 1 #"Y" 0 0 61 3 1 #" " 0 0 14 3 1 #"0" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"<" 0 0 8 3 1 #"=" 0 0 61 3 1 #" " 0 0 8 3 1 #"Y" 0 0 61 3 1 #" " 0 0 8 3 12 #"WindowHeight" 0 0 16 3 2 #"))" 0 0 61 3 1 #" " 0 0 8 3 4 #"true" 0 0 61 3 1 #" " 0 0 8 3 5 #"false" 0 0 16 3 2 #"))" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 50 #";; Takes care of updating all the world variables " 0 0 11 3 20 #"of the current world" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"UpdateWorld" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 9 3 4 #"cond" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 2 #"[(" 0 0 8 3 1 #"o" 0 0 8 3 1 #"r" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 12 #"World-Paused" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 6 #"World-" 0 0 8 3 1 #"G" 0 0 8 3 1 #"a" 0 0 8 3 1 #"m" 0 0 8 3 1 #"e" 0 0 8 3 1 #"O" 0 0 8 3 3 #"ver" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 2 #"))" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #"]" 0 0 61 3 1 #" " 0 0 11 3 12 #";; Check if " 0 0 11 3 20 #"this world is paused" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #"[" 0 0 8 3 4 #"else" 0 0 61 29 1 #"\n" 0 0 61 3 6 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"make-World" 0 0 61 29 1 #"\n" 0 0 61 3 8 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"+" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"World-Frame" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 14 3 1 #"1" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 11 3 13 #";; Increment " 0 0 11 3 15 #"the frame count" 0 0 61 29 1 #"\n" 0 0 61 3 8 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"U" 0 0 8 3 1 #"p" 0 0 8 3 1 #"d" 0 0 8 3 1 #"a" 0 0 8 3 1 #"t" 0 0 8 3 2 #"eS" 0 0 8 3 1 #"n" 0 0 8 3 1 #"a" 0 0 8 3 1 #"k" 0 0 8 3 1 #"e" 0 0 61 3 1 #" " 0 0 11 3 3 #";; " 0 0 11 3 6 #"Snake " 0 0 11 3 5 #"body " 0 0 11 3 9 #"part list" 0 0 61 29 1 #"\n" 0 0 61 3 10 #" " 0 0 16 3 1 #"(" 0 0 8 3 15 #"World-SnakeList" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 20 #"World-SnakeDirection" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 10 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"World-Food" 0 0 8 3 1 #"X" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"World-FoodY" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 2 #"))" 0 0 61 29 1 #"\n" 0 0 61 3 8 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"i" 0 0 8 3 1 #"f" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"I" 0 0 8 3 1 #"s" 0 0 8 3 1 #"F" 0 0 8 3 1 #"o" 0 0 8 3 1 #"o" 0 0 8 3 1 #"d" 0 0 8 3 1 #"E" 0 0 8 3 1 #"a" 0 0 8 3 1 #"t" 0 0 8 3 1 #"e" 0 0 8 3 1 #"n" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"World-Food" 0 0 8 3 1 #"X" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"World-FoodY" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"World-Snake" 0 0 8 3 4 #"List" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 2 #"))" 0 0 61 3 1 #" " 0 0 11 3 3 #";; " 0 0 11 3 1 #"F" 0 0 11 3 1 #"o" 0 0 11 3 1 #"o" 0 0 11 3 1 #"d" 0 0 11 11 1 #" " 0 0 11 3 1 #"x" 0 0 61 29 1 #"\n" 0 0 61 3 10 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"*" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"r" 0 0 8 3 1 #"a" 0 0 8 3 1 #"n" 0 0 8 3 1 #"d" 0 0 61 3 1 #" " 0 0 14 3 1 #"0" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"-" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"/" 0 0 61 3 1 #" " 0 0 8 3 1 #"W" 0 0 8 3 1 #"i" 0 0 8 3 1 #"n" 0 0 8 3 1 #"d" 0 0 8 3 1 #"o" 0 0 8 3 1 #"w" 0 0 8 3 1 #"W" 0 0 8 3 1 #"i" 0 0 8 3 1 #"d" 0 0 8 3 1 #"t" 0 0 8 3 1 #"h" 0 0 61 3 1 #" " 0 0 8 3 1 #"G" 0 0 8 3 1 #"r" 0 0 8 3 2 #"id" 0 0 8 3 1 #"S" 0 0 8 3 1 #"i" 0 0 8 3 2 #"ze" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 8 3 1 #"G" 0 0 8 3 1 #"r" 0 0 8 3 2 #"id" 0 0 8 3 1 #"S" 0 0 8 3 1 #"i" 0 0 8 3 2 #"ze" 0 0 16 3 2 #"))" 0 0 61 3 1 #" " 0 0 8 3 1 #"G" 0 0 8 3 1 #"r" 0 0 8 3 2 #"id" 0 0 8 3 1 #"S" 0 0 8 3 1 #"i" 0 0 8 3 2 #"ze" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 10 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"World-Food" 0 0 8 3 1 #"X" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 8 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 8 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"i" 0 0 8 3 1 #"f" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"I" 0 0 8 3 1 #"s" 0 0 8 3 1 #"F" 0 0 8 3 1 #"o" 0 0 8 3 1 #"o" 0 0 8 3 1 #"d" 0 0 8 3 1 #"E" 0 0 8 3 1 #"a" 0 0 8 3 1 #"t" 0 0 8 3 1 #"e" 0 0 8 3 1 #"n" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"World-Food" 0 0 8 3 1 #"X" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"World-FoodY" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"World-Snake" 0 0 8 3 4 #"List" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 2 #"))" 0 0 61 3 1 #" " 0 0 11 3 3 #";; " 0 0 11 3 1 #"F" 0 0 11 3 1 #"o" 0 0 11 3 1 #"o" 0 0 11 3 1 #"d" 0 0 11 11 1 #" " 0 0 11 3 1 #"y" 0 0 61 29 1 #"\n" 0 0 61 3 10 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"*" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"r" 0 0 8 3 1 #"a" 0 0 8 3 1 #"n" 0 0 8 3 1 #"d" 0 0 61 3 1 #" " 0 0 14 3 1 #"0" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"-" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"/" 0 0 61 3 1 #" " 0 0 8 3 1 #"W" 0 0 8 3 1 #"i" 0 0 8 3 1 #"n" 0 0 8 3 1 #"d" 0 0 8 3 1 #"o" 0 0 8 3 2 #"wH" 0 0 8 3 1 #"e" 0 0 8 3 1 #"i" 0 0 8 3 1 #"g" 0 0 8 3 1 #"h" 0 0 8 3 1 #"t" 0 0 61 3 1 #" " 0 0 8 3 1 #"G" 0 0 8 3 1 #"r" 0 0 8 3 2 #"id" 0 0 8 3 1 #"S" 0 0 8 3 1 #"i" 0 0 8 3 2 #"ze" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 8 3 1 #"G" 0 0 8 3 1 #"r" 0 0 8 3 2 #"id" 0 0 8 3 1 #"S" 0 0 8 3 1 #"i" 0 0 8 3 2 #"ze" 0 0 16 3 2 #"))" 0 0 61 3 1 #" " 0 0 8 3 1 #"G" 0 0 8 3 1 #"r" 0 0 8 3 2 #"id" 0 0 8 3 1 #"S" 0 0 8 3 1 #"i" 0 0 8 3 2 #"ze" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 10 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"World-Food" 0 0 8 3 1 #"Y" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 8 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 8 #" " 0 0 16 3 1 #"(" 0 0 8 3 20 #"World-SnakeDirection" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 11 3 1 #";" 0 0 11 3 2 #"; " 0 0 11 3 2 #"Di" 0 0 11 3 2 #"re" 0 0 11 3 3 #"cti" 0 0 11 3 4 #"on o" 0 0 11 3 4 #"f th" 0 0 11 3 4 #"e sn" 0 0 11 3 3 #"ake" 0 0 61 29 1 #"\n" 0 0 61 3 8 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"i" 0 0 8 3 1 #"f" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"I" 0 0 8 3 1 #"s" 0 0 8 3 1 #"F" 0 0 8 3 1 #"o" 0 0 8 3 1 #"o" 0 0 8 3 1 #"d" 0 0 8 3 1 #"E" 0 0 8 3 1 #"a" 0 0 8 3 1 #"t" 0 0 8 3 1 #"e" 0 0 8 3 1 #"n" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"World-Food" 0 0 8 3 1 #"X" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"World-FoodY" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"World-Snake" 0 0 8 3 4 #"List" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 2 #"))" 0 0 61 3 1 #" " 0 0 11 3 8 #";; Score" 0 0 61 29 1 #"\n" 0 0 61 3 10 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"+" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"World-Score" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 14 3 1 #"1" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 10 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"World-Score" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 8 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 8 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"i" 0 0 8 3 1 #"f" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"o" 0 0 8 3 1 #"r" 0 0 61 3 1 #" " 0 0 11 3 11 #";; GameOver" 0 0 61 29 1 #"\n" 0 0 61 3 10 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"=" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 7 #"InSnake" 0 0 8 3 2 #"NH" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 15 #"World-SnakeList" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-x" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"last" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 15 #"World-SnakeList" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 3 #")))" 0 0 61 29 1 #"\n" 0 0 61 3 12 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-y" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"last" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 15 #"World-SnakeList" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 4 #"))))" 0 0 61 3 1 #" " 0 0 14 3 1 #"1" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 10 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"n" 0 0 8 3 1 #"o" 0 0 8 3 1 #"t" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"O" 0 0 8 3 1 #"n" 0 0 8 3 1 #"S" 0 0 8 3 1 #"c" 0 0 8 3 1 #"r" 0 0 8 3 1 #"e" 0 0 8 3 1 #"e" 0 0 8 3 1 #"n" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"SnakePart-x" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"last" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 15 #"World-SnakeList" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 3 #")))" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"SnakePart-" 0 0 8 3 1 #"y" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"last" 0 0 61 11 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 15 #"World-SnakeList" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 6 #"))))))" 0 0 61 29 1 #"\n" 0 0 61 3 10 #" " 0 0 8 3 1 #"t" 0 0 8 3 1 #"r" 0 0 8 3 2 #"ue" 0 0 61 29 1 #"\n" 0 0 61 3 10 #" " 0 0 8 3 1 #"f" 0 0 8 3 2 #"al" 0 0 8 3 1 #"s" 0 0 8 3 1 #"e" 0 0 61 29 1 #"\n" 0 0 61 3 8 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 8 #" " 0 0 8 3 5 #"false" 0 0 61 3 1 #" " 0 0 11 3 3 #";; " 0 0 11 3 1 #"P" 0 0 11 3 1 #"a" 0 0 11 3 1 #"u" 0 0 11 3 1 #"s" 0 0 11 3 1 #"e" 0 0 11 3 1 #"d" 0 0 11 3 35 #". This code will not be reached if " 0 0 11 11 42 #"the world is paused, so it is ok to use a " 0 0 11 3 9 #"constant " 0 0 11 3 6 #"value." 0 0 61 29 1 #"\n" 0 0 61 3 6 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #"]" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 50 #";; This takes care of making sure everything gets " 0 0 11 3 7 #"updated" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 6 #"Update" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 9 3 4 #"cond" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 2 #"[(" 0 0 8 3 12 #"World-Paused" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #"]" 0 0 61 3 1 #" " 0 0 11 3 14 #"; If world is " 0 0 11 3 22 #"paused nothing changes" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #"[" 0 0 8 3 4 #"else" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"UpdateWorld" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 2 #")]" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 49 #";; This is called when a mouse button is pressed." 0 0 61 29 1 #"\n" 0 0 11 3 37 #";; It is unable to tell which button." 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 17 #"Mouse-Button-Down" 0 0 61 3 1 #" " 0 0 8 3 1 #"x" 0 0 61 3 1 #" " 0 0 8 3 1 #"y" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 8 3 6 #"aworld" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 50 #";; This is called when a mouse button is released." 0 0 61 29 1 #"\n" 0 0 11 3 37 #";; It is unable to tell which button." 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 21 #"Mouse-Button-Released" 0 0 61 3 1 #" " 0 0 8 3 1 #"x" 0 0 61 3 1 #" " 0 0 8 3 1 #"y" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 8 3 6 #"aworld" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 42 #";; This is called when the mouse is moved." 0 0 61 29 1 #"\n" 0 0 11 3 37 #";; It is unable to tell which button." 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"Mouse-Move" 0 0 61 3 1 #" " 0 0 8 3 1 #"x" 0 0 61 3 1 #" " 0 0 8 3 1 #"y" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 8 3 6 #"aworld" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 44 #";; This is called when the mouse is dragged." 0 0 61 29 1 #"\n" 0 0 11 3 37 #";; It is unable to tell which button." 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"Mouse-Drag" 0 0 61 3 1 #" " 0 0 8 3 1 #"x" 0 0 61 3 1 #" " 0 0 8 3 1 #"y" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 8 3 6 #"aworld" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 44 #";; This is called anytime the mouse changes." 0 0 61 29 1 #"\n" 0 0 11 3 51 #";; It is unable to tell which button is pressed or " 0 0 11 3 9 #"released." 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 12 #"Handle-Mouse" 0 0 61 3 1 #" " 0 0 8 3 1 #"a" 0 0 61 3 1 #" " 0 0 8 3 1 #"b" 0 0 61 3 1 #" " 0 0 8 3 1 #"c" 0 0 61 3 1 #" " 0 0 8 3 1 #"d" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 9 3 4 #"cond" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 2 #"[(" 0 0 8 3 4 #"eqv?" 0 0 61 3 1 #" " 0 0 8 3 1 #"d" 0 0 61 3 1 #" " 0 0 14 3 1 #"'" 0 0 8 3 11 #"button-down" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 17 #"Mouse-Button-Down" 0 0 61 3 1 #" " 0 0 8 3 1 #"b" 0 0 61 3 1 #" " 0 0 8 3 1 #"c" 0 0 61 3 1 #" " 0 0 8 3 1 #"a" 0 0 16 3 2 #")]" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 2 #"[(" 0 0 8 3 4 #"eqv?" 0 0 61 3 1 #" " 0 0 8 3 1 #"d" 0 0 61 3 1 #" " 0 0 14 3 1 #"'" 0 0 8 3 9 #"button-up" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 21 #"Mouse-Button-Released" 0 0 61 3 1 #" " 0 0 8 3 1 #"b" 0 0 61 3 1 #" " 0 0 8 3 1 #"c" 0 0 61 3 1 #" " 0 0 8 3 1 #"a" 0 0 16 3 2 #")]" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 2 #"[(" 0 0 8 3 4 #"eqv?" 0 0 61 3 1 #" " 0 0 8 3 1 #"d" 0 0 61 3 1 #" " 0 0 14 3 1 #"'" 0 0 8 3 4 #"drag" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"Mouse-Drag" 0 0 61 3 1 #" " 0 0 8 3 1 #"b" 0 0 61 3 1 #" " 0 0 8 3 1 #"c" 0 0 61 3 1 #" " 0 0 8 3 1 #"a" 0 0 16 3 2 #")]" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 2 #"[(" 0 0 8 3 4 #"eqv?" 0 0 61 3 1 #" " 0 0 8 3 1 #"d" 0 0 61 3 1 #" " 0 0 14 3 1 #"'" 0 0 8 3 4 #"move" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"Mouse-Move" 0 0 61 3 1 #" " 0 0 8 3 1 #"b" 0 0 61 3 1 #" " 0 0 8 3 1 #"c" 0 0 61 3 1 #" " 0 0 8 3 1 #"a" 0 0 16 3 2 #")]" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #"[" 0 0 8 3 4 #"else" 0 0 61 3 1 #" " 0 0 8 3 1 #"a" 0 0 16 3 1 #"]" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 31 #";; The up arrow key was pressed" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"Key-UpArrow" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"make-World" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"World-Frame" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 15 #"World-SnakeList" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 6 #"World-" 0 0 8 3 1 #"F" 0 0 8 3 1 #"o" 0 0 8 3 1 #"o" 0 0 8 3 1 #"d" 0 0 8 3 1 #"X" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 6 #"World-" 0 0 8 3 1 #"F" 0 0 8 3 1 #"o" 0 0 8 3 1 #"o" 0 0 8 3 1 #"d" 0 0 8 3 1 #"Y" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 8 3 1 #"S" 0 0 8 3 1 #"D" 0 0 8 3 1 #"U" 0 0 8 3 1 #"p" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 6 #"World-" 0 0 8 3 1 #"S" 0 0 8 3 1 #"c" 0 0 8 3 1 #"o" 0 0 8 3 1 #"r" 0 0 8 3 1 #"e" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 13 #"World-GameOve" 0 0 8 3 1 #"r" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 12 #"World-Paused" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 33 #";; The down arrow key was pressed" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 13 #"Key-DownArrow" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"make-World" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"World-Frame" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 15 #"World-SnakeList" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 6 #"World-" 0 0 8 3 1 #"F" 0 0 8 3 1 #"o" 0 0 8 3 1 #"o" 0 0 8 3 1 #"d" 0 0 8 3 1 #"X" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 6 #"World-" 0 0 8 3 1 #"F" 0 0 8 3 1 #"o" 0 0 8 3 1 #"o" 0 0 8 3 2 #"dY" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 8 3 1 #"S" 0 0 8 3 1 #"D" 0 0 8 3 1 #"D" 0 0 8 3 1 #"o" 0 0 8 3 1 #"w" 0 0 8 3 1 #"n" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 6 #"World-" 0 0 8 3 1 #"S" 0 0 8 3 1 #"c" 0 0 8 3 1 #"o" 0 0 8 3 1 #"r" 0 0 8 3 1 #"e" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 6 #"World-" 0 0 8 3 1 #"G" 0 0 8 3 1 #"a" 0 0 8 3 1 #"m" 0 0 8 3 1 #"e" 0 0 8 3 1 #"O" 0 0 8 3 1 #"v" 0 0 8 3 1 #"e" 0 0 8 3 1 #"r" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 12 #"World-Paused" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 7 #";; The " 0 0 11 3 1 #"l" 0 0 11 3 1 #"e" 0 0 11 3 1 #"f" 0 0 11 3 23 #"t arrow key was pressed" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"Key-" 0 0 8 3 1 #"L" 0 0 8 3 1 #"e" 0 0 8 3 1 #"f" 0 0 8 3 6 #"tArrow" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"make-World" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"World-Frame" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 15 #"World-SnakeList" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 6 #"World-" 0 0 8 3 1 #"F" 0 0 8 3 1 #"o" 0 0 8 3 1 #"o" 0 0 8 3 1 #"d" 0 0 8 3 1 #"X" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 6 #"World-" 0 0 8 3 1 #"F" 0 0 8 3 1 #"o" 0 0 8 3 1 #"o" 0 0 8 3 2 #"dY" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 8 3 1 #"S" 0 0 8 3 1 #"D" 0 0 8 3 1 #"L" 0 0 8 3 1 #"e" 0 0 8 3 1 #"f" 0 0 8 3 1 #"t" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 6 #"World-" 0 0 8 3 1 #"S" 0 0 8 3 1 #"c" 0 0 8 3 1 #"o" 0 0 8 3 1 #"r" 0 0 8 3 1 #"e" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 6 #"World-" 0 0 8 3 1 #"G" 0 0 8 3 1 #"a" 0 0 8 3 1 #"m" 0 0 8 3 1 #"e" 0 0 8 3 1 #"O" 0 0 8 3 1 #"v" 0 0 8 3 1 #"e" 0 0 8 3 1 #"r" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 12 #"World-Paused" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 7 #";; The " 0 0 11 3 3 #"rig" 0 0 11 3 1 #"h" 0 0 11 3 23 #"t arrow key was pressed" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"Key-" 0 0 8 3 1 #"R" 0 0 8 3 1 #"i" 0 0 8 3 1 #"g" 0 0 8 3 1 #"h" 0 0 8 3 6 #"tArrow" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"make-World" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"World-Frame" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 15 #"World-SnakeList" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 6 #"World-" 0 0 8 3 1 #"F" 0 0 8 3 1 #"o" 0 0 8 3 1 #"o" 0 0 8 3 1 #"d" 0 0 8 3 1 #"X" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 9 #"World-Foo" 0 0 8 3 2 #"dY" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 8 3 1 #"S" 0 0 8 3 1 #"D" 0 0 8 3 1 #"R" 0 0 8 3 2 #"ig" 0 0 8 3 1 #"h" 0 0 8 3 1 #"t" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 6 #"World-" 0 0 8 3 1 #"S" 0 0 8 3 1 #"c" 0 0 8 3 1 #"o" 0 0 8 3 1 #"r" 0 0 8 3 1 #"e" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 6 #"World-" 0 0 8 3 1 #"G" 0 0 8 3 1 #"a" 0 0 8 3 1 #"m" 0 0 8 3 1 #"e" 0 0 8 3 1 #"O" 0 0 8 3 1 #"v" 0 0 8 3 1 #"e" 0 0 8 3 1 #"r" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 12 #"World-Paused" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 3 #";; " 0 0 11 3 17 #"p key was pressed" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"Key-" 0 0 8 3 1 #"p" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 8 3 10 #"make-World" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"World-Frame" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 15 #"World-SnakeList" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 6 #"World-" 0 0 8 3 1 #"F" 0 0 8 3 1 #"o" 0 0 8 3 1 #"o" 0 0 8 3 1 #"d" 0 0 8 3 1 #"X" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 9 #"World-Foo" 0 0 8 3 2 #"dY" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 6 #"World-" 0 0 8 3 1 #"S" 0 0 8 3 1 #"n" 0 0 8 3 1 #"a" 0 0 8 3 1 #"k" 0 0 8 3 2 #"eD" 0 0 8 3 1 #"i" 0 0 8 3 1 #"r" 0 0 8 3 1 #"e" 0 0 8 3 1 #"c" 0 0 8 3 1 #"t" 0 0 8 3 1 #"i" 0 0 8 3 1 #"o" 0 0 8 3 1 #"n" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 6 #"World-" 0 0 8 3 1 #"S" 0 0 8 3 1 #"c" 0 0 8 3 1 #"o" 0 0 8 3 1 #"r" 0 0 8 3 1 #"e" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 6 #"World-" 0 0 8 3 1 #"G" 0 0 8 3 1 #"a" 0 0 8 3 1 #"m" 0 0 8 3 1 #"e" 0 0 8 3 1 #"O" 0 0 8 3 1 #"v" 0 0 8 3 1 #"e" 0 0 8 3 1 #"r" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 3 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"n" 0 0 8 3 2 #"ot" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 12 #"World-Paused" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 2 #"))" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 3 #";; " 0 0 11 3 17 #"n key was pressed" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"Key-" 0 0 8 3 1 #"n" 0 0 61 3 1 #" " 0 0 8 3 6 #"aworld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 8 3 2 #"if" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 1 #"W" 0 0 8 3 1 #"o" 0 0 8 3 1 #"r" 0 0 8 3 1 #"l" 0 0 8 3 1 #"d" 0 0 8 3 1 #"-" 0 0 8 3 1 #"G" 0 0 8 3 1 #"a" 0 0 8 3 1 #"m" 0 0 8 3 1 #"e" 0 0 8 3 1 #"O" 0 0 8 3 1 #"v" 0 0 8 3 1 #"e" 0 0 8 3 1 #"r" 0 0 61 3 1 #" " 0 0 8 3 1 #"a" 0 0 8 3 1 #"w" 0 0 8 3 1 #"o" 0 0 8 3 1 #"r" 0 0 8 3 1 #"l" 0 0 8 3 1 #"d" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 8 3 12 #"InitialWorld" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 8 3 6 #"aworld" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 46 #";; This is called anytime a key to pressed or " 0 0 11 3 9 #"released." 0 0 61 29 1 #"\n" 0 0 11 3 50 #";; It is unable to tell if a key is still pressed " 0 0 11 3 26 #"or which key was released." 0 0 61 29 1 #"\n" 0 0 11 3 48 #";; If a key is held down then the function will " 0 0 11 3 26 #"get called multiple times." 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 9 3 6 #"define" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"Handle-Keys" 0 0 61 3 1 #" " 0 0 8 3 1 #"a" 0 0 61 3 1 #" " 0 0 8 3 1 #"b" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #"(" 0 0 9 3 4 #"cond" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 2 #"[(" 0 0 8 3 4 #"eqv?" 0 0 61 3 1 #" " 0 0 8 3 1 #"b" 0 0 61 3 1 #" " 0 0 14 3 1 #"'" 0 0 8 3 2 #"up" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 11 #"Key-UpArrow" 0 0 61 3 1 #" " 0 0 8 3 1 #"a" 0 0 16 3 2 #")]" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 2 #"[(" 0 0 8 3 4 #"eqv?" 0 0 61 3 1 #" " 0 0 8 3 1 #"b" 0 0 61 3 1 #" " 0 0 14 3 1 #"'" 0 0 8 3 4 #"down" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 13 #"Key-DownArrow" 0 0 61 3 1 #" " 0 0 8 3 1 #"a" 0 0 16 3 2 #")]" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 2 #"[(" 0 0 8 3 4 #"eqv?" 0 0 61 3 1 #" " 0 0 8 3 1 #"b" 0 0 61 3 1 #" " 0 0 14 3 1 #"'" 0 0 8 3 1 #"l" 0 0 8 3 1 #"e" 0 0 8 3 1 #"f" 0 0 8 3 1 #"t" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"Key-" 0 0 8 3 1 #"L" 0 0 8 3 1 #"e" 0 0 8 3 1 #"f" 0 0 8 3 6 #"tArrow" 0 0 61 3 1 #" " 0 0 8 3 1 #"a" 0 0 16 3 2 #")]" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 2 #"[(" 0 0 8 3 4 #"eqv?" 0 0 61 3 1 #" " 0 0 8 3 1 #"b" 0 0 61 3 1 #" " 0 0 14 3 1 #"'" 0 0 8 3 1 #"r" 0 0 8 3 1 #"i" 0 0 8 3 1 #"g" 0 0 8 3 1 #"h" 0 0 8 3 1 #"t" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"Key-" 0 0 8 3 1 #"R" 0 0 8 3 1 #"i" 0 0 8 3 1 #"g" 0 0 8 3 1 #"h" 0 0 8 3 6 #"tArrow" 0 0 61 3 1 #" " 0 0 8 3 1 #"a" 0 0 16 3 2 #")]" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 2 #"[(" 0 0 8 3 4 #"eqv?" 0 0 61 3 1 #" " 0 0 8 3 1 #"b" 0 0 61 3 1 #" " 0 0 14 3 1 #"#" 0 0 14 3 1 #"\\" 0 0 14 3 1 #"p" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"Key-" 0 0 8 3 1 #"p" 0 0 61 3 1 #" " 0 0 8 3 1 #"a" 0 0 16 3 2 #")]" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 2 #"[(" 0 0 8 3 4 #"eqv?" 0 0 61 3 1 #" " 0 0 8 3 1 #"b" 0 0 61 3 1 #" " 0 0 14 3 1 #"#" 0 0 14 3 1 #"\\" 0 0 14 3 1 #"n" 0 0 16 3 1 #")" 0 0 61 3 1 #" " 0 0 16 3 1 #"(" 0 0 8 3 4 #"Key-" 0 0 8 3 1 #"n" 0 0 61 3 1 #" " 0 0 8 3 1 #"a" 0 0 16 3 2 #")]" 0 0 61 29 1 #"\n" 0 0 61 3 4 #" " 0 0 16 3 1 #"[" 0 0 8 3 4 #"else" 0 0 61 3 1 #" " 0 0 8 3 1 #"a" 0 0 16 3 1 #"]" 0 0 61 29 1 #"\n" 0 0 61 3 2 #" " 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 21 #";; Creates the window" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 8 3 8 #"big-bang" 0 0 61 3 1 #" " 0 0 8 3 11 #"WindowWidth" 0 0 61 3 1 #" " 0 0 8 3 12 #"WindowHeight" 0 0 61 3 1 #" " 0 0 8 3 10 #"FrameDelay" 0 0 61 3 1 #" " 0 0 8 3 12 #"InitialWorld" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 27 #";; Set the drawing function" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 8 3 9 #"on-redraw" 0 0 61 3 1 #" " 0 0 8 3 11 #"Draw-Window" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 28 #";; Set the updating function" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 8 3 13 #"on-tick-event" 0 0 61 3 1 #" " 0 0 8 3 6 #"Update" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 29 #";; Set the key press function" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 8 3 12 #"on-key-event" 0 0 61 3 1 #" " 0 0 8 3 11 #"Handle-Keys" 0 0 16 3 1 #")" 0 0 61 29 1 #"\n" 0 0 61 29 1 #"\n" 0 0 11 3 33 #";; Set the mouse handler function" 0 0 61 29 1 #"\n" 0 0 16 3 1 #"(" 0 0 8 3 14 #"on-mouse-event" 0 0 61 3 1 #" " 0 0 8 3 12 #"Handle-Mouse" 0 0 16 3 1 #")" 0 00000000000