Web   ·   Wiki   ·   Activities   ·   Blog   ·   Lists   ·   Chat   ·   Meeting   ·   Bugs   ·   Git   ·   Translate   ·   Archive   ·   People   ·   Donate
summaryrefslogtreecommitdiffstats
path: root/samples/math-prime-factors.ta
blob: 0e663d8109751679efb774314444f5916f95ab36 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
[[0, ["start", 2.0], 120, 180, [null, 469]],
[1, ["while", 0], 258, 556, [4, 5, 11, 151]],
[2, ["storein", 0], 139, 714, [261, 3, 268, 272]],
[3, ["string", "n"], 206, 714, [2, null]],
[4, ["vspace", 0], 258, 514, [149, 1]],
[5, ["greater2", 0], 314, 522, [1, 6, 8, null]],
[6, "box", 360, 522, [5, 7, null]],
[7, ["string", "n"], 414, 522, [6, null]],
[8, ["number", 1], 384, 564, [5, null]],
[9, "hat", 340, 180, [null, 10, 85]],
[10, ["string", "get next prime factor"], 398, 192, [9, null]],
[11, "stack", 276, 622, [1, 12, null]],
[12, ["string", "get next prime factor"], 334, 622, [11, null]],
[13, "box", 510, 1034, [87, 14, null]],
[14, ["string", "factor"], 564, 1034, [13, null]],
[15, "box", 564, 1118, [19, 16, null]],
[16, ["string", "n"], 618, 1118, [15, null]],
[17, ["storein", 0], 443, 1076, [87, 18, 19, null]],
[18, ["string", "n"], 510, 1076, [17, null]],
[19, ["division2", 0], 510, 1118, [17, 15, 20]],
[20, "box", 588, 1160, [19, 21, null]],
[21, ["string", "factor"], 642, 1160, [20, null]],
[22, ["storein", 0], 341, 310, [141, 23, 24, null]],
[23, ["string", "factor"], 408, 310, [22, null]],
[24, ["number", 2], 408, 352, [22, null]],
[25, ["storein", 0], 323, 514, [141, 26, 34, 36]],
[26, ["string", "max"], 390, 514, [25, null]],
[27, "box", 552, 556, [30, 28, null]],
[28, ["string", "n"], 606, 556, [27, null]],
[29, "int", 444, 556, [34, 30]],
[30, "sqrt", 498, 556, [29, 27]],
[31, ["while", 146], 323, 766, [71, 47, 70, 84]],
[32, ["plus2", 0], 408, 1124, [39, 37, 33]],
[33, ["number", 1], 462, 1166, [32, null]],
[34, ["plus2", 0], 390, 556, [25, 29, 35]],
[35, ["number", 1], 444, 598, [34, null]],
[36, ["vspace", 0], 323, 598, [25, 76]],
[37, "box", 462, 1124, [32, 38, null]],
[38, ["string", "factor"], 516, 1124, [37, null]],
[39, ["storein", 0], 341, 1082, [42, 40, 32, null]],
[40, ["string", "factor"], 408, 1082, [39, null]],
[41, "stopstack", 359, 1022, [63, null]],
[42, ["if", 21], 341, 914, [70, 48, 63, 39]],
[43, "box", 425, 732, [47, 44, null]],
[44, ["string", "factor"], 479, 732, [43, null]],
[45, "box", 449, 774, [47, 46, null]],
[46, ["string", "max"], 503, 774, [45, null]],
[47, ["less2", 0], 379, 732, [31, 43, 45, null]],
[48, ["equal2", 20], 397, 840, [42, 50, 49, null]],
[49, ["number", 0], 443, 922, [48, null]],
[50, ["remainder2", 0], 443, 840, [48, 51, 53]],
[51, "box", 503, 840, [50, 52, null]],
[52, ["string", "n"], 557, 840, [51, null]],
[53, "box", 527, 882, [50, 54, null]],
[54, ["string", "factor"], 581, 882, [53, null]],
[55, ["storein", 0], 359, 1440, [65, 56, 57, 61]],
[56, ["string", "factor"], 426, 1440, [55, null]],
[57, "box", 426, 1482, [55, 58, null]],
[58, ["string", "n"], 480, 1482, [57, null]],
[59, "hat", 460, 240, [null, 60, 86]],
[60, ["string", "push factor"], 518, 252, [59, null]],
[61, "stack", 359, 1524, [55, 62, null]],
[62, ["string", "push factor"], 417, 1524, [61, null]],
[63, "stack", 359, 980, [42, 64, 41]],
[64, ["string", "push factor"], 417, 980, [63, null]],
[65, ["if", 42], 341, 1374, [69, 72, 55, null]],
[66, ["number", 1], 467, 1382, [72, null]],
[67, "box", 443, 1340, [72, 68, null]],
[68, ["string", "n"], 497, 1340, [67, null]],
[69, ["vspace", 0], 341, 1332, [79, 65]],
[70, ["vspace", 20], 341, 832, [31, 42]],
[71, ["vspace", 0], 323, 724, [76, 31]],
[72, ["greater2", 0], 397, 1340, [65, 67, 66, null]],
[73, ["storein", 0], 443, 908, [351, 74, 75, 87]],
[74, ["string", "new factor"], 510, 908, [73, null]],
[75, ["number", 1], 510, 950, [73, null]],
[76, ["storein", 0], 323, 640, [36, 77, 78, 71]],
[77, ["string", "new factor"], 390, 640, [76, null]],
[78, ["number", 0], 390, 682, [76, null]],
[79, ["if", 105], 323, 1266, [84, 80, 69, null]],
[80, ["equal2", 0], 379, 1232, [79, 82, 81, null]],
[81, ["number", 0], 425, 1274, [80, null]],
[82, "box", 425, 1232, [80, 83, null]],
[83, ["string", "new factor"], 479, 1232, [82, null]],
[84, ["vspace", 20], 323, 1184, [31, 79]],
[85, "sandwichclampcollapsed", 340, 234, [9, 141, null]],
[86, "sandwichclampcollapsed", 460, 294, [59, 227, null]],
[87, ["storein", 0], 443, 992, [73, 96, 13, 17]],
[88, ["number", 1], 564, 472, [89, null]],
[89, ["plus2", 0], 510, 430, [98, 94, 88]],
[90, ["vspace", 20], 443, 472, [98, 345]],
[91, ["storein", 0], 258, 388, [286, 92, 93, 149]],
[92, ["string", "count"], 325, 388, [91, null]],
[93, ["number", 0], 325, 430, [91, null]],
[94, "box", 564, 430, [89, 95, null]],
[95, ["string", "count"], 618, 430, [94, null]],
[96, "box", 510, 992, [87, 97, null]],
[97, ["string", "count"], 564, 992, [96, null]],
[98, ["storein", 0], 443, 388, [232, 99, 89, 90]],
[99, ["string", "count"], 510, 388, [98, null]],
[100, ["storein", 0], 258, 808, [153, 101, 102, 385]],
[101, ["string", "radius"], 325, 808, [100, null]],
[102, ["number", 400], 325, 850, [100, null]],
[103, ["string", "i"], 673, 636, [189, null]],
[104, "seth", 583, 564, [453, 238, 174]],
[105, ["number", 360], 749, 606, [106, null]],
[106, ["division2", 0], 695, 606, [238, 105, 188]],
[107, "forward", 583, 688, [174, 111, 162]],
[108, "forward", 703, 728, [405, 109, 249]],
[109, ["number", 1], 773, 728, [108, null]],
[110, "back", 583, 958, [157, 113, null]],
[111, "box", 653, 688, [107, 112, null]],
[112, ["string", "radius"], 707, 688, [111, null]],
[113, "box", 641, 958, [110, 114, null]],
[114, ["string", "radius"], 695, 958, [113, null]],
[115, "hat", 900, 300, [null, 116, 126]],
[116, ["string", "increment color"], 958, 312, [115, null]],
[117, "stack", 703, 812, [249, 118, 399]],
[118, ["string", "increment color"], 761, 812, [117, null]],
[119, "setcolor", 883, 364, [126, 125, null]],
[120, ["number", 100], 1068, 406, [122, null]],
[121, "color", 1014, 364, [125, null]],
[122, ["division2", 0], 1014, 406, [125, 120, 123]],
[123, "box", 1092, 448, [122, 124, null]],
[124, ["string", "number"], 1146, 448, [123, null]],
[125, ["plus2", 0], 960, 364, [119, 121, 122]],
[126, "sandwichclampcollapsed", 900, 354, [115, 119, null]],
[127, ["until", 62], 463, 710, [136, 132, 451, null]],
[128, ["storein", 20], 481, 818, [451, 186, 236, null]],
[129, ["string", "i"], 602, 818, [186, null]],
[130, "box", 602, 942, [236, 187, null]],
[131, ["string", "i"], 710, 942, [187, null]],
[132, ["equal2", 20], 519, 636, [127, 133, 155, null]],
[133, "box", 565, 636, [132, 189, null]],
[134, "hat", 360, 360, [null, 135, 215]],
[135, ["string", "draw cluster"], 418, 372, [134, null]],
[136, ["vspace", 20], 463, 628, [180, 127]],
[137, "stack", 258, 1268, [407, 138, 296]],
[138, ["string", "draw cluster"], 316, 1268, [137, null]],
[139, "box", 425, 210, [142, 140, null]],
[140, ["string", "count"], 479, 210, [139, null]],
[141, ["ifelse", [21, 21]],
323, 244, [85, 142, 22, 144, 25]],
[142, ["equal2", 0], 379, 210, [141, 139, 143, null]],
[143, ["number", 0], 425, 252, [142, null]],
[144, ["storein", 0], 341, 412, [141, 145, 148, null]],
[145, ["string", "factor"], 408, 412, [144, null]],
[146, "box", 462, 454, [148, 147, null]],
[147, ["string", "count"], 516, 454, [146, null]],
[148, "box", 408, 454, [144, 146, null]],
[149, "comment", 258, 472, [91, 150, 4]],
[150, ["string", "calculate prime factors"], 341, 472, [149, null]],
[151, "comment", 258, 682, [1, 152, 153]],
[152, ["string", "display prime factors"], 341, 682, [151, null]],
[153, ["storein", 0], 258, 724, [151, 154, 175, 100]],
[154, ["string", "level"], 325, 724, [153, null]],
[155, "box", 565, 718, [132, 182, null]],
[156, ["string", "i"], 584, 504, [177, null]],
[157, ["ifelse", [0, 0]],
583, 772, [162, 158, 443, 445, 110]],
[158, ["equal2", 0], 639, 738, [157, 163, 159, null]],
[159, ["number", 1], 685, 780, [158, null]],
[160, "stack", 923, 770, [226, 161, 218]],
[161, ["string", "draw cluster"], 981, 770, [160, null]],
[162, ["vspace", 0], 583, 730, [107, 157]],
[163, "box", 685, 738, [158, 164, null]],
[164, ["string", "level"], 739, 738, [163, null]],
[165, ["storein", 0], 163, 832, [362, 199, 172, 173]],
[166, ["number", 2.5], 308, 916, [172, null]],
[167, "box", 284, 874, [172, 195, null]],
[168, ["storein", 0], 181, 1064, [375, 169, 401, null]],
[169, ["string", "radius"], 248, 1064, [168, null]],
[170, "box", 265, 964, [376, 171, null]],
[171, ["string", "radius"], 319, 964, [170, null]],
[172, ["division2", 0], 230, 874, [165, 167, 166]],
[173, ["vspace", 20], 163, 916, [165, 375]],
[174, ["vspace", 20], 583, 606, [104, 107]],
[175, "box", 325, 766, [153, 176, null]],
[176, ["string", "count"], 379, 766, [175, null]],
[177, ["plus2", 0], 530, 504, [180, 156, 178]],
[178, "box", 584, 546, [177, 179, null]],
[179, ["string", "level"], 638, 546, [178, null]],
[180, ["storein", 20], 463, 504, [206, 177, 181, 136]],
[181, ["number", 0], 530, 586, [180, null]],
[182, "box", 619, 718, [155, 183, null]],
[183, ["string", "level"], 673, 718, [182, null]],
[184, "box", 602, 860, [186, 185, null]],
[185, ["string", "level"], 656, 860, [184, null]],
[186, ["plus2", 0], 548, 818, [128, 129, 184]],
[187, ["plus2", 0], 656, 942, [130, 131, 234]],
[188, "box", 773, 648, [106, 192, null]],
[189, ["plus2", 0], 619, 636, [133, 103, 190]],
[190, "box", 673, 678, [189, 191, null]],
[191, ["string", "level"], 727, 678, [190, null]],
[192, "box", 827, 648, [188, 193, null]],
[193, ["string", "level"], 881, 648, [192, null]],
[194, ["plus2", 0], 230, 584, [204, 202, 196]],
[195, ["string", "radius"], 338, 874, [167, null]],
[196, "box", 284, 626, [194, 197, null]],
[197, ["string", "level"], 338, 626, [196, null]],
[198, ["plus2", 0], 415, 770, [207, 203, 200]],
[199, ["string", "radius"], 230, 832, [165, null]],
[200, "box", 469, 812, [198, 201, null]],
[201, ["string", "level"], 523, 812, [200, null]],
[202, ["string", "heading"], 284, 584, [194, null]],
[203, ["string", "heading"], 469, 770, [198, null]],
[204, ["storein", 20], 163, 584, [254, 194, 216, 362]],
[205, "seth", 303, 770, [374, 207, null]],
[206, "sandwichclampcollapsed", 480, 494, [208, 180, null]],
[207, "box", 361, 770, [205, 198, null]],
[208, "hat", 480, 440, [null, 209, 206]],
[209, ["string", "inner loop"], 538, 452, [208, null]],
[210, "stack", 378, 574, [241, 211, 245]],
[211, ["string", "inner loop"], 436, 574, [210, null]],
[212, ["number", 1], 1068, 728, [217, null]],
[213, ["plus2", 0], 990, 854, [218, 222, 214]],
[214, ["number", 1], 1044, 896, [213, null]],
[215, "sandwichclampcollapsed", 360, 414, [134, 352, null]],
[216, "heading", 230, 666, [204, null]],
[217, ["minus2", 0], 990, 686, [220, 224, 212]],
[218, ["storein", 0], 923, 812, [160, 219, 213, null]],
[219, ["string", "level"], 990, 812, [218, null]],
[220, ["storein", 0], 923, 644, [447, 221, 217, 226]],
[221, ["string", "level"], 990, 644, [220, null]],
[222, "box", 1044, 854, [213, 223, null]],
[223, ["string", "level"], 1098, 854, [222, null]],
[224, "box", 1044, 686, [217, 225, null]],
[225, ["string", "level"], 1098, 686, [224, null]],
[226, ["vspace", 0], 923, 728, [220, 160]],
[227, "comment", 443, 304, [86, 228, 232]],
[228, ["plus2", 0], 526, 304, [227, 229, 230]],
[229, ["string", "factor "], 580, 304, [228, null]],
[230, "box", 580, 346, [228, 231, null]],
[231, ["string", "factor"], 634, 346, [230, null]],
[232, ["vspace", 0], 443, 346, [227, 98]],
[233, ["number", 1], 602, 900, [236, null]],
[234, "box", 710, 984, [187, 235, null]],
[235, ["string", "level"], 764, 984, [234, null]],
[236, ["plus2", 0], 548, 900, [128, 233, 130]],
[237, "heading", 695, 564, [238, null]],
[238, ["plus2", 0], 641, 564, [104, 237, 106]],
[239, "hat", 180, 520, [null, 240, 254]],
[240, ["string", "save level"], 238, 532, [239, null]],
[241, "stack", 378, 532, [360, 242, 210]],
[242, ["string", "save level"], 436, 532, [241, null]],
[243, "hat", 320, 580, [null, 244, 253]],
[244, ["string", "restore level"], 378, 592, [243, null]],
[245, "stack", 378, 616, [210, 246, 355]],
[246, ["string", "restore level"], 436, 616, [245, null]],
[247, "comment", 258, 1394, [456, 248, null]],
[248, ["string", "done"], 341, 1394, [247, null]],
[249, "back", 703, 770, [108, 250, 117]],
[250, ["number", 1], 761, 770, [249, null]],
[251, "setpensize", 258, 1142, [397, 396, 293]],
[252, ["division2", 0], 379, 1018, [470, 283, 281]],
[253, "sandwichclampcollapsed", 320, 634, [243, 372, null]],
[254, "sandwichclampcollapsed", 180, 574, [239, 204, null]],
[255, ["while", 168], 121, 522, [265, 259, 261, null]],
[256, ["storein", 0], 121, 396, [285, 257, 258, 265]],
[257, ["string", "number"], 188, 396, [256, null]],
[258, ["number", 2], 188, 438, [256, null]],
[259, ["less2", 0], 177, 488, [255, 266, 260, null]],
[260, ["number", 101], 247, 530, [259, null]],
[261, "fillscreen2", 139, 588, [255, 262, 264, 263, 2]],
[262, ["number", 60], 220, 588, [261, null]],
[263, ["number", 100], 220, 672, [261, null]],
[264, "black", 220, 630, [261, null]],
[265, ["vspace", 0], 121, 480, [256, 255]],
[266, "box", 223, 488, [259, 267, null]],
[267, ["string", "number"], 277, 488, [266, null]],
[268, "box", 206, 756, [2, 269, null]],
[269, ["string", "number"], 260, 756, [268, null]],
[270, "hat", 240, 300, [null, 271, 286]],
[271, ["string", "action"], 298, 312, [270, null]],
[272, "stack", 139, 798, [2, 273, 461]],
[273, ["string", "action"], 197, 798, [272, null]],
[274, "wait", 981, 286, [463, 465, null]],
[275, ["storein", 0], 139, 882, [461, 276, 280, null]],
[276, ["string", "number"], 206, 882, [275, null]],
[277, ["number", 1], 260, 966, [280, null]],
[278, "box", 260, 924, [280, 279, null]],
[279, ["string", "number"], 314, 924, [278, null]],
[280, ["plus2", 0], 206, 924, [275, 278, 277]],
[281, "box", 457, 1060, [252, 282, null]],
[282, ["string", "number"], 511, 1060, [281, null]],
[283, "box", 433, 1018, [252, 284, null]],
[284, ["string", "radius"], 487, 1018, [283, null]],
[285, ["forever", 273], 103, 362, [381, 256, null]],
[286, "sandwichclampcollapsed", 240, 354, [270, 91, null]],
[287, "penup", 643, 328, [290, 298]],
[288, "pendown", 643, 454, [298, 305]],
[289, "leftpos", 701, 370, [298, null]],
[290, "setcolor", 643, 286, [379, 291, 287]],
[291, "white", 720, 286, [290, null]],
[292, "red", 335, 1184, [293, null]],
[293, "setcolor", 258, 1184, [251, 292, 407]],
[294, "hat", 660, 180, [null, 295, 318]],
[295, ["string", "display factors"], 718, 192, [294, null]],
[296, "stack", 258, 1310, [137, 297, 456]],
[297, ["string", "display factors"], 316, 1310, [296, null]],
[298, ["setxy2", 0], 643, 370, [287, 289, 384, 288]],
[299, ["number", 100], 779, 454, [384, null]],
[300, "show", 661, 604, [304, 309, 327]],
[301, ["string", "  prime"], 827, 688, [308, null]],
[302, ["equal2", 0], 699, 504, [304, 306, 303, null]],
[303, ["number", 1], 745, 546, [302, null]],
[304, ["ifelse", [41, 0]],
643, 538, [305, 302, 300, 326, null]],
[305, ["vspace", 0], 643, 496, [288, 304]],
[306, "box", 745, 504, [302, 307, null]],
[307, ["string", "count"], 799, 504, [306, null]],
[308, ["plus2", 0], 773, 646, [309, 311, 301]],
[309, ["plus2", 0], 719, 604, [300, 310, 308]],
[310, ["string", "   "], 773, 604, [309, null]],
[311, "box", 827, 646, [308, 312, null]],
[312, ["string", "number"], 881, 646, [311, null]],
[313, ["setxy2", 0], 763, 846, [316, 314, 315, 317]],
[314, ["number", 0], 821, 846, [313, null]],
[315, ["number", 0], 821, 888, [313, null]],
[316, "penup", 763, 804, [437, 313]],
[317, "pendown", 763, 930, [313, null]],
[318, "sandwichclampcollapsed", 660, 234, [294, 379, null]],
[319, ["plus2", 0], 719, 746, [326, 320, 321]],
[320, ["string", "   "], 773, 746, [319, null]],
[321, ["plus2", 0], 773, 788, [319, 322, 325]],
[322, "box", 827, 788, [321, 323, null]],
[323, ["string", "number"], 881, 788, [322, null]],
[324, ["string", " = "], 881, 830, [325, null]],
[325, ["plus2", 0], 827, 830, [321, 324, 330]],
[326, "show", 661, 746, [304, 319, null]],
[327, ["vspace", 20], 661, 646, [300, null]],
[328, ["storein", 0], 461, 620, [345, 329, 334, 350]],
[329, ["string", "factor string"], 528, 620, [328, null]],
[330, "box", 881, 872, [325, 331, null]],
[331, ["string", "factor string"], 935, 872, [330, null]],
[332, "box", 582, 806, [342, 333, null]],
[333, ["string", "factor string"], 636, 806, [332, null]],
[334, ["plus2", 0], 528, 662, [328, 335, 338]],
[335, ["string", ""], 582, 662, [334, null]],
[336, ["string", " x "], 636, 848, [337, null]],
[337, ["plus2", 0], 582, 848, [342, 336, 340]],
[338, "box", 582, 704, [334, 339, null]],
[339, ["string", "factor"], 636, 704, [338, null]],
[340, "box", 636, 890, [337, 341, null]],
[341, ["string", "factor"], 690, 890, [340, null]],
[342, ["plus2", 0], 528, 806, [343, 332, 337]],
[343, ["storein", 0], 461, 764, [345, 344, 342, null]],
[344, ["string", "factor string"], 528, 764, [343, null]],
[345, ["ifelse", [42, 21]],
443, 554, [90, 349, 328, 343, 351]],
[346, "box", 545, 520, [349, 347, null]],
[347, ["string", "count"], 599, 520, [346, null]],
[348, ["number", 1], 545, 562, [349, null]],
[349, ["equal2", 0], 499, 520, [345, 346, 348, null]],
[350, ["vspace", 0], 461, 704, [328, null]],
[351, ["vspace", 0], 443, 866, [345, 73]],
[352, "seth", 378, 448, [215, 358, 360]],
[353, ["number", 45], 490, 490, [358, null]],
[354, "heading", 490, 448, [358, null]],
[355, "seth", 378, 658, [245, 359, null]],
[356, ["number", 45], 514, 700, [359, null]],
[357, "heading", 490, 658, [359, null]],
[358, ["plus2", 0], 436, 448, [352, 354, 353]],
[359, ["minus2", 0], 436, 658, [355, 357, 356]],
[360, ["vspace", 0], 378, 490, [352, 241]],
[361, "sandwichclampcollapsed", 120, 268, [469, 409, null]],
[362, ["storein", 20], 163, 708, [204, 367, 377, 165]],
[363, ["string", "radius"], 284, 708, [367, null]],
[364, "box", 370, 686, [372, 368, null]],
[365, "box", 284, 750, [367, 366, null]],
[366, ["string", "level"], 338, 750, [365, null]],
[367, ["plus2", 0], 230, 708, [362, 363, 365]],
[368, ["plus2", 0], 424, 686, [364, 369, 370]],
[369, ["string", "radius"], 478, 686, [368, null]],
[370, "box", 478, 728, [368, 371, null]],
[371, ["string", "level"], 532, 728, [370, null]],
[372, ["storein", 0], 303, 644, [253, 373, 364, 374]],
[373, ["string", "radius"], 370, 644, [372, null]],
[374, ["vspace", 0], 303, 728, [372, 205]],
[375, ["if", 21], 163, 998, [173, 376, 168, null]],
[376, ["less2", 0], 219, 964, [375, 170, 394, null]],
[377, "box", 230, 790, [362, 378, null]],
[378, ["string", "radius"], 284, 790, [377, null]],
[379, "seth", 643, 244, [318, 380, 290]],
[380, ["number", 0], 701, 244, [379, null]],
[381, "setscale", 103, 320, [409, 382, 285]],
[382, ["number", 75], 180, 320, [381, null]],
[383, "toppos", 755, 412, [384, null]],
[384, ["minus2", 0], 701, 412, [298, 383, 299]],
[385, "seth", 258, 892, [100, 386, 389]],
[386, ["random", 0], 316, 892, [385, 387, 388, null]],
[387, ["number", 0], 402, 892, [386, null]],
[388, ["number", 180], 402, 934, [386, null]],
[389, ["vspace", 0], 258, 934, [385, 390]],
[390, ["storein", 0], 258, 976, [389, 391, 470, 397]],
[391, ["string", "pensize"], 325, 976, [390, null]],
[392, "box", 805, 644, [398, 393, null]],
[393, ["string", "pensize"], 859, 644, [392, null]],
[394, "box", 289, 1006, [376, 395, null]],
[395, ["string", "pensize"], 343, 1006, [394, null]],
[396, ["number", 1], 360, 1142, [251, null]],
[397, ["vspace", 20], 258, 1060, [390, 251]],
[398, "setpensize", 703, 644, [448, 392, 405]],
[399, "setpensize", 703, 854, [117, 400, 403]],
[400, ["number", 1], 805, 854, [399, null]],
[401, "box", 248, 1106, [168, 402, null]],
[402, ["string", "pensize"], 302, 1106, [401, null]],
[403, "setgray", 703, 896, [399, 404, null]],
[404, ["number", 0], 776, 896, [403, null]],
[405, "setgray", 703, 686, [398, 406, 108]],
[406, ["number", 100], 776, 686, [405, null]],
[407, "setgray", 258, 1226, [293, 408, 137]],
[408, ["number", 0], 331, 1226, [407, null]],
[409, "clean", 103, 278, [361, 381]],
[410, "mousey", 1359, 328, [414, null]],
[411, "height", 1413, 370, [412, null]],
[412, ["division2", 0], 1359, 370, [414, 411, 413]],
[413, ["number", 2], 1437, 412, [412, null]],
[414, ["plus2", 0], 1305, 328, [415, 410, 412]],
[415, ["division2", 0], 1227, 286, [467, 416, 414]],
[416, "height", 1281, 286, [415, null]],
[417, "toppos", 875, 428, [427, null]],
[418, "bottompos", 875, 678, [438, null]],
[419, "rightpos", 875, 346, [426, null]],
[420, ["string", "fast"], 821, 512, [421, null]],
[421, "show", 763, 512, [429, 420, 430]],
[422, ["string", "slow"], 821, 762, [437, null]],
[423, ["setxy2", 20], 763, 346, [428, 426, 427, 429]],
[424, ["number", 200], 899, 388, [426, null]],
[425, ["number", 100], 899, 470, [427, null]],
[426, ["minus2", 0], 821, 346, [423, 419, 424]],
[427, ["minus2", 0], 821, 428, [423, 417, 425]],
[428, "penup", 763, 304, [458, 423]],
[429, "pendown", 763, 470, [423, 421]],
[430, "penup", 763, 554, [421, 431]],
[431, ["setxy2", 20], 763, 596, [430, 432, 438, 436]],
[432, ["minus2", 0], 821, 596, [431, 433, 434]],
[433, "rightpos", 875, 596, [432, null]],
[434, ["number", 200], 899, 638, [432, null]],
[435, ["number", 100], 875, 720, [438, null]],
[436, "pendown", 763, 720, [431, 437]],
[437, "show", 763, 762, [436, 422, 316]],
[438, ["plus2", 0], 821, 678, [431, 418, 435]],
[439, "hat", 720, 580, [null, 440, 448]],
[440, ["string", "draw point"], 778, 592, [439, null]],
[441, "hat", 940, 580, [null, 442, 447]],
[442, ["string", "recurse"], 998, 592, [441, null]],
[443, "stack", 601, 838, [157, 444, null]],
[444, ["string", "draw point"], 659, 838, [443, null]],
[445, "stack", 601, 898, [157, 446, null]],
[446, ["string", "recurse"], 659, 898, [445, null]],
[447, "sandwichclampcollapsed", 940, 634, [441, 220, null]],
[448, "sandwichclampcollapsed", 720, 634, [439, 398, null]],
[449, "hat", 600, 500, [null, 450, 453]],
[450, ["string", "radiate"], 658, 512, [449, null]],
[451, "stack", 481, 776, [127, 452, 128]],
[452, ["string", "radiate"], 539, 776, [451, null]],
[453, "sandwichclampcollapsed", 600, 554, [449, 104, null]],
[454, "hat", 780, 240, [null, 455, 458]],
[455, ["string", "display scale"], 838, 252, [454, null]],
[456, "stack", 258, 1352, [296, 457, 247]],
[457, ["string", "display scale"], 316, 1352, [456, null]],
[458, "sandwichclampcollapsed", 780, 294, [454, 428, null]],
[459, "hat", 980, 180, [null, 460, 468]],
[460, ["string", "pause"], 1038, 192, [459, null]],
[461, "stack", 139, 840, [272, 462, 275]],
[462, ["string", "pause"], 197, 840, [461, null]],
[463, ["repeat", 0], 963, 244, [468, 464, 274, null]],
[464, ["number", 10], 1021, 244, [463, null]],
[465, ["division2", 0], 1039, 286, [274, 467, 466]],
[466, ["number", 10], 1117, 328, [465, null]],
[467, ["identity2", 40], 1093, 286, [465, 415]],
[468, "sandwichclampcollapsed", 980, 234, [459, 463, null]],
[469, "fullscreen", 120, 226, [0, 361]],
[470, ["product2", 20], 325, 1018, [390, 252, 471]],
[471, ["number", 2.0], 379, 1100, [470, null]]]