From 274f9669221badc2892ca22ac625630c22c3906b Mon Sep 17 00:00:00 2001
From: Walter Bender <walter.bender@gmail.com>
Date: Sat, 02 Feb 2013 15:29:22 +0000
Subject: more embellishments

---
diff --git a/samples/math-prime-factors.ta b/samples/math-prime-factors.ta
index b789ee0..f3bc454 100644
--- a/samples/math-prime-factors.ta
+++ b/samples/math-prime-factors.ta
@@ -1,399 +1,469 @@
-[[0, ["start", 2.0], 500, 60, [null, 330]],
-[1, ["while", 0], 898, 336, [4, 5, 11, 155]],
-[2, ["storein", 0], 536, 458, [305, 3, 312, 316]],
-[3, ["string", "n"], 609, 458, [2, null]],
-[4, ["vspace", 0], 898, 294, [153, 1]],
-[5, ["greater2", 0], 954, 302, [1, 6, 8, null]],
-[6, "box", 1000, 302, [5, 7, null]],
-[7, ["string", "n"], 1054, 302, [6, null]],
-[8, ["number", 1], 1024, 344, [5, null]],
-[9, "hat", 920, 180, [null, 10, 85]],
-[10, ["string", "get next prime factor"], 980, 192, [9, null]],
-[11, "stack", 916, 402, [1, 12, null]],
-[12, ["string", "get next prime factor"], 976, 402, [11, null]],
-[13, "box", 1051, 1098, [87, 14, null]],
-[14, ["string", "factor"], 1105, 1098, [13, null]],
-[15, "box", 1105, 1182, [19, 16, null]],
-[16, ["string", "n"], 1159, 1182, [15, null]],
-[17, ["storein", 0], 978, 1140, [87, 18, 19, null]],
-[18, ["string", "n"], 1051, 1140, [17, null]],
-[19, ["division2", 0], 1051, 1182, [17, 15, 20]],
-[20, "box", 1129, 1224, [19, 21, null]],
-[21, ["string", "factor"], 1183, 1224, [20, null]],
-[22, ["storein", 0], 921, 310, [145, 23, 24, null]],
-[23, ["string", "factor"], 994, 310, [22, null]],
-[24, ["number", 2], 994, 352, [22, null]],
-[25, ["storein", 0], 903, 510, [145, 26, 34, 36]],
-[26, ["string", "max"], 976, 510, [25, null]],
-[27, "box", 1138, 552, [30, 28, null]],
-[28, ["string", "n"], 1192, 552, [27, null]],
-[29, "int", 1030, 552, [34, 30]],
-[30, "sqrt", 1084, 552, [29, 27]],
-[31, ["while", 144], 903, 762, [71, 47, 70, 84]],
-[32, ["plus2", 0], 994, 1118, [39, 37, 33]],
-[33, ["number", 1], 1048, 1160, [32, null]],
-[34, ["plus2", 0], 976, 552, [25, 29, 35]],
-[35, ["number", 1], 1030, 594, [34, null]],
-[36, ["vspace", 0], 903, 594, [25, 76]],
-[37, "box", 1048, 1118, [32, 38, null]],
-[38, ["string", "factor"], 1102, 1118, [37, null]],
-[39, ["storein", 0], 921, 1076, [42, 40, 32, null]],
-[40, ["string", "factor"], 994, 1076, [39, null]],
-[41, "stopstack", 939, 1018, [63, null]],
-[42, ["if", 20], 921, 910, [70, 48, 63, 39]],
-[43, "box", 1005, 728, [47, 44, null]],
-[44, ["string", "factor"], 1059, 728, [43, null]],
-[45, "box", 1029, 770, [47, 46, null]],
-[46, ["string", "max"], 1083, 770, [45, null]],
-[47, ["less2", 0], 959, 728, [31, 43, 45, null]],
-[48, ["equal2", 20], 977, 836, [42, 50, 49, null]],
-[49, ["number", 0], 1023, 918, [48, null]],
-[50, ["remainder2", 0], 1023, 836, [48, 51, 53]],
-[51, "box", 1086, 836, [50, 52, null]],
-[52, ["string", "n"], 1140, 836, [51, null]],
-[53, "box", 1110, 878, [50, 54, null]],
-[54, ["string", "factor"], 1164, 878, [53, null]],
-[55, ["storein", 0], 939, 1432, [65, 56, 57, 61]],
-[56, ["string", "factor"], 1012, 1432, [55, null]],
-[57, "box", 1012, 1474, [55, 58, null]],
-[58, ["string", "n"], 1066, 1474, [57, null]],
-[59, "hat", 960, 280, [null, 60, 86]],
-[60, ["string", "push factor"], 1020, 292, [59, null]],
-[61, "stack", 939, 1516, [55, 62, null]],
-[62, ["string", "push factor"], 999, 1516, [61, null]],
-[63, "stack", 939, 976, [42, 64, 41]],
-[64, ["string", "push factor"], 999, 976, [63, null]],
-[65, ["if", 40], 921, 1366, [69, 72, 55, null]],
-[66, ["number", 1], 1047, 1374, [72, null]],
-[67, "box", 1023, 1332, [72, 68, null]],
-[68, ["string", "n"], 1077, 1332, [67, null]],
-[69, ["vspace", 0], 921, 1324, [79, 65]],
-[70, ["vspace", 20], 921, 828, [31, 42]],
-[71, ["vspace", 0], 903, 720, [76, 31]],
-[72, ["greater2", 0], 977, 1332, [65, 67, 66, null]],
-[73, ["storein", 0], 978, 972, [396, 74, 75, 87]],
-[74, ["string", "new factor"], 1051, 972, [73, null]],
-[75, ["number", 1], 1051, 1014, [73, null]],
-[76, ["storein", 0], 903, 636, [36, 77, 78, 71]],
-[77, ["string", "new factor"], 976, 636, [76, null]],
-[78, ["number", 0], 976, 678, [76, null]],
-[79, ["if", 102], 903, 1258, [84, 80, 69, null]],
-[80, ["equal2", 0], 959, 1224, [79, 82, 81, null]],
-[81, ["number", 0], 1005, 1266, [80, null]],
-[82, "box", 1005, 1224, [80, 83, null]],
-[83, ["string", "new factor"], 1059, 1224, [82, null]],
-[84, ["vspace", 20], 903, 1176, [31, 79]],
-[85, "sandwichclampcollapsed", 920, 234, [9, 145, null]],
-[86, "sandwichclampcollapsed", 960, 334, [59, 241, null]],
-[87, ["storein", 0], 978, 1056, [73, 96, 13, 17]],
-[88, ["number", 1], 1105, 536, [89, null]],
-[89, ["plus2", 0], 1051, 494, [98, 94, 88]],
-[90, ["vspace", 20], 978, 536, [98, 390]],
-[91, ["storein", 0], 898, 168, [331, 92, 93, 153]],
-[92, ["string", "count"], 971, 168, [91, null]],
-[93, ["number", 0], 971, 210, [91, null]],
-[94, "box", 1105, 494, [89, 95, null]],
-[95, ["string", "count"], 1159, 494, [94, null]],
-[96, "box", 1051, 1056, [87, 97, null]],
-[97, ["string", "count"], 1105, 1056, [96, null]],
-[98, ["storein", 0], 978, 452, [246, 99, 89, 90]],
-[99, ["string", "count"], 1051, 452, [98, null]],
-[100, ["storein", 0], 898, 586, [157, 101, 102, 293]],
-[101, ["string", "radius"], 971, 586, [100, null]],
-[102, ["number", 400], 971, 628, [100, null]],
-[103, ["string", "i"], 210, 796, [197, null]],
-[104, "seth", 18, 978, [195, 266, 181]],
-[105, ["number", 360], 184, 1020, [106, null]],
-[106, ["division2", 0], 130, 1020, [266, 105, 196]],
-[107, "penup", 898, 712, [293, 338]],
-[108, "pendown", 36, 1292, [161, 110]],
-[109, "forward", 18, 1142, [181, 115, 166]],
-[110, "forward", 36, 1334, [108, 111, 291]],
-[111, ["number", 1], 109, 1334, [110, null]],
-[112, "penup", 36, 1460, [121, null]],
-[113, "pendown", 898, 838, [141, 341]],
-[114, "back", 18, 1892, [161, 117, 132]],
-[115, "box", 91, 1142, [109, 116, null]],
-[116, ["string", "radius"], 145, 1142, [115, null]],
-[117, "box", 76, 1892, [114, 118, null]],
-[118, ["string", "radius"], 130, 1892, [117, null]],
-[119, "hat", 40, 500, [null, 120, 130]],
-[120, ["string", "increment color"], 100, 512, [119, null]],
-[121, "stack", 36, 1418, [291, 122, 112]],
-[122, ["string", "increment color"], 96, 1418, [121, null]],
-[123, "setcolor", 23, 606, [263, 129, null]],
-[124, ["number", 100], 215, 648, [126, null]],
-[125, "color", 161, 606, [129, null]],
-[126, ["division2", 0], 161, 648, [129, 124, 127]],
-[127, "box", 239, 690, [126, 128, null]],
-[128, ["string", "save n"], 293, 690, [127, null]],
-[129, ["plus2", 0], 107, 606, [123, 125, 126]],
-[130, "sandwichclampcollapsed", 40, 554, [119, 263, null]],
-[131, ["until", 534], 0, 870, [140, 136, 195, null]],
-[132, ["storein", 20], 18, 1934, [114, 193, 257, null]],
-[133, ["string", "i"], 145, 1934, [193, null]],
-[134, "box", 145, 2058, [257, 194, null]],
-[135, ["string", "i"], 253, 2058, [194, null]],
-[136, ["equal2", 20], 56, 796, [131, 137, 159, null]],
-[137, "box", 102, 796, [136, 197, null]],
-[138, "hat", 17, 180, [null, 139, 223]],
-[139, ["string", "draw cluster"], 77, 192, [138, null]],
-[140, ["vspace", 20], 0, 788, [187, 131]],
-[141, "stack", 898, 796, [338, 142, 113]],
-[142, ["string", "draw cluster"], 958, 796, [141, null]],
-[143, "box", 1005, 210, [146, 144, null]],
-[144, ["string", "count"], 1059, 210, [143, null]],
-[145, ["ifelse", [20, 20]],
-903, 244, [85, 146, 22, 148, 25]],
-[146, ["equal2", 0], 959, 210, [145, 143, 147, null]],
-[147, ["number", 0], 1005, 252, [146, null]],
-[148, ["storein", 0], 921, 410, [145, 149, 152, null]],
-[149, ["string", "factor"], 994, 410, [148, null]],
-[150, "box", 1048, 452, [152, 151, null]],
-[151, ["string", "count"], 1102, 452, [150, null]],
-[152, "box", 994, 452, [148, 150, null]],
-[153, "comment", 898, 252, [91, 154, 4]],
-[154, ["string", "calculate prime factors"], 986, 252, [153, null]],
-[155, "comment", 898, 460, [1, 156, 157]],
-[156, ["string", "display prime factors"], 986, 460, [155, null]],
-[157, ["storein", 0], 898, 502, [155, 158, 182, 100]],
-[158, ["string", "level"], 971, 502, [157, null]],
-[159, "box", 102, 878, [136, 189, null]],
-[160, ["string", "i"], 127, 664, [184, null]],
-[161, ["ifelse", [79, 161]], 18, 1226, [166, 162, 108, 280, 114]],
-[162, ["equal2", 0], 74, 1192, [161, 167, 163, null]],
-[163, ["number", 1], 120, 1234, [162, null]],
-[164, "stack", 36, 1678, [235, 165, 282]],
-[165, ["string", "draw cluster"], 96, 1678, [164, null]],
-[166, ["vspace", 0], 18, 1184, [109, 161]],
-[167, "box", 120, 1192, [162, 168, null]],
-[168, ["string", "level"], 174, 1192, [167, null]],
-[169, ["storein", 0], 83, 588, [212, 207, 178, 179]],
-[170, ["number", 2], 234, 672, [178, null]],
-[171, "box", 210, 630, [178, 203, null]],
-[172, ["storein", 0], 23, 364, [296, 173, 177, 180]],
-[173, ["string", "radius"], 96, 364, [172, null]],
-[174, ["number", 2], 150, 448, [177, null]],
-[175, "box", 150, 406, [177, 176, null]],
-[176, ["string", "radius"], 204, 406, [175, null]],
-[177, ["product2", 0], 96, 406, [172, 175, 174]],
-[178, ["division2", 0], 156, 630, [169, 171, 170]],
-[179, ["vspace", 0], 83, 672, [169, 268]],
-[180, ["vspace", 0], 23, 448, [172, 213]],
-[181, ["vspace", 40], 18, 1020, [104, 109]],
-[182, "box", 971, 544, [157, 183, null]],
-[183, ["string", "count"], 1025, 544, [182, null]],
-[184, ["plus2", 0], 73, 664, [187, 160, 185]],
-[185, "box", 127, 706, [184, 186, null]],
-[186, ["string", "level"], 181, 706, [185, null]],
-[187, ["storein", 20], 0, 664, [214, 184, 188, 140]],
-[188, ["number", 0], 73, 746, [187, null]],
-[189, "box", 156, 878, [159, 190, null]],
-[190, ["string", "level"], 210, 878, [189, null]],
-[191, "box", 145, 1976, [193, 192, null]],
-[192, ["string", "level"], 199, 1976, [191, null]],
-[193, ["plus2", 0], 91, 1934, [132, 133, 191]],
-[194, ["plus2", 0], 199, 2058, [134, 135, 255]],
-[195, ["vspace", 0], 18, 936, [131, 104]],
-[196, "box", 208, 1062, [106, 200, null]],
-[197, ["plus2", 0], 156, 796, [137, 103, 198]],
-[198, "box", 210, 838, [197, 199, null]],
-[199, ["string", "level"], 264, 838, [198, null]],
-[200, "box", 262, 1062, [196, 201, null]],
-[201, ["string", "level"], 316, 1062, [200, null]],
-[202, ["plus2", 0], 156, 464, [212, 210, 204]],
-[203, ["string", "radius"], 264, 630, [171, null]],
-[204, "box", 210, 506, [202, 205, null]],
-[205, ["string", "level"], 264, 506, [204, null]],
-[206, ["plus2", 0], 135, 490, [215, 211, 208]],
-[207, ["string", "radius"], 156, 588, [169, null]],
-[208, "box", 189, 532, [206, 209, null]],
-[209, ["string", "level"], 243, 532, [208, null]],
-[210, ["string", "heading"], 210, 464, [202, null]],
-[211, ["string", "heading"], 189, 490, [206, null]],
-[212, ["storein", 20], 83, 464, [297, 202, 224, 169]],
-[213, "seth", 23, 490, [180, 215, 258]],
-[214, "sandwichclampcollapsed", 17, 654, [216, 187, null]],
-[215, "box", 81, 490, [213, 206, null]],
-[216, "hat", 17, 600, [null, 217, 214]],
-[217, ["string", "inner loop"], 77, 612, [216, null]],
-[218, "stack", 0, 370, [272, 219, 276]],
-[219, ["string", "inner loop"], 60, 370, [218, null]],
-[220, ["number", 1], 187, 1636, [225, null]],
-[221, ["plus2", 0], 109, 1804, [226, 230, 222]],
-[222, ["number", 1], 163, 1846, [221, null]],
-[223, "sandwichclampcollapsed", 17, 234, [138, 284, null]],
-[224, "heading", 156, 546, [212, null]],
-[225, ["minus2", 0], 109, 1594, [228, 232, 220]],
-[226, ["storein", 0], 36, 1762, [282, 227, 221, 234]],
-[227, ["string", "level"], 109, 1762, [226, null]],
-[228, ["storein", 0], 36, 1552, [280, 229, 225, 235]],
-[229, ["string", "level"], 109, 1552, [228, null]],
-[230, "box", 163, 1804, [221, 231, null]],
-[231, ["string", "level"], 217, 1804, [230, null]],
-[232, "box", 163, 1594, [225, 233, null]],
-[233, ["string", "level"], 217, 1594, [232, null]],
-[234, ["vspace", 0], 36, 1846, [226, null]],
-[235, ["vspace", 0], 36, 1636, [228, 164]],
-[236, "comment", 243, 264, [298, 238, null]],
-[237, ["string", "level "], 385, 264, [238, null]],
-[238, ["plus2", 0], 331, 264, [236, 237, 247]],
-[239, "box", 439, 306, [247, 240, null]],
-[240, ["string", "level"], 493, 306, [239, null]],
-[241, "comment", 978, 368, [86, 242, 246]],
-[242, ["plus2", 0], 1066, 368, [241, 243, 244]],
-[243, ["string", "factor "], 1120, 368, [242, null]],
-[244, "box", 1120, 410, [242, 245, null]],
-[245, ["string", "factor"], 1174, 410, [244, null]],
-[246, ["vspace", 0], 978, 410, [241, 98]],
-[247, ["plus2", 0], 385, 306, [238, 239, 248]],
-[248, ["plus2", 0], 439, 348, [247, 250, 249]],
-[249, ["plus2", 0], 493, 390, [248, 251, 259]],
-[250, ["string", " n "], 493, 348, [248, null]],
-[251, "box", 547, 390, [249, 252, null]],
-[252, "box", 601, 390, [251, 253, null]],
-[253, ["string", "level"], 655, 390, [252, null]],
-[254, ["number", 1], 145, 2016, [257, null]],
-[255, "box", 253, 2100, [194, 256, null]],
-[256, ["string", "level"], 307, 2100, [255, null]],
-[257, ["plus2", 0], 91, 2016, [132, 254, 134]],
-[258, ["vspace", 0], 23, 532, [213, 278]],
-[259, ["plus2", 0], 547, 432, [249, 260, 267]],
-[260, ["string", " h "], 601, 432, [259, null]],
-[261, "hat", 260, 200, [null, 262, 298]],
-[262, ["string", "status"], 320, 212, [261, null]],
-[263, "stack", 23, 564, [130, 264, 123]],
-[264, ["string", "status"], 83, 564, [263, null]],
-[265, "heading", 130, 978, [266, null]],
-[266, ["plus2", 0], 76, 978, [104, 265, 106]],
-[267, "heading", 601, 474, [259, null]],
-[268, "stack", 83, 714, [179, 269, null]],
-[269, ["string", "status"], 143, 714, [268, null]],
-[270, "hat", 100, 400, [null, 271, 297]],
-[271, ["string", "save level"], 160, 412, [270, null]],
-[272, "stack", 0, 328, [295, 273, 218]],
-[273, ["string", "save level"], 60, 328, [272, null]],
-[274, "hat", 40, 300, [null, 275, 296]],
-[275, ["string", "restore level"], 100, 312, [274, null]],
-[276, "stack", 0, 412, [218, 277, null]],
-[277, ["string", "restore level"], 60, 412, [276, null]],
-[278, "stack", 23, 574, [258, 279, null]],
-[279, ["string", "status"], 83, 574, [278, null]],
-[280, "comment", 36, 1510, [161, 281, 228]],
-[281, ["string", "drop level"], 124, 1510, [280, null]],
-[282, "comment", 36, 1720, [164, 283, 226]],
-[283, ["string", "raise level"], 124, 1720, [282, null]],
-[284, "comment", 0, 244, [223, 286, 295]],
-[285, ["string", "level == "], 142, 244, [286, null]],
-[286, ["plus2", 0], 88, 244, [284, 285, 287]],
-[287, "box", 142, 286, [286, 288, null]],
-[288, ["string", "level"], 196, 286, [287, null]],
-[289, "comment", 898, 922, [341, 290, null]],
-[290, ["string", "done"], 986, 922, [289, null]],
-[291, "back", 36, 1376, [110, 292, 121]],
-[292, ["number", 1], 94, 1376, [291, null]],
-[293, "setpensize", 898, 670, [100, 294, 107]],
-[294, ["division2", 0], 1010, 670, [293, 328, 326]],
-[295, ["vspace", 0], 0, 286, [284, 272]],
-[296, "sandwichclampcollapsed", 40, 354, [274, 172, null]],
-[297, "sandwichclampcollapsed", 100, 454, [270, 212, null]],
-[298, "sandwichclampcollapsed", 260, 254, [261, 236, null]],
-[299, ["while", 163], 518, 266, [309, 303, 305, null]],
-[300, ["storein", 0], 518, 140, [330, 301, 302, 309]],
-[301, ["string", "save n"], 591, 140, [300, null]],
-[302, ["number", 2.0], 591, 182, [300, null]],
-[303, ["less2", 0], 574, 232, [299, 310, 304, null]],
-[304, ["number", 100], 644, 274, [303, null]],
-[305, "fillscreen2", 536, 332, [299, 306, 308, 307, 2]],
-[306, ["number", 60], 627, 332, [305, null]],
-[307, ["number", 100], 627, 416, [305, null]],
-[308, "black", 627, 374, [305, null]],
-[309, ["vspace", 0], 518, 224, [300, 299]],
-[310, "box", 620, 232, [303, 311, null]],
-[311, ["string", "save n"], 674, 232, [310, null]],
-[312, "box", 609, 500, [2, 313, null]],
-[313, ["string", "save n"], 663, 500, [312, null]],
-[314, "hat", 880, 80, [null, 315, 331]],
-[315, ["string", "main loop"], 940, 92, [314, null]],
-[316, "stack", 536, 542, [2, 317, 318]],
-[317, ["string", "main loop"], 596, 542, [316, null]],
-[318, "wait", 536, 584, [316, 319, 320]],
-[319, ["number", 1], 594, 584, [318, null]],
-[320, ["storein", 0], 536, 626, [318, 321, 325, null]],
-[321, ["string", "save n"], 609, 626, [320, null]],
-[322, ["number", 1.0], 663, 710, [325, null]],
-[323, "box", 663, 668, [325, 324, null]],
-[324, ["string", "save n"], 717, 668, [323, null]],
-[325, ["plus2", 0], 609, 668, [320, 323, 322]],
-[326, "box", 1088, 712, [294, 327, null]],
-[327, ["string", "save n"], 1142, 712, [326, null]],
-[328, "box", 1064, 670, [294, 329, null]],
-[329, ["string", "radius"], 1118, 670, [328, null]],
-[330, ["forever", 266], 500, 106, [0, 300, null]],
-[331, "sandwichclampcollapsed", 880, 134, [314, 91, null]],
-[332, "penup", 298, 610, [335, 343]],
-[333, "pendown", 298, 736, [343, 350]],
-[334, "leftpos", 356, 652, [343, null]],
-[335, "setcolor", 298, 568, [363, 336, 332]],
-[336, "white", 382, 568, [335, null]],
-[337, "red", 982, 754, [338, null]],
-[338, "setcolor", 898, 754, [107, 337, 141]],
-[339, "hat", 280, 480, [null, 340, 363]],
-[340, ["string", "display"], 340, 492, [339, null]],
-[341, "stack", 898, 880, [113, 342, 289]],
-[342, ["string", "display"], 958, 880, [341, null]],
-[343, ["setxy2", 0], 298, 652, [332, 334, 344, 333]],
-[344, ["number", 0], 356, 694, [343, null]],
-[345, "show", 316, 886, [349, 354, 372]],
-[346, ["string", "  prime"], 482, 970, [353, null]],
-[347, ["equal2", 0], 354, 786, [349, 351, 348, null]],
-[348, ["number", 1.0], 400, 828, [347, null]],
-[349, ["ifelse", [41, 0]],
-298, 820, [350, 347, 345, 371, 361]],
-[350, ["vspace", 0], 298, 778, [333, 349]],
-[351, "box", 400, 786, [347, 352, null]],
-[352, ["string", "count"], 454, 786, [351, null]],
-[353, ["plus2", 0], 428, 928, [354, 356, 346]],
-[354, ["plus2", 0], 374, 886, [345, 355, 353]],
-[355, ["string", "   "], 428, 886, [354, null]],
-[356, "box", 482, 928, [353, 357, null]],
-[357, ["string", "save n"], 536, 928, [356, null]],
-[358, ["setxy2", 0], 298, 1130, [361, 359, 360, 362]],
-[359, ["number", 0], 356, 1130, [358, null]],
-[360, ["number", 0], 356, 1172, [358, null]],
-[361, "penup", 298, 1088, [349, 358]],
-[362, "pendown", 298, 1214, [358, null]],
-[363, "sandwichclampcollapsed", 280, 534, [339, 335, null]],
-[364, ["plus2", 0], 374, 1028, [371, 365, 366]],
-[365, ["string", "   "], 428, 1028, [364, null]],
-[366, ["plus2", 0], 428, 1070, [364, 367, 370]],
-[367, "box", 482, 1070, [366, 368, null]],
-[368, ["string", "save n"], 536, 1070, [367, null]],
-[369, ["string", " = "], 536, 1112, [370, null]],
-[370, ["plus2", 0], 482, 1112, [366, 369, 375]],
-[371, "show", 316, 1028, [349, 364, null]],
-[372, ["vspace", 20], 316, 928, [345, null]],
-[373, ["storein", 0], 996, 684, [390, 374, 379, 395]],
-[374, ["string", "factor string"], 1063, 684, [373, null]],
-[375, "box", 536, 1154, [370, 376, null]],
-[376, ["string", "factor string"], 590, 1154, [375, null]],
-[377, "box", 1117, 870, [387, 378, null]],
-[378, ["string", "factor string"], 1171, 870, [377, null]],
-[379, ["plus2", 0], 1063, 726, [373, 380, 383]],
-[380, ["string", ""], 1117, 726, [379, null]],
-[381, ["string", " x "], 1171, 912, [382, null]],
-[382, ["plus2", 0], 1117, 912, [387, 381, 385]],
-[383, "box", 1117, 768, [379, 384, null]],
-[384, ["string", "factor"], 1171, 768, [383, null]],
-[385, "box", 1171, 954, [382, 386, null]],
-[386, ["string", "factor"], 1225, 954, [385, null]],
-[387, ["plus2", 0], 1063, 870, [388, 377, 382]],
-[388, ["storein", 0], 996, 828, [390, 389, 387, null]],
-[389, ["string", "factor string"], 1063, 828, [388, null]],
-[390, ["ifelse", [42, 21]], 978, 618, [90, 394, 373, 388, 396]],
-[391, "box", 1080, 584, [394, 392, null]],
-[392, ["string", "count"], 1134, 584, [391, null]],
-[393, ["number", 1.0], 1080, 626, [394, null]],
-[394, ["equal2", 0], 1034, 584, [390, 391, 393, null]],
-[395, ["vspace", 0], 996, 768, [373, null]],
-[396, ["vspace", 0], 978, 930, [390, 73]]]
+[[0, ["start", 2.0], 200, 180, [null, 361]],
+[1, ["while", 0], 258, 556, [4, 5, 11, 151]],
+[2, ["storein", 0], 254, 696, [261, 3, 268, 272]],
+[3, ["string", "n"], 321, 696, [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, [456, 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", 840, 340, [null, 116, 126]],
+[116, ["string", "increment color"], 898, 352, [115, null]],
+[117, "stack", 703, 812, [249, 118, 399]],
+[118, ["string", "increment color"], 761, 812, [117, null]],
+[119, "setcolor", 858, 428, [126, 125, null]],
+[120, ["number", 100], 1043, 470, [122, null]],
+[121, "color", 989, 428, [125, null]],
+[122, ["division2", 0], 989, 470, [125, 120, 123]],
+[123, "box", 1067, 512, [122, 124, null]],
+[124, ["string", "number"], 1121, 512, [123, null]],
+[125, ["plus2", 0], 935, 428, [119, 121, 122]],
+[126, "sandwichclampcollapsed", 840, 394, [115, 119, null]],
+[127, ["until", 62], 463, 710, [136, 132, 454, null]],
+[128, ["storein", 20], 481, 818, [454, 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, 1228, [407, 138, 296]],
+[138, ["string", "draw cluster"], 316, 1228, [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, 446, 448, 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", 343, 550, [241, 211, 245]],
+[211, ["string", "inner loop"], 401, 550, [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, [450, 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", 343, 508, [360, 242, 210]],
+[242, ["string", "save level"], 401, 508, [241, null]],
+[243, "hat", 320, 580, [null, 244, 253]],
+[244, ["string", "restore level"], 378, 592, [243, null]],
+[245, "stack", 343, 592, [210, 246, 355]],
+[246, ["string", "restore level"], 401, 592, [245, null]],
+[247, "comment", 258, 1354, [459, 248, null]],
+[248, ["string", "done"], 341, 1354, [247, null]],
+[249, "back", 703, 770, [108, 250, 117]],
+[250, ["number", 1], 761, 770, [249, null]],
+[251, "setpensize", 258, 1102, [397, 396, 293]],
+[252, ["division2", 0], 325, 1018, [390, 283, 281]],
+[253, "sandwichclampcollapsed", 320, 634, [243, 372, null]],
+[254, "sandwichclampcollapsed", 180, 574, [239, 204, null]],
+[255, ["while", 229], 236, 504, [265, 259, 261, null]],
+[256, ["storein", 0], 236, 378, [285, 257, 258, 265]],
+[257, ["string", "number"], 303, 378, [256, null]],
+[258, ["number", 2], 303, 420, [256, null]],
+[259, ["less2", 0], 292, 470, [255, 266, 260, null]],
+[260, ["number", 101], 362, 512, [259, null]],
+[261, "fillscreen2", 254, 570, [255, 262, 264, 263, 2]],
+[262, ["number", 60], 335, 570, [261, null]],
+[263, ["number", 100], 335, 654, [261, null]],
+[264, "black", 335, 612, [261, null]],
+[265, ["vspace", 0], 236, 462, [256, 255]],
+[266, "box", 338, 470, [259, 267, null]],
+[267, ["string", "number"], 392, 470, [266, null]],
+[268, "box", 321, 738, [2, 269, null]],
+[269, ["string", "number"], 375, 738, [268, null]],
+[270, "hat", 240, 300, [null, 271, 286]],
+[271, ["string", "main loop"], 298, 312, [270, null]],
+[272, "stack", 254, 780, [2, 273, 274]],
+[273, ["string", "main loop"], 312, 780, [272, null]],
+[274, "wait", 254, 822, [272, 463, 419]],
+[275, ["storein", 0], 254, 986, [419, 276, 280, null]],
+[276, ["string", "number"], 321, 986, [275, null]],
+[277, ["number", 1], 375, 1070, [280, null]],
+[278, "box", 375, 1028, [280, 279, null]],
+[279, ["string", "number"], 429, 1028, [278, null]],
+[280, ["plus2", 0], 321, 1028, [275, 278, 277]],
+[281, "box", 403, 1060, [252, 282, null]],
+[282, ["string", "number"], 457, 1060, [281, null]],
+[283, "box", 379, 1018, [252, 284, null]],
+[284, ["string", "radius"], 433, 1018, [283, null]],
+[285, ["forever", 334], 218, 344, [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, 1144, [293, null]],
+[293, "setcolor", 258, 1144, [251, 292, 407]],
+[294, "hat", 660, 180, [null, 295, 318]],
+[295, ["string", "display factors"], 718, 192, [294, null]],
+[296, "stack", 258, 1270, [137, 297, 459]],
+[297, ["string", "display factors"], 316, 1270, [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], 798, 870, [316, 314, 315, 317]],
+[314, ["number", 0], 856, 870, [313, null]],
+[315, ["number", 0], 856, 912, [313, null]],
+[316, "penup", 798, 828, [440, 313]],
+[317, "pendown", 798, 954, [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", 343, 424, [215, 358, 360]],
+[353, ["number", 90], 455, 466, [358, null]],
+[354, "heading", 455, 424, [358, null]],
+[355, "seth", 343, 634, [245, 359, null]],
+[356, ["number", 90], 479, 676, [359, null]],
+[357, "heading", 455, 634, [359, null]],
+[358, ["plus2", 0], 401, 424, [352, 354, 353]],
+[359, ["minus2", 0], 401, 634, [355, 357, 356]],
+[360, ["vspace", 0], 343, 466, [352, 241]],
+[361, "sandwichclampcollapsed", 200, 226, [0, 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", 218, 302, [409, 382, 285]],
+[382, ["number", 75], 295, 302, [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, 252, 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, 1102, [251, null]],
+[397, ["vspace", 0], 258, 1060, [390, 251]],
+[398, "setpensize", 703, 644, [451, 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, 1186, [293, 408, 137]],
+[408, ["number", 0], 331, 1186, [407, null]],
+[409, "clean", 218, 260, [361, 381]],
+[410, "mousey", 686, 906, [414, null]],
+[411, "height", 740, 948, [412, null]],
+[412, ["division2", 0], 686, 948, [414, 411, 413]],
+[413, ["number", 2], 764, 990, [412, null]],
+[414, ["plus2", 0], 632, 906, [464, 410, 412]],
+[415, ["division2", 0], 444, 906, [417, 464, 416]],
+[416, "height", 522, 948, [415, null]],
+[417, ["product2", 0], 390, 864, [463, 418, 415]],
+[418, ["number", 10], 444, 864, [417, null]],
+[419, ["vspace", 40], 254, 864, [274, 275]],
+[420, "toppos", 910, 452, [430, null]],
+[421, "bottompos", 910, 702, [441, null]],
+[422, "rightpos", 910, 370, [429, null]],
+[423, ["string", "fast"], 856, 536, [424, null]],
+[424, "show", 798, 536, [432, 423, 433]],
+[425, ["string", "slow"], 856, 786, [440, null]],
+[426, ["setxy2", 20], 798, 370, [431, 429, 430, 432]],
+[427, ["number", 200], 934, 412, [429, null]],
+[428, ["number", 100], 934, 494, [430, null]],
+[429, ["minus2", 0], 856, 370, [426, 422, 427]],
+[430, ["minus2", 0], 856, 452, [426, 420, 428]],
+[431, "penup", 798, 328, [461, 426]],
+[432, "pendown", 798, 494, [426, 424]],
+[433, "penup", 798, 578, [424, 434]],
+[434, ["setxy2", 20], 798, 620, [433, 435, 441, 439]],
+[435, ["minus2", 0], 856, 620, [434, 436, 437]],
+[436, "rightpos", 910, 620, [435, null]],
+[437, ["number", 200], 934, 662, [435, null]],
+[438, ["number", 100], 910, 744, [441, null]],
+[439, "pendown", 798, 744, [434, 440]],
+[440, "show", 798, 786, [439, 425, 316]],
+[441, ["plus2", 0], 856, 702, [434, 421, 438]],
+[442, "hat", 720, 580, [null, 443, 451]],
+[443, ["string", "draw point"], 778, 592, [442, null]],
+[444, "hat", 940, 580, [null, 445, 450]],
+[445, ["string", "recurse"], 998, 592, [444, null]],
+[446, "stack", 601, 838, [157, 447, null]],
+[447, ["string", "draw point"], 659, 838, [446, null]],
+[448, "stack", 601, 898, [157, 449, null]],
+[449, ["string", "recurse"], 659, 898, [448, null]],
+[450, "sandwichclampcollapsed", 940, 634, [444, 220, null]],
+[451, "sandwichclampcollapsed", 720, 634, [442, 398, null]],
+[452, "hat", 600, 500, [null, 453, 456]],
+[453, ["string", "radiate"], 658, 512, [452, null]],
+[454, "stack", 481, 776, [127, 455, 128]],
+[455, ["string", "radiate"], 539, 776, [454, null]],
+[456, "sandwichclampcollapsed", 600, 554, [452, 104, null]],
+[457, "hat", 780, 240, [null, 458, 461]],
+[458, ["string", "display scale"], 838, 252, [457, null]],
+[459, "stack", 258, 1312, [296, 460, 247]],
+[460, ["string", "display scale"], 316, 1312, [459, null]],
+[461, "sandwichclampcollapsed", 780, 294, [457, 431, null]],
+[462, ["number", 10.0], 366, 822, [463, null]],
+[463, ["minus2", 0], 312, 822, [274, 462, 417]],
+[464, ["identity2", 40], 498, 906, [415, 414]]]
--
cgit v0.9.1