[[0,["start",{"collapsed":false,"xcor":-1.0231815394945443e-12,"ycor":-5.684341886080802e-14,"heading":0,"color":110.00000000000006,"shade":50,"pensize":2,"grey":0}],110,94,[null,154,null]],[1,["storein",{}],375.5,625.5,[36,2,15,161]],[2,["text",{"value":"max"}],453.189453125,625.5,[1]],[3,["storein",{}],348.5,121.5,[5,4,157,9]],[4,["text",{"value":"nn"}],426.189453125,121.5,[3]],[5,["action",{"collapsed":true}],335,81,[null,6,3,null]],[6,["text",{"value":"next prime factor"}],429.5,90,[5]],[7,["nameddo",{"value":"next prime factor"}],137,292,[38,37]],[8,["ifthenelse",{}],362,436.5,[26,24,35,28,null]],[9,["storein",{}],348.5,184.5,[3,10,11,12]],[10,["text",{"value":"factor"}],426.189453125,184.5,[9]],[11,["number",{"value":2}],426.189453125,216,[9]],[12,["storein",{}],348.5,247.5,[9,13,158,160]],[13,["text",{"value":"max"}],426.189453125,247.5,[12]],[14,["namedbox",{"value":"nn"}],511.689453125,279,[158]],[15,["plus",{}],453.189453125,657,[1,162,16]],[16,["number",{"value":1}],538.689453125,688.5,[15]],[17,["while",{}],348.5,342,[160,18,26,null]],[18,["less",{}],390.5,342,[17,19,20]],[19,["namedbox",{"value":"factor"}],455,342,[18]],[20,["namedbox",{"value":"max"}],455,373.5,[18]],[21,["mod",{}],468.5,405,[24,22,23]],[22,["namedbox",{"value":"nn"}],554,405,[21]],[23,["namedbox",{"value":"factor"}],554,436.5,[21]],[24,["equal",{}],404,405,[8,21,25]],[25,["number",{"value":0}],468.5,468,[24]],[26,["vspace",{}],362,405,[17,8]],[27,["namedbox",{"value":"factor"}],458.2138671875,751.5,[28]],[28,["incrementOne",{}],375.5,751.5,[8,27,null]],[29,["namedbox",{"value":"factor"}],449,499.5,[35]],[30,["storein",{}],375.5,531,[35,31,33,36]],[31,["text",{"value":"nn"}],453.189453125,531,[30]],[32,["namedbox",{"value":"nn"}],538.689453125,562.5,[33]],[33,["divide",{}],453.189453125,562.5,[30,32,34]],[34,["namedbox",{"value":"factor"}],538.689453125,594,[33]],[35,["push",{}],375.5,499.5,[8,29,30]],[36,["vspace",{}],375.5,594,[30,1]],[37,["showHeap",{}],137,323.5,[7,163]],[38,["emptyHeap",{}],137,260.5,[169,7]],[39,["storein",{}],828.5,141.5,[44,40,164,41]],[40,["text",{"value":"level"}],906.189453125,141.5,[39]],[41,["storein",{}],828.5,204.5,[39,42,43,59]],[42,["text",{"value":"radius"}],906.189453125,204.5,[41]],[43,["number",{"value":300}],906.189453125,236,[41]],[44,["action",{"collapsed":true}],815,101,[null,45,39,null]],[45,["text",{"value":"display"}],909.5,110,[44]],[46,["setpensize",{}],479.5,285,[109,47,134]],[47,["number",{"value":2}],588.04638671875,285,[46]],[48,["action",{"collapsed":true}],970,198,[null,49,60,null]],[49,["text",{"value":"save level"}],1064.5,207,[48]],[50,["action",{"collapsed":true}],982,418,[null,51,87,null]],[51,["text",{"value":"inner loop"}],1076.5,427,[50]],[52,["action",{"collapsed":true}],988,346,[null,53,76,null]],[53,["text",{"value":"restore level"}],1082.5,355,[52]],[54,["nameddo",{"value":"restore level"}],724.5,228.5,[55,null]],[55,["nameddo",{"value":"inner loop"}],724.5,197,[56,54]],[56,["nameddo",{"value":"save level"}],724.5,165.5,[57,55]],[57,["action",{"collapsed":true}],711,125,[null,58,56,null]],[58,["text",{"value":"draw cluster"}],805.5,134,[57]],[59,["nameddo",{"value":"draw cluster"}],828.5,267.5,[41,null]],[60,["storein",{}],983.5,238.5,[48,62,64,65]],[61,["text",{"value":"heading"}],1146.689453125,238.5,[62]],[62,["plus",{}],1061.189453125,238.5,[60,61,63]],[63,["namedbox",{"value":"level"}],1146.689453125,270,[62]],[64,["heading",{}],1061.189453125,301.5,[60]],[65,["storein",{}],983.5,333,[60,69,67,70]],[66,["text",{"value":"radius"}],1146.689453125,333,[69]],[67,["namedbox",{"value":"radius"}],1061.189453125,396,[65]],[68,["namedbox",{"value":"level"}],1146.689453125,364.5,[69]],[69,["plus",{}],1061.189453125,333,[65,66,68]],[70,["storein",{}],983.5,427.5,[65,71,72,74]],[71,["text",{"value":"radius"}],1061.189453125,427.5,[70]],[72,["divide",{}],1061.189453125,459,[70,75,73]],[73,["number",{"value":2}],1146.689453125,490.5,[72]],[74,["vspace",{}],983.5,490.5,[70,null]],[75,["namedbox",{"value":"radius"}],1146.689453125,459,[72]],[76,["setheading",{}],1001.5,386.5,[52,77,81]],[77,["box",{}],1107.5634765625,386.5,[76,80]],[78,["text",{"value":"heading"}],1293.5634765625,386.5,[80]],[79,["namedbox",{"value":"level"}],1293.5634765625,418,[80]],[80,["plus",{}],1208.0634765625,386.5,[77,78,79]],[81,["storein",{}],1001.5,418,[76,82,83,null]],[82,["text",{"value":"radius"}],1079.189453125,418,[81]],[83,["box",{}],1079.189453125,449.5,[81,86]],[84,["text",{"value":"radius"}],1265.189453125,449.5,[86]],[85,["namedbox",{"value":"level"}],1265.189453125,481,[86]],[86,["plus",{}],1179.689453125,449.5,[83,84,85]],[87,["storein",{}],995.5,458.5,[50,91,89,94]],[88,["text",{"value":"box"}],1158.689453125,458.5,[91]],[89,["number",{"value":0}],1073.189453125,521.5,[87]],[90,["namedbox",{"value":"level"}],1158.689453125,490,[91]],[91,["plus",{}],1073.189453125,458.5,[87,88,90]],[92,["indexHeap",{}],1067.5,553,[94,93]],[93,["namedbox",{"value":"level"}],1181.39599609375,553,[92]],[94,["repeat",{}],995.5,553,[87,92,97,null]],[95,["action",{"collapsed":true}],466,150,[null,96,103,null]],[96,["text",{"value":"radiate"}],560.5,159,[95]],[97,["nameddo",{"value":"radiate"}],1009,584.5,[94,null]],[98,["forward",{}],479.5,348,[134,102,110]],[99,["back",{}],479.5,1009.5,[136,101,null]],[100,["number",{"value":1}],586,411,[112]],[101,["namedbox",{"value":"radius"}],553,1009.5,[99]],[102,["namedbox",{"value":"radius"}],558.01708984375,348,[98]],[103,["increment",{}],479.5,190.5,[95,104,107,109]],[104,["heading",{}],553,190.5,[103]],[105,["indexHeap",{}],638.5,253.5,[107,106]],[106,["namedbox",{"value":"level"}],752.39599609375,253.5,[105]],[107,["divide",{}],553,222,[103,108,105]],[108,["number",{"value":360}],638.5,222,[107]],[109,["vspace",{}],479.5,253.5,[103,46]],[110,["ifthenelse",{}],479.5,379.5,[98,112,132,131,123]],[111,["namedbox",{"value":"level"}],586,379.5,[112]],[112,["equal",{}],521.5,379.5,[110,111,100]],[113,["action",{"collapsed":true}],844,421,[null,114,119,null]],[114,["text",{"value":"recurse"}],938.5,430,[113]],[115,["nameddo",{"value":"draw cluster"}],857.5,524.5,[119,117]],[116,["nameddo",{"value":"recurse"}],493,789,[148,138]],[117,["incrementOne",{}],857.5,556,[115,118,null]],[118,["namedbox",{"value":"level"}],940.2138671875,556,[117]],[119,["increment",{}],857.5,461.5,[113,120,121,115]],[120,["namedbox",{"value":"level"}],931,461.5,[119]],[121,["number",{"value":-1}],931,493,[119]],[122,["setpensize",{}],493,474,[132,177,170]],[123,["setpensize",{}],479.5,946.5,[110,124,136]],[124,["number",{"value":2}],588.04638671875,946.5,[123]],[125,["forward",{}],493,600,[174,126,127]],[126,["number",{"value":1}],571.51708984375,600,[125]],[127,["back",{}],493,631.5,[125,128,null]],[128,["number",{"value":1}],566.5,631.5,[127]],[129,["color",{}],566.5,505.5,[170]],[130,["heading",{}],566.5,694.5,[131]],[131,["increment",{}],493,694.5,[110,130,144,148]],[132,["setgrey",{}],493,442.5,[110,133,122]],[133,["number",{"value":100}],574.85693359375,442.5,[132]],[134,["setgrey",{}],479.5,316.5,[46,135,98]],[135,["number",{"value":0}],561.35693359375,316.5,[134]],[136,["setgrey",{}],479.5,978,[123,137,99]],[137,["number",{"value":0}],561.35693359375,978,[136]],[138,["increment",{}],493,820.5,[116,139,142,149]],[139,["heading",{}],566.5,820.5,[138]],[140,["indexHeap",{}],652,883.5,[142,152]],[141,["namedbox",{"value":"level"}],851.39599609375,883.5,[152]],[142,["divide",{}],566.5,852,[138,143,140]],[143,["number",{"value":-240}],652,852,[142]],[144,["divide",{}],566.5,726,[131,145,146]],[145,["number",{"value":240}],652,726,[144]],[146,["indexHeap",{}],652,757.5,[144,150]],[147,["namedbox",{"value":"level"}],851.39599609375,757.5,[150]],[148,["vspace",{}],493,757.5,[131,116]],[149,["vspace",{}],493,883.5,[138,null]],[150,["minus",{}],765.89599609375,757.5,[146,147,151]],[151,["number",{"value":1}],851.39599609375,789,[150]],[152,["minus",{}],765.89599609375,883.5,[140,141,153]],[153,["number",{"value":1}],851.39599609375,915,[152]],[154,["storein",{}],123.5,134.5,[0,155,156,165]],[155,["text",{"value":"box"}],201.189453125,134.5,[154]],[156,["number",{"value":2}],201.189453125,166,[154]],[157,["namedbox",{"value":"box"}],426.189453125,153,[3]],[158,["plus",{}],426.189453125,279,[12,14,159]],[159,["number",{"value":1}],511.689453125,310.5,[158]],[160,["vspace",{}],348.5,310.5,[12,17]],[161,["vspace",{}],375.5,688.5,[1,null]],[162,["namedbox",{"value":"nn"}],538.689453125,657,[15]],[163,["nameddo",{"value":"display"}],137,355,[37,175]],[164,["heapLength",{}],906.189453125,173,[39]],[165,["repeat",{}],123.5,197.5,[154,166,169,null]],[166,["number",{"value":98}],195.5,197.5,[165]],[167,["incrementOne",{}],137,418,[175,168,null]],[168,["namedbox",{"value":"box"}],219.7138671875,418,[167]],[169,["clear",{}],137,229,[165,38]],[170,["increment",{}],493,505.5,[122,129,172,174]],[171,["namedbox",{"value":"box"}],652,568.5,[172]],[172,["divide",{}],566.5,537,[170,173,171]],[173,["number",{"value":100}],652,537,[172]],[174,["vspace",{}],493,568.5,[170,125]],[175,["wait",{}],137,386.5,[163,176,167]],[176,["number",{"value":2}],210.5,386.5,[175]],[177,["number",{"value":30}],601.54638671875,474,[122]]]