1 #reader(lib"read.ss""wxme")WXME0108 ## 
2 #|
3    This file is in plt scheme editor format.
4    Open this file in dr-scheme version 4.2 or later to read it.
5 
6    Most likely, it was created by saving a program in DrScheme,
7    and it probably contains a program with non-text elements
8    (such as images or comment boxes).
9 
10             http://www.plt-scheme.org
11 |#
12  29 7 #"wxtext\0"
13 3 1 6 #"wxtab\0"
14 1 1 8 #"wxmedia\0"
15 4 1 8 #"wximage\0"
16 2 0 34 #"(lib \"syntax-browser.ss\" \"mrlib\")\0"
17 1 0 16 #"drscheme:number\0"
18 3 0 44 #"(lib \"number-snip.ss\" \"drscheme\" \"private\")\0"
19 1 0 36 #"(lib \"comment-snip.ss\" \"framework\")\0"
20 1 0 43 #"(lib \"collapsed-snipclass.ss\" \"framework\")\0"
21 0 0 19 #"drscheme:sexp-snip\0"
22 0 0 36 #"(lib \"cache-image-snip.ss\" \"mrlib\")\0"
23 1 0 33 #"(lib \"bullet-snip.ss\" \"browser\")\0"
24 0 0 29 #"drscheme:bindings-snipclass%\0"
25 1 0 25 #"(lib \"matrix.ss\" \"htdp\")\0"
26 1 0 22 #"drscheme:lambda-snip%\0"
27 1 0 56
28 #"(lib \"hrule-snip.ss\" \"macro-debugger\" \"syntax-browser\")\0"
29 1 0 18 #"java-comment-box%\0"
30 1 0 23 #"java-interactions-box%\0"
31 1 0 45 #"(lib \"image-snipr.ss\" \"slideshow\" \"private\")\0"
32 1 0 26 #"drscheme:pict-value-snip%\0"
33 0 0 38 #"(lib \"pict-snipclass.ss\" \"slideshow\")\0"
34 2 0 55 #"(lib \"vertical-separator-snip.ss\" \"stepper\" \"private\")\0"
35 1 0 18 #"drscheme:xml-snip\0"
36 1 0 31 #"(lib \"xml-snipclass.ss\" \"xml\")\0"
37 1 0 21 #"drscheme:scheme-snip\0"
38 2 0 34 #"(lib \"scheme-snipclass.ss\" \"xml\")\0"
39 1 0 10 #"text-box%\0"
40 1 0 32 #"(lib \"text-snipclass.ss\" \"xml\")\0"
41 1 0 15 #"test-case-box%\0"
42 2 0 1 6 #"wxloc\0"
43           0 0 76 0 1 #"\0"
44 0 75 1 #"\0"
45 0 12 90 -1 90 -1 3 -1 0 1 0 1 0 0 0 0 0 0 0 0 0 0 0 255 255 255 1 -1 0 9
46 #"Standard\0"
47 0 75 11 #" Monospace\0"
48 0 16 90 -1 90 -1 2 -1 0 1 0 1 0 0 0 0 0 0 0 0 0 0 0 255 255 255 1 -1 2 1
49 #"\0"
50 0 -1 1 #"\0"
51 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
52 #"framework:default-color\0"
53 0 -1 1 #"\0"
54 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
55 #"\0"
56 0 -1 1 #"\0"
57 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 150 0 150 0 0 0 -1 -1 2 15
58 #"text:ports out\0"
59 0 -1 1 #"\0"
60 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
61 #"\0"
62 0 -1 1 #"\0"
63 1.0 0 -1 -1 93 -1 -1 -1 0 0 0 0 0 0 0 0 0 1.0 1.0 1.0 255 0 0 0 0 0 -1
64 -1 2 15 #"text:ports err\0"
65 0 -1 1 #"\0"
66 1.0 0 -1 -1 93 -1 -1 -1 0 0 0 0 0 0 0 0 0 1.0 1.0 1.0 255 0 0 0 0 0 -1
67 -1 2 1 #"\0"
68 0 -1 1 #"\0"
69 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 0 175 0 0 0 -1 -1 2 17
70 #"text:ports value\0"
71 0 -1 1 #"\0"
72 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 0 175 0 0 0 -1 -1 2 1
73 #"\0"
74 0 -1 1 #"\0"
75 1.0 0 92 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1.0 1.0 1.0 34 139 34 0 0 0 -1
76 -1 2 27 #"Matching Parenthesis Style\0"
77 0 -1 1 #"\0"
78 1.0 0 92 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1.0 1.0 1.0 34 139 34 0 0 0 -1
79 -1 2 1 #"\0"
80 0 -1 1 #"\0"
81 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 38 38 128 0 0 0 -1 -1 2 37
82 #"framework:syntax-color:scheme:symbol\0"
83 0 -1 1 #"\0"
84 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 38 38 128 0 0 0 -1 -1 2 38
85 #"framework:syntax-color:scheme:keyword\0"
86 0 -1 1 #"\0"
87 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
88 #"\0"
89 0 -1 1 #"\0"
90 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
91 38 #"framework:syntax-color:scheme:comment\0"
92 0 -1 1 #"\0"
93 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
94 #"\0"
95 0 -1 1 #"\0"
96 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 41 128 38 0 0 0 -1 -1 2 37
97 #"framework:syntax-color:scheme:string\0"
98 0 -1 1 #"\0"
99 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 41 128 38 0 0 0 -1 -1 2 39
100 #"framework:syntax-color:scheme:constant\0"
101 0 -1 1 #"\0"
102 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
103 #"\0"
104 0 -1 1 #"\0"
105 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 132 60 36 0 0 0 -1 -1 2 42
106 #"framework:syntax-color:scheme:parenthesis\0"
107 0 -1 1 #"\0"
108 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
109 #"\0"
110 0 -1 1 #"\0"
111 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 255 0 0 0 0 0 -1 -1 2 36
112 #"framework:syntax-color:scheme:error\0"
113 0 -1 1 #"\0"
114 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
115 #"\0"
116 0 -1 1 #"\0"
117 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 2 36
118 #"framework:syntax-color:scheme:other\0"
119 0 -1 1 #"\0"
120 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
121 #"\0"
122 0 -1 1 #"\0"
123 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
124 38 #"drscheme:check-syntax:lexically-bound\0"
125 0 -1 1 #"\0"
126 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
127 #"\0"
128 0 -1 1 #"\0"
129 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 68 0 203 0 0 0 -1 -1 2 31
130 #"drscheme:check-syntax:imported\0"
131 0 -1 1 #"\0"
132 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 41
133 #"profj:syntax-colors:scheme:block-comment\0"
134 0 -1 1 #"\0"
135 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
136 35 #"profj:syntax-colors:scheme:keyword\0"
137 0 -1 1 #"\0"
138 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
139 #"\0"
140 0 -1 1 #"\0"
141 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 139 0 139 0 0 0 -1 -1 2 37
142 #"profj:syntax-colors:scheme:prim-type\0"
143 0 -1 1 #"\0"
144 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 139 0 139 0 0 0 -1 -1 2 38
145 #"profj:syntax-colors:scheme:identifier\0"
146 0 -1 1 #"\0"
147 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
148 #"\0"
149 0 -1 1 #"\0"
150 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 34 139 34 0 0 0 -1 -1 2 34
151 #"profj:syntax-colors:scheme:string\0"
152 0 -1 1 #"\0"
153 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 34 139 34 0 0 0 -1 -1 2 35
154 #"profj:syntax-colors:scheme:literal\0"
155 0 -1 1 #"\0"
156 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 34 139 34 0 0 0 -1 -1 2 35
157 #"profj:syntax-colors:scheme:comment\0"
158 0 -1 1 #"\0"
159 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
160 33 #"profj:syntax-colors:scheme:error\0"
161 0 -1 1 #"\0"
162 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 255 0 0 0 0 0 -1 -1 2 35
163 #"profj:syntax-colors:scheme:default\0"
164 0 -1 1 #"\0"
165 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
166 #"profj:syntax-colors:scheme:uncovered\0"
167 0 -1 1 #"\0"
168 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 2 35
169 #"profj:syntax-colors:scheme:covered\0"
170 0 -1 1 #"\0"
171 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 139 0 139 0 0 0 -1 -1 4 1
172 #"\0"
173 0 70 1 #"\0"
174 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 1.0 1.0 1.0 1.0 1.0 1.0 0 0 0 0 0 0
175 -1 -1 4 4 #"XML\0"
176 0 70 1 #"\0"
177 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 1.0 1.0 1.0 1.0 1.0 1.0 0 0 0 0 0 0
178 -1 -1 8 1 #"\0"
179 0 -1 1 #"\0"
180 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 255 0 0 0 0 0 -1 -1 8 24
181 #"drscheme:text:ports err\0"
182 0 -1 1 #"\0"
183 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 4 1
184 #"\0"
185 0 71 1 #"\0"
186 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 1.0 1.0 1.0 1.0 1.0 1.0 0 0 0 0 0 0
187 -1 -1 4 1 #"\0"
188 0 -1 1 #"\0"
189 1.0 0 -1 -1 -1 -1 -1 -1 1 0 0 0 0 0 0 0 0 1.0 1.0 1.0 0 0 255 0 0 0 -1
190 -1 4 1 #"\0"
191 0 71 1 #"\0"
192 1.0 0 -1 -1 -1 -1 -1 -1 1 0 0 0 0 0 0 0 0 1.0 1.0 1.0 0 0 255 0 0 0 -1
193 -1 4 1 #"\0"
194 0 71 1 #"\0"
195 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1.0 1.0 1.0 0 100 0 0 0 0 -1
196 -1 2 1 #"\0"
197 0 71 1 #"\0"
198 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 1.0 1.0 1.0 1.0 1.0 1.0 0 0 0 0 0 0
199 -1 -1 2 1 #"\0"
200 0 71 1 #"\0"
201 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1.0 1.0 1.0 0 100 0 0 0 0 -1
202 -1 22 1 #"\0"
203 0 -1 1 #"\0"
204 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 15 1
205 #"\0"
206 0 -1 1 #"\0"
207 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 24 1
208 #"\0"
209 0 -1 1 #"\0"
210 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 14 1
211 #"\0"
212 0 -1 1 #"\0"
213 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 22 1
214 #"\0"
215 0 -1 1 #"\0"
216 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0 0 0 0 0 0 255 165 0 0 0 0 -1 -1 15 1
217 #"\0"
218 0 -1 1 #"\0"
219 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0 0 0 0 0 0 255 165 0 0 0 0 -1 -1 24 1
220 #"\0"
221 0 -1 1 #"\0"
222 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0 0 0 0 0 0 255 165 0 0 0 0 -1 -1 14 1
223 #"\0"
224 0 -1 1 #"\0"
225 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0 0 0 0 0 0 255 165 0 0 0 0 -1 -1 20 1
226 #"\0"
227 0 -1 1 #"\0"
228 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 4 1
229 #"\0"
230 0 -1 1 #"\0"
231 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 20 1
232 #"\0"
233 0 -1 1 #"\0"
234 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0 0 0 0 0 0 255 165 0 0 0 0 -1 -1 17 1
235 #"\0"
236 0 -1 1 #"\0"
237 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 255 255 255 -1 -1
238 4 1 #"\0"
239 0 -1 1 #"\0"
240 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 255 255 255 -1 -1
241 22 1 #"\0"
242 0 -1 1 #"\0"
243 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 255 255 255 -1 -1
244 15 1 #"\0"
245 0 -1 1 #"\0"
246 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 255 255 255 -1 -1
247 14 1 #"\0"
248 0 -1 1 #"\0"
249 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 255 255 255 -1 -1
250 24 1 #"\0"
251 0 -1 1 #"\0"
252 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 255 255 255 -1 -1
253 20 1 #"\0"
254 0 -1 1 #"\0"
255 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 255 255 255 -1 -1
256 4 1 #"\0"
257 0 -1 1 #"\0"
258 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0 0 0 0 0 0 255 165 0 0 0 0 -1 -1 19 1
259 #"\0"
260 0 -1 1 #"\0"
261 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 19 1
262 #"\0"
263 0 -1 1 #"\0"
264 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 255 255 255 -1 -1
265 19 1 #"\0"
266 0 -1 1 #"\0"
267 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0 0 0 0 0 0 255 165 0 0 0 0 -1 -1
268           0 424 0 17 3 85
269 (
270  #";; The first three lines of this file were inserted by DrScheme. The"
271  #"y record metadata"
272 ) 0 0 66 29 1 #"\n"
273 0 0 17 3 85
274 (
275  #";; about the language level of this file in a form that our tools ca"
276  #"n easily process."
277 ) 0 0 66 29 1 #"\n"
278 0 0 24 3 7 #"#reader"
279 0 0 22 3 1 #"("
280 0 0 14 3 3 #"lib"
281 0 0 66 3 1 #" "
282 0 0 19 3 29 #"\"htdp-intermediate-reader.ss\""
283 0 0 66 3 1 #" "
284 0 0 19 3 6 #"\"lang\""
285 0 0 22 3 3 #")(("
286 0 0 14 3 7 #"modname"
287 0 0 66 3 1 #" "
288 0 0 14 3 7 #"|#22.3|"
289 0 0 22 3 1 #")"
290 0 0 66 3 1 #" "
291 0 0 22 3 1 #"("
292 0 0 14 3 19 #"read-case-sensitive"
293 0 0 66 3 1 #" "
294 0 0 20 3 2 #"#t"
295 0 0 22 3 1 #")"
296 0 0 66 3 1 #" "
297 0 0 22 3 1 #"("
298 0 0 14 3 10 #"teachpacks"
299 0 0 66 3 1 #" "
300 0 0 22 3 2 #"(("
301 0 0 14 3 3 #"lib"
302 0 0 66 3 1 #" "
303 0 0 19 3 9 #"\"draw.ss\""
304 0 0 66 3 1 #" "
305 0 0 19 3 11 #"\"teachpack\""
306 0 0 66 3 1 #" "
307 0 0 19 3 6 #"\"htdp\""
308 0 0 22 3 1 #")"
309 0 0 66 3 1 #" "
310 0 0 22 3 1 #"("
311 0 0 14 3 3 #"lib"
312 0 0 66 3 1 #" "
313 0 0 19 3 10 #"\"arrow.ss\""
314 0 0 66 3 1 #" "
315 0 0 19 3 11 #"\"teachpack\""
316 0 0 66 3 1 #" "
317 0 0 19 3 6 #"\"htdp\""
318 0 0 22 3 1 #")"
319 0 0 66 3 1 #" "
320 0 0 22 3 1 #"("
321 0 0 14 3 3 #"lib"
322 0 0 66 3 1 #" "
323 0 0 19 3 8 #"\"gui.ss\""
324 0 0 66 3 1 #" "
325 0 0 19 3 11 #"\"teachpack\""
326 0 0 66 3 1 #" "
327 0 0 19 3 6 #"\"htdp\""
328 0 0 22 3 3 #")))"
329 0 0 66 3 1 #" "
330 0 0 22 3 1 #"("
331 0 0 14 3 13 #"htdp-settings"
332 0 0 66 3 1 #" "
333 0 0 22 3 2 #"#("
334 0 0 20 3 2 #"#t"
335 0 0 66 3 1 #" "
336 0 0 14 3 11 #"constructor"
337 0 0 66 3 1 #" "
338 0 0 14 3 17 #"repeating-decimal"
339 0 0 66 3 1 #" "
340 0 0 20 3 2 #"#f"
341 0 0 66 3 1 #" "
342 0 0 20 3 2 #"#t"
343 0 0 66 3 1 #" "
344 0 0 14 3 4 #"none"
345 0 0 66 3 1 #" "
346 0 0 20 3 2 #"#f"
347 0 0 66 3 1 #" "
348 0 0 22 3 2 #"(("
349 0 0 14 3 3 #"lib"
350 0 0 66 3 1 #" "
351 0 0 19 3 9 #"\"draw.ss\""
352 0 0 66 3 1 #" "
353 0 0 19 3 11 #"\"teachpack\""
354 0 0 66 3 1 #" "
355 0 0 19 3 6 #"\"htdp\""
356 0 0 22 3 1 #")"
357 0 0 66 3 1 #" "
358 0 0 22 3 1 #"("
359 0 0 14 3 3 #"lib"
360 0 0 66 3 1 #" "
361 0 0 19 3 10 #"\"arrow.ss\""
362 0 0 66 3 1 #" "
363 0 0 19 3 11 #"\"teachpack\""
364 0 0 66 3 1 #" "
365 0 0 19 3 6 #"\"htdp\""
366 0 0 22 3 1 #")"
367 0 0 66 3 1 #" "
368 0 0 22 3 1 #"("
369 0 0 14 3 3 #"lib"
370 0 0 66 3 1 #" "
371 0 0 19 3 8 #"\"gui.ss\""
372 0 0 66 3 1 #" "
373 0 0 19 3 11 #"\"teachpack\""
374 0 0 66 3 1 #" "
375 0 0 19 3 6 #"\"htdp\""
376 0 0 22 3 5 #")))))"
377 0 0 66 29 1 #"\n"
378 0 0 66 29 1 #"\n"
379 0 0 22 3 1 #"("
380 0 0 15 3 6 #"define"
381 0 0 66 3 1 #" "
382 0 0 22 3 1 #"("
383 0 0 14 3 11 #"change-text"
384 0 0 66 3 1 #" "
385 0 0 14 3 5 #"event"
386 0 0 22 3 1 #")"
387 0 0 66 29 1 #"\n"
388 0 0 66 3 2 #"  "
389 0 0 22 3 1 #"("
390 0 0 14 3 12 #"draw-message"
391 0 0 66 3 1 #" "
392 0 0 14 3 12 #"main-message"
393 0 0 66 3 1 #" "
394 0 0 22 3 1 #"("
395 0 0 14 3 13 #"text-contents"
396 0 0 66 3 1 #" "
397 0 0 14 3 9 #"main-text"
398 0 0 22 3 3 #")))"
399 0 0 66 29 1 #"\n"
400 0 0 22 3 1 #"("
401 0 0 15 3 6 #"define"
402 0 0 66 3 1 #" "
403 0 0 22 3 1 #"("
404 0 0 14 3 13 #"change-choice"
405 0 0 66 3 1 #" "
406 0 0 14 3 5 #"event"
407 0 0 22 3 1 #")"
408 0 0 66 29 1 #"\n"
409 0 0 66 3 2 #"  "
410 0 0 22 3 1 #"("
411 0 0 15 3 4 #"cond"
412 0 0 66 29 1 #"\n"
413 0 0 66 3 4 #"    "
414 0 0 22 3 2 #"[("
415 0 0 14 3 1 #"="
416 0 0 66 3 1 #" "
417 0 0 22 3 1 #"("
418 0 0 14 3 12 #"choice-index"
419 0 0 66 3 1 #" "
420 0 0 14 3 11 #"main-choice"
421 0 0 22 3 1 #")"
422 0 0 66 3 1 #" "
423 0 0 20 3 1 #"0"
424 0 0 22 3 1 #")"
425 0 0 66 3 1 #" "
426 0 0 22 3 1 #"("
427 0 0 14 3 12 #"draw-message"
428 0 0 66 3 1 #" "
429 0 0 14 3 19 #"main-choice-message"
430 0 0 66 3 1 #" "
431 0 0 19 11 15 #"\"Please make a "
432 0 0 19 3 10 #"selection\""
433 0 0 22 3 2 #")]"
434 0 0 74 29 1 #"\n"
435 0 0 74 3 0 #""
436 0 0 66 3 4 #"    "
437 0 0 22 3 2 #"[("
438 0 0 14 3 1 #"="
439 0 0 66 3 1 #" "
440 0 0 22 3 1 #"("
441 0 0 14 3 12 #"choice-index"
442 0 0 66 3 1 #" "
443 0 0 14 3 11 #"main-choice"
444 0 0 22 3 1 #")"
445 0 0 66 3 1 #" "
446 0 0 20 3 1 #"1"
447 0 0 22 3 1 #")"
448 0 0 66 3 1 #" "
449 0 0 22 3 1 #"("
450 0 0 14 3 12 #"draw-message"
451 0 0 66 3 1 #" "
452 0 0 14 3 19 #"main-choice-message"
453 0 0 66 3 1 #" "
454 0 0 19 11 20 #"\"Let's shop another "
455 0 0 19 3 5 #"time\""
456 0 0 22 3 2 #")]"
457 0 0 74 29 1 #"\n"
458 0 0 66 3 4 #"    "
459 0 0 22 3 2 #"[("
460 0 0 14 3 1 #"="
461 0 0 66 3 1 #" "
462 0 0 22 3 1 #"("
463 0 0 14 3 12 #"choice-index"
464 0 0 66 3 1 #" "
465 0 0 14 3 11 #"main-choice"
466 0 0 22 3 1 #")"
467 0 0 66 3 1 #" "
468 0 0 20 3 1 #"2"
469 0 0 22 3 1 #")"
470 0 0 66 3 1 #" "
471 0 0 22 3 1 #"("
472 0 0 14 3 12 #"draw-message"
473 0 0 66 3 1 #" "
474 0 0 14 3 19 #"main-choice-message"
475 0 0 66 3 1 #" "
476 0 0 19 11 17 #"\"There's nothing "
477 0 0 19 3 18 #"interesting on TV\""
478 0 0 22 3 2 #")]"
479 0 0 74 29 1 #"\n"
480 0 0 74 3 0 #""
481 0 0 66 3 4 #"    "
482 0 0 22 3 2 #"[("
483 0 0 14 3 1 #"="
484 0 0 66 3 1 #" "
485 0 0 22 3 1 #"("
486 0 0 14 3 12 #"choice-index"
487 0 0 66 3 1 #" "
488 0 0 14 3 11 #"main-choice"
489 0 0 22 3 1 #")"
490 0 0 66 3 1 #" "
491 0 0 20 3 1 #"3"
492 0 0 22 3 1 #")"
493 0 0 66 3 1 #" "
494 0 0 22 3 1 #"("
495 0 0 14 3 12 #"draw-message"
496 0 0 66 3 1 #" "
497 0 0 14 3 19 #"main-choice-message"
498 0 0 66 3 1 #" "
499 0 0 19 11 13 #"\"Sure, we're "
500 0 0 19 3 23 #"programming right now!\""
501 0 0 22 3 2 #")]"
502 0 0 66 29 1 #"\n"
503 0 0 66 3 4 #"    "
504 0 0 22 3 2 #"[("
505 0 0 14 3 1 #"="
506 0 0 66 3 1 #" "
507 0 0 22 3 1 #"("
508 0 0 14 3 12 #"choice-index"
509 0 0 66 3 1 #" "
510 0 0 14 3 11 #"main-choice"
511 0 0 22 3 1 #")"
512 0 0 66 3 1 #" "
513 0 0 20 3 1 #"4"
514 0 0 22 3 1 #")"
515 0 0 66 3 1 #" "
516 0 0 22 3 1 #"("
517 0 0 14 3 12 #"draw-message"
518 0 0 66 3 1 #" "
519 0 0 14 3 19 #"main-choice-message"
520 0 0 66 3 1 #" "
521 0 0 19 3 19 #"\"Maybe in 2 hours!\""
522 0 0 22 3 4 #")]))"
523 0 0 66 29 1 #"\n"
524 0 0 22 3 1 #"("
525 0 0 15 3 6 #"define"
526 0 0 66 3 1 #" "
527 0 0 22 3 1 #"("
528 0 0 14 3 17 #"close-main-window"
529 0 0 66 3 1 #" "
530 0 0 14 3 5 #"event"
531 0 0 22 3 1 #")"
532 0 0 66 29 1 #"\n"
533 0 0 66 3 2 #"  "
534 0 0 22 3 1 #"("
535 0 0 14 3 11 #"hide-window"
536 0 0 66 3 1 #" "
537 0 0 14 3 11 #"main-window"
538 0 0 22 3 2 #"))"
539 0 0 74 29 1 #"\n"
540 0 0 66 29 1 #"\n"
541 0 0 22 3 1 #"("
542 0 0 15 3 6 #"define"
543 0 0 66 3 1 #" "
544 0 0 14 3 12 #"main-message"
545 0 0 66 3 1 #" "
546 0 0 22 3 1 #"("
547 0 0 14 3 12 #"make-message"
548 0 0 66 3 1 #" "
549 0 0 19 3 27 #"\"Hi, nice to meet you too!\""
550 0 0 22 3 2 #"))"
551 0 0 74 29 1 #"\n"
552 0 0 22 3 1 #"("
553 0 0 15 3 6 #"define"
554 0 0 74 3 1 #" "
555 0 0 14 3 5 #"query"
556 0 0 74 3 1 #" "
557 0 0 22 3 1 #"("
558 0 0 14 3 12 #"make-message"
559 0 0 74 3 1 #" "
560 0 0 19 3 1 #"\""
561 0 0 19 3 4 #"What"
562 0 0 19 3 1 #" "
563 0 0 19 3 5 #"would"
564 0 0 19 3 1 #" "
565 0 0 19 3 22 #"you like to do today?\""
566 0 0 22 3 2 #"))"
567 0 0 74 29 1 #"\n"
568 0 0 22 3 1 #"("
569 0 0 15 3 6 #"define"
570 0 0 74 3 1 #" "
571 0 0 14 3 9 #"main-text"
572 0 0 74 3 1 #" "
573 0 0 22 3 1 #"("
574 0 0 14 3 9 #"make-text"
575 0 0 74 3 1 #" "
576 0 0 19 3 11 #"\"Hi Aaron!\""
577 0 0 22 3 2 #"))"
578 0 0 74 29 1 #"\n"
579 0 0 22 3 1 #"("
580 0 0 15 3 6 #"define"
581 0 0 74 3 1 #" "
582 0 0 14 3 19 #"main-choice-message"
583 0 0 74 3 1 #" "
584 0 0 22 3 1 #"("
585 0 0 14 3 12 #"make-message"
586 0 0 74 3 1 #" "
587 0 0 19 3 2 #"\"\""
588 0 0 22 3 2 #"))"
589 0 0 74 29 1 #"\n"
590 0 0 74 3 0 #""
591 0 0 22 3 1 #"("
592 0 0 15 3 6 #"define"
593 0 0 74 3 1 #" "
594 0 0 14 3 11 #"main-choice"
595 0 0 74 3 1 #" "
596 0 0 22 3 1 #"("
597 0 0 14 3 11 #"make-choice"
598 0 0 74 3 1 #" "
599 0 0 22 3 1 #"("
600 0 0 14 3 4 #"list"
601 0 0 74 3 1 #" "
602 0 0 19 3 18 #"\"Make a selection\""
603 0 0 74 29 1 #"\n"
604 0 0 74 3 39 #"                                       "
605 0 0 19 3 13 #"\"Go Shopping\""
606 0 0 74 29 1 #"\n"
607 0 0 74 3 39 #"                                       "
608 0 0 19 3 10 #"\"Watch TV\""
609 0 0 74 29 1 #"\n"
610 0 0 74 3 39 #"                                       "
611 0 0 19 3 16 #"\"Program Scheme\""
612 0 0 74 29 1 #"\n"
613 0 0 74 3 39 #"                                       "
614 0 0 19 3 7 #"\"Sleep\""
615 0 0 22 3 3 #")))"
616 0 0 74 29 1 #"\n"
617 0 0 22 3 1 #"("
618 0 0 15 3 6 #"define"
619 0 0 66 3 1 #" "
620 0 0 14 3 11 #"main-window"
621 0 0 66 29 1 #"\n"
622 0 0 66 3 2 #"  "
623 0 0 22 3 1 #"("
624 0 0 14 3 13 #"create-window"
625 0 0 74 29 1 #"\n"
626 0 0 66 3 3 #"   "
627 0 0 22 3 1 #"("
628 0 0 14 3 4 #"list"
629 0 0 74 3 1 #" "
630 0 0 22 3 1 #"("
631 0 0 14 3 4 #"list"
632 0 0 66 3 1 #" "
633 0 0 22 3 1 #"("
634 0 0 14 3 11 #"make-button"
635 0 0 66 3 1 #" "
636 0 0 19 3 14 #"\"Close Window\""
637 0 0 66 3 1 #" "
638 0 0 14 3 17 #"close-main-window"
639 0 0 22 3 2 #"))"
640 0 0 74 29 1 #"\n"
641 0 0 66 3 9 #"         "
642 0 0 22 3 1 #"("
643 0 0 14 3 4 #"list"
644 0 0 74 3 1 #" "
645 0 0 22 3 1 #"("
646 0 0 14 3 11 #"make-button"
647 0 0 74 3 1 #" "
648 0 0 19 3 13 #"\"Change Text\""
649 0 0 74 3 1 #" "
650 0 0 14 3 11 #"change-text"
651 0 0 22 3 1 #")"
652 0 0 74 29 1 #"\n"
653 0 0 66 3 15 #"               "
654 0 0 14 3 9 #"main-text"
655 0 0 22 3 1 #")"
656 0 0 66 29 1 #"\n"
657 0 0 66 3 9 #"         "
658 0 0 22 3 1 #"("
659 0 0 14 3 4 #"list"
660 0 0 66 3 1 #" "
661 0 0 14 3 12 #"main-message"
662 0 0 22 3 1 #")"
663 0 0 74 29 1 #"\n"
664 0 0 66 3 9 #"         "
665 0 0 22 3 1 #"("
666 0 0 14 3 4 #"list"
667 0 0 74 3 1 #" "
668 0 0 14 3 5 #"query"
669 0 0 22 3 1 #")"
670 0 0 74 29 1 #"\n"
671 0 0 66 3 9 #"         "
672 0 0 22 3 1 #"("
673 0 0 14 3 4 #"list"
674 0 0 74 3 1 #" "
675 0 0 14 3 11 #"main-choice"
676 0 0 74 29 1 #"\n"
677 0 0 66 3 15 #"               "
678 0 0 22 3 1 #"("
679 0 0 14 3 11 #"make-button"
680 0 0 74 3 1 #" "
681 0 0 19 3 5 #"\"Go!\""
682 0 0 70 3 1 #" "
683 0 0 14 3 13 #"change-choice"
684 0 0 22 3 2 #"))"
685 0 0 70 29 1 #"\n"
686 0 0 66 3 9 #"         "
687 0 0 22 3 1 #"("
688 0 0 14 3 4 #"list"
689 0 0 70 3 1 #" "
690 0 0 14 3 19 #"main-choice-message"
691 0 0 22 3 4 #"))))"
692 0 0 70 29 1 #"\n"
693 0 0 70 3 0 #""
694 0 0 66 3 2 #"  "
695 0 0 70 29 1 #"\n"
696 0 0 70 3 0 #""
697 0 0 66 3 2 #"  "
698 0           0