hartman emma chrysler building final.mw

Emma Hartman 

Chrysler Building 

 

with(plots); -1 

with(plottools); -1 

`assign`(j, 30) 

30 (1)
 

`assign`(rot, proc (x, y, theta, a, b) options operator, arrow; op([`+`(`*`(cos(theta), `*`(`+`(x, `-`(a)))), `-`(`*`(sin(theta), `*`(`+`(y, `-`(b))))), a), `+`(`*`(sin(theta), `*`(`+`(x, `-`(a)))), `...
`assign`(rot, proc (x, y, theta, a, b) options operator, arrow; op([`+`(`*`(cos(theta), `*`(`+`(x, `-`(a)))), `-`(`*`(sin(theta), `*`(`+`(y, `-`(b))))), a), `+`(`*`(sin(theta), `*`(`+`(x, `-`(a)))), `...
 

proc (x, y, theta, a, b) options operator, arrow; op([`+`(`*`(cos(theta), `*`(`+`(x, `-`(a)))), `-`(`*`(sin(theta), `*`(`+`(y, `-`(b))))), a), `+`(`*`(sin(theta), `*`(`+`(x, `-`(a)))), `*`(cos(theta),... (2)
 

`assign`(scaleit, proc (x, y, s, a, b) options operator, arrow; op([`+`(`*`(s, `*`(`+`(x, `-`(a)))), a), `+`(`*`(s, `*`(`+`(y, `-`(b)))), b)]) end proc) 

proc (x, y, s, a, b) options operator, arrow; op([`+`(`*`(s, `*`(`+`(x, `-`(a)))), a), `+`(`*`(s, `*`(`+`(y, `-`(b)))), b)]) end proc (3)
 

`assign`(shift, proc (x, y, a, b) options operator, arrow; op([`+`(x, a), `+`(y, b)]) end proc) 

proc (x, y, a, b) options operator, arrow; op([`+`(x, a), `+`(y, b)]) end proc (4)
 

`assign`(prop, proc (x, y) options operator, arrow; op([`+`(`*`(8, `*`(x)), 13.5), `+`(`*`(8, `*`(y)), 97)]) end proc) 

proc (x, y) options operator, arrow; op([`+`(`*`(8, `*`(x)), 13.5), `+`(`*`(8, `*`(y)), 97)]) end proc (5)
 

 

`assign`(p1, plot([prop(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t))), t = 0 .. cos(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12)))], color = gray)) 

PLOT(CURVES([[13.5000000000000, 97.], [13.5108861464969, 96.9593723481748], [13.5203581243560, 96.9240224455566], [13.5310103541018, 96.8842677829315], [13.5417331937409, 96.8442496005969], [13.552405... (6)
 

`assign`(p2, plot([prop(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t))), t = cos(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))) .. 0], color = black)) 

PLOT(CURVES([[11.4294476392000, 89.2725933897627], [11.4403337856969, 89.3132210415879], [11.4498057635560, 89.3485709442061], [11.4604579933018, 89.3883256068312], [11.4711808329409, 89.4283437891658... (7)
 

`assign`(p3, plot([prop(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 8), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))))))), .8...
`assign`(p3, plot([prop(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 8), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))))))), .8...
 

PLOT(CURVES([[7.58611593564435, 94.1864585837910], [7.60659994939301, 94.1597632973361], [7.62442298022829, 94.1365358713306], [7.64446684245516, 94.1104142015068], [7.66464356841183, 94.0841193802993... (8)
 

`assign`(p4, plot([prop(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 8), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))))))), .8...
`assign`(p4, plot([prop(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 8), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))))))), .8...
 

PLOT(CURVES([[8.42148356584454, 87.8412114710604], [8.41709153279417, 87.8745722741660], [8.41327004832112, 87.9035993305689], [8.40897238935459, 87.9362432913390], [8.40464624271472, 87.9691036374711... (9)
 

`assign`(p5, plot([prop(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 8), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))))))...
`assign`(p5, plot([prop(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 8), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))))))...
 

PLOT(CURVES([[19.4138840643557, 94.1864585837910], [19.4094920313053, 94.1530977806854], [19.4056705468322, 94.1240707242825], [19.4013728878657, 94.0914267635124], [19.3970467412258, 94.0585664173803... (10)
 

`assign`(p6, plot([prop(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 8), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))))))...
`assign`(p6, plot([prop(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 8), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))))))...
 

PLOT(CURVES([[15.5178109187378, 89.1089972059765], [15.5382949324864, 89.1356924924314], [15.5561179633217, 89.1589199184369], [15.5761618255486, 89.1850415882607], [15.5963385515053, 89.2113364094683... (11)
 

`assign`(p7, plot([prop(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 5), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))))))), .6...
`assign`(p7, plot([prop(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 5), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))))))), .6...
 

PLOT(CURVES([[5.15236705388842, 91.0222435413414], [5.17197950114685, 91.0063616946996], [5.18904418663922, 90.9925429848564], [5.20823521021513, 90.9770024003840], [5.22755344435266, 90.9613588028299... (12)
 

`assign`(p8, plot([prop(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 5), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))))))), .6...
`assign`(p8, plot([prop(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 5), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))))))), .6...
 

PLOT(CURVES([[6.87253321168911, 86.5410574941985], [6.86348925745380, 86.5646178004785], [6.85562016123142, 86.5851174969964], [6.84677053952628, 86.6081715497271], [6.83786225678397, 86.6313784196843... (13)
 

`assign`(p9, plot([prop(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 5), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))))))...
`assign`(p9, plot([prop(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 5), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))))))...
 

PLOT(CURVES([[21.8476329461116, 91.0222435413414], [21.8385889918763, 90.9986832350614], [21.8307198956539, 90.9781835385435], [21.8218702739488, 90.9551294858127], [21.8129619912064, 90.9319226158555... (14)
 

`assign`(p10, plot([prop(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 5), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12)))))...
`assign`(p10, plot([prop(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 5), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12)))))...
 

PLOT(CURVES([[18.1173323311545, 88.0015056643316], [18.1369447784129, 88.0173875109734], [18.1540094639053, 88.0312062208166], [18.1732004874812, 88.0467468052890], [18.1925187216187, 88.0623904028431... (15)
 

 

`assign`(p11, plot([prop(`+`(`*`(1.125, `*`(cos(t)))), `+`(`*`(1.125, `*`(sin(t))), `*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))))))), t = 0 .. Pi], color = black)) 

PLOT(CURVES([[22.5000000000000, 80.5792609530858], [22.4987723394530, 80.7279094737521], [22.4957068029830, 80.8572161918648], [22.4900396831762, 81.0025652111768], [22.4819632637964, 81.1487659379729... (16)
 

`assign`(p12, plot([prop(-1.125, `+`(t, `*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))))))), t = -2.625 .. 0])) 

PLOT(CURVES([[4.50000000000000, 59.5792609530858], [4.50000000000000, 59.6896706586135], [4.50000000000000, 59.7857375530356], [4.50000000000000, 59.8937748231361], [4.50000000000000, 60.0025282343924... (17)
 

`assign`(p13, plot([prop(1.125, `+`(t, `*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))))))), t = -2.625 .. 0])) 

PLOT(CURVES([[22.5000000000000, 59.5792609530858], [22.5000000000000, 59.6896706586135], [22.5000000000000, 59.7857375530356], [22.5000000000000, 59.8937748231361], [22.5000000000000, 60.0025282343924... (18)
 

`assign`(p14, plot([prop(shift(`+`(`*`(1.0625, `*`(cos(t)))), `+`(`*`(1.0625, `*`(sin(t))), `*`(2, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12)))))), 0, 1.0625)), t = 0 .. Pi], color = black)) 

PLOT(CURVES([[22., 90.0451867793749], [21.9988405428167, 90.1855770488930], [21.9959453139284, 90.3077000604439], [21.9905930341108, 90.4449741342386], [21.9829653046966, 90.5830525984349], [21.973144... (19)
 

 

`assign`(p15, plot([prop(-1.0625, `+`(t, `-`(`/`(7, 8)))), t = -.8125 .. 0])) 

PLOT(CURVES([[5., 83.5000000000000], [5., 83.5341744326633], [5., 83.5639094237940], [5., 83.5973495312060], [5., 83.6310113013568], [5., 83.6645130829900], [5., 83.6955735230904], [5., 83.72773480972... (20)
 

`assign`(p16, plot([prop(1.0625, `+`(t, `-`(`/`(7, 8)))), t = -.8125 .. 0])) 

PLOT(CURVES([[22., 83.5000000000000], [22., 83.5341744326633], [22., 83.5639094237940], [22., 83.5973495312060], [22., 83.6310113013568], [22., 83.6645130829900], [22., 83.6955735230904], [22., 83.727... (21)
 

 

`assign`(p17, plot([prop(scaleit(shift(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), 0, 1.1625), `/`(7, 9), 0, .16534)), t = 0 .. cos(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12)))], color = g...
`assign`(p17, plot([prop(scaleit(shift(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), 0, 1.1625), `/`(7, 9), 0, .16534)), t = 0 .. cos(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12)))], color = g...
 

PLOT(CURVES([[13.5000000000000, 104.527271100000], [13.5084670028309, 104.495671815247], [13.5158340967213, 104.468177446544], [13.5241191643014, 104.437257153391], [13.5324591506874, 104.406131900464... (22)
 

 

`assign`(p18, plot([prop(scaleit(shift(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), 0, 1.1625), `/`(7, 9), 0, .16534)), t = cos(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))) .. 0], color = b...
`assign`(p18, plot([prop(scaleit(shift(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), 0, 1.1625), `/`(7, 9), 0, .16534)), t = cos(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))) .. 0], color = b...
 

PLOT(CURVES([[11.8895703860444, 98.5170659587043], [11.8980373888754, 98.5486652434572], [11.9054044827658, 98.5761596121603], [11.9136895503458, 98.6070799053131], [11.9220295367318, 98.6382051582401... (23)
 

`assign`(p19, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 8), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1...
`assign`(p19, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 8), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1...
 

PLOT(CURVES([[8.25311378552768, 101.550739510100], [8.26705429488263, 101.532571884598], [8.27918385753287, 101.516764330791], [8.29282481932442, 101.498987083274], [8.30655620226540, 101.481091996621... (24)
 

`assign`(p20, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 8), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1...
`assign`(p20, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 8), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1...
 

PLOT(CURVES([[8.82162786711918, 97.2324463367089], [8.81863884462696, 97.2551502165973], [8.81603811213868, 97.2749047410912], [8.81311331645350, 97.2971207699458], [8.81016913332396, 97.3194840610606... (25)
 

`assign`(p21, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 8), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), ...
`assign`(p21, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 8), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), ...
 

PLOT(CURVES([[18.7468862144723, 101.550739510100], [18.7438971919801, 101.528035630211], [18.7412964594918, 101.508281105717], [18.7383716638066, 101.486065076863], [18.7354274806771, 101.463701785748... (26)
 

`assign`(p22, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 8), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), ...
`assign`(p22, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 8), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), ...
 

PLOT(CURVES([[16.0953919907095, 98.0952449617501], [16.1093325000644, 98.1134125872518], [16.1214620627147, 98.1292201410591], [16.1351030245062, 98.1469973885758], [16.1488344074472, 98.1648924752286... (27)
 

`assign`(p23, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 5), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1...
`assign`(p23, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 5), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1...
 

PLOT(CURVES([[6.02722012820988, 98.8287527174589], [6.03993189958063, 98.8184589279692], [6.05099234388085, 98.8095023567749], [6.06343097027220, 98.7994297557283], [6.07595204795348, 98.7892903869436... (28)
 

`assign`(p24, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 5), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1...
`assign`(p24, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 5), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1...
 

PLOT(CURVES([[7.14214263785569, 95.9242802795996], [7.13628081566635, 95.9395508484843], [7.13118047552240, 95.9528376888195], [7.12544460960260, 95.9677801304037], [7.11967072264020, 95.9828216201902... (29)
 

`assign`(p25, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 5), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), ...
`assign`(p25, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 5), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), ...
 

PLOT(CURVES([[20.9727798767901, 98.8287527174589], [20.9669180546008, 98.8134821485743], [20.9618177144568, 98.8001953082391], [20.9560818485370, 98.7852528666548], [20.9503079615746, 98.7702113768683... (30)
 

`assign`(p26, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 5), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), ...
`assign`(p26, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 5), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), ...
 

PLOT(CURVES([[18.5549924412561, 96.8708670565040], [18.5677042126269, 96.8811608459936], [18.5787646569271, 96.8901174171880], [18.5912032833184, 96.9001900182346], [18.6037243609997, 96.9103293870193... (31)
 

`assign`(p27, plot([prop(shift(cos(t), `+`(sin(t), `*`(2, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12)))))), 0, 1.875)), t = 0 .. Pi], color = black)) 

PLOT(CURVES([[21.5000000000000, 96.5451867793749], [21.4989087461804, 96.6773187977449], [21.4961838248738, 96.7922581027340], [21.4911463850455, 96.9214572310113], [21.4839673455968, 97.0514134326079... (32)
 

`assign`(p28, plot([prop(scaleit(shift(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), 0, 2.5), `/`(5, 9), 0, .16534)), t = 0 .. cos(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12)))], color = gray... 

PLOT(CURVES([[13.5000000000000, 108.698986700000], [13.5060478591650, 108.676415782319], [13.5113100690867, 108.656776947531], [13.5172279745010, 108.634691023851], [13.5231851076338, 108.612458700332... (33)
 

 

`assign`(p29, plot([prop(scaleit(shift(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), 0, 2.5), `/`(5, 9), 0, .16534)), t = cos(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))) .. 0], color = blac... 

PLOT(CURVES([[12.3496931328889, 104.405983027646], [12.3557409920538, 104.428553945327], [12.3610032019756, 104.448192780115], [12.3669211073899, 104.470278703795], [12.3728782405227, 104.492511027314... (34)
 

`assign`(p30, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 8), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1...
`assign`(p30, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 8), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1...
 

PLOT(CURVES([[8.66041460658106, 106.550147248267], [8.67037211326408, 106.537170372908], [8.67903608658647, 106.525879263044], [8.68877963072419, 106.513181229103], [8.69858776139722, 106.500399024349... (35)
 

`assign`(p31, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 8), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1...
`assign`(p31, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 8), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1...
 

PLOT(CURVES([[9.06649609346943, 103.465652124133], [9.06436107740335, 103.481869181198], [9.06250341134013, 103.495979555838], [9.06041427156481, 103.511848147878], [9.05831128361494, 103.527821927247... (36)
 

`assign`(p32, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 8), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), ...
`assign`(p32, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 8), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), ...
 

PLOT(CURVES([[18.3395853934189, 106.550147248267], [18.3374503773529, 106.533930191203], [18.3355927112896, 106.519819816563], [18.3335035715143, 106.503951224522], [18.3314005835645, 106.487977445153... (37)
 

`assign`(p33, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 8), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), ...
`assign`(p33, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 8), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), ...
 

PLOT(CURVES([[16.4456609477001, 104.081936856362], [16.4556184543831, 104.094913731722], [16.4642824277055, 104.106204841585], [16.4740259718433, 104.118902875527], [16.4838341025163, 104.131685080280... (38)
 

`assign`(p34, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 5), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1...
`assign`(p34, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 5), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1...
 

PLOT(CURVES([[6.28445882217941, 103.986569383800], [6.29353865887222, 103.979216677022], [6.30143897622901, 103.972819126169], [6.31032370936512, 103.965624411137], [6.31926733627974, 103.958382004862... (39)
 

`assign`(p35, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 5), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1...
`assign`(p35, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 5), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1...
 

PLOT(CURVES([[7.08083204330380, 101.911946214034], [7.07664502745454, 101.922853763236], [7.07300192735195, 101.932344363475], [7.06890488026664, 101.943017536035], [7.06478067529377, 101.953761457310... (40)
 

`assign`(p36, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 5), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), ...
`assign`(p36, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 5), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), ...
 

PLOT(CURVES([[20.7155411818206, 103.986569383800], [20.7113541659713, 103.975661834597], [20.7077110658687, 103.966171234359], [20.7036140187834, 103.955498061799], [20.6994898138106, 103.944754140524... (41)
 

`assign`(p37, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 5), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), ...
`assign`(p37, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 5), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), ...
 

PLOT(CURVES([[18.9885501565502, 102.588079626065], [18.9976299932430, 102.595432332843], [19.0055303105998, 102.601829883695], [19.0144150437359, 102.609024598728], [19.0233586706505, 102.616267005003... (42)
 

`assign`(p38, plot([prop(shift(`+`(`*`(.875, `*`(cos(t)))), `+`(`*`(.875, `*`(sin(t))), `*`(2, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12)))))), 0, 2.62)), t = 0 .. Pi], color = black)) 

PLOT(CURVES([[20.5000000000000, 102.505186779375], [20.4990451529079, 102.620802295449], [20.4966608467646, 102.721374187314], [20.4922530869148, 102.834423424557], [20.4859714273972, 102.948135100954... (43)
 

`assign`(p39, plot([prop(scaleit(shift(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), 0, 2.5), `*`(3, `/`(1, 9)), 0, 1.6)), t = 0 .. cos(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12)))], color =... 

PLOT(CURVES([[13.5000000000000, 112.200000000000], [13.5036287154990, 112.186457449392], [13.5067860414520, 112.174674148519], [13.5103367847006, 112.161422594311], [13.5139110645803, 112.148083200199... (44)
 

 

`assign`(p40, plot([prop(scaleit(shift(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), 0, 2.5), `*`(3, `/`(1, 9)), 0, 1.6)), t = cos(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))) .. 0], color =... 

PLOT(CURVES([[12.8098158797333, 109.624197796588], [12.8134445952323, 109.637740347196], [12.8166019211853, 109.649523648069], [12.8201526644339, 109.662775202277], [12.8237269443136, 109.676114596389... (45)
 

`assign`(p41, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 8), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1...
`assign`(p41, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 8), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1...
 

PLOT(CURVES([[9.77171542841993, 110.289554988402], [9.77768993242782, 110.281768863189], [9.78288831641959, 110.274994197273], [9.78873444290034, 110.267375376910], [9.79461932130226, 110.259706054061... (46)
 

`assign`(p42, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 8), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1...
`assign`(p42, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 8), `*`(Pi))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1...
 

PLOT(CURVES([[10.0153643204746, 108.438857914517], [10.0140833108354, 108.448588148752], [10.0129687111978, 108.457054373533], [10.0117152273330, 108.466575528755], [10.0104534345635, 108.476159796373... (47)
 

`assign`(p43, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 8), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), ...
`assign`(p43, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 8), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), ...
 

PLOT(CURVES([[17.2282845715801, 110.289554988402], [17.2270035619408, 110.279824754166], [17.2258889623033, 110.271358529385], [17.2246354784385, 110.261837374164], [17.2233736856690, 110.252253106546... (48)
 

`assign`(p44, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 8), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), ...
`assign`(p44, plot([prop(scaleit(shift(scaleit(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 8), `*`(Pi)))), 0, `+`(`*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), ...
 

PLOT(CURVES([[16.0919299045140, 108.808628753735], [16.0979044085219, 108.816414878948], [16.1031027925137, 108.823189544864], [16.1089489189944, 108.830808365227], [16.1148337973964, 108.838477688076... (49)
 

`assign`(p45, plot([prop(shift(`+`(`*`(.625, `*`(cos(t)))), `+`(`*`(.625, `*`(sin(t))), `*`(2, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12)))))), 0, 3.25)), t = 0 .. Pi], color = black)) 

PLOT(CURVES([[18.5000000000000, 107.545186779375], [18.4993179663628, 107.627769290856], [18.4976148905461, 107.699606356474], [18.4944664906534, 107.780355811648], [18.4899795909980, 107.861578437646... (50)
 

`assign`(p46, plot([prop(scaleit(shift(t, `+`(`*`(1.25, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)))), 0, 3.4), `/`(1, 3), 0, 1.92)), t = 0 .. `+`(`*`(1.25, `*`(cos(`*`(`+`(`*`(19, `*`(Pi...
`assign`(p46, plot([prop(scaleit(shift(t, `+`(`*`(1.25, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)))), 0, 3.4), `/`(1, 3), 0, 1.92)), t = 0 .. `+`(`*`(1.25, `*`(cos(`*`(`+`(`*`(19, `*`(Pi...
 

PLOT(CURVES([[13.5000000000000, 116.306666700000], [13.5045358943741, 116.285506464669], [13.5084825518157, 116.267095057050], [13.5129209808767, 116.246389503593], [13.5173888307267, 116.225546700288... (51)
 

 

`assign`(p47, plot([prop(scaleit(shift(t, `+`(`*`(1.25, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)))), 0, 3.4), `/`(1, 3), 0, 1.92)), t = `+`(`*`(1.25, `*`(cos(`*`(`+`(`*`(17, `*`(Pi))), ...
`assign`(p47, plot([prop(scaleit(shift(t, `+`(`*`(1.25, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)))), 0, 3.4), `/`(1, 3), 0, 1.92)), t = `+`(`*`(1.25, `*`(cos(`*`(`+`(`*`(17, `*`(Pi))), ...
 

PLOT(CURVES([[12.6372698496000, 112.281975756052], [12.6418057439741, 112.303135991384], [12.6457524014157, 112.321547399002], [12.6501908304767, 112.342252952459], [12.6546586803267, 112.363095755764... (52)
 

`assign`(p48, plot([prop(scaleit(rot(shift(t, `+`(`*`(1.25, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)))), 0, 3.4), `+`(`*`(`/`(1, 8), `*`(Pi))), 0, 1.318), `/`(1, 5), -.239, 1.865)), t =...
`assign`(p48, plot([prop(scaleit(rot(shift(t, `+`(`*`(1.25, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)))), 0, 3.4), `+`(`*`(`/`(1, 8), `*`(Pi))), 0, 1.318), `/`(1, 5), -.239, 1.865)), t =...
 

PLOT(CURVES([[10.6956049501054, 114.122427498702], [10.7029779249805, 114.111739280685], [10.7093931109963, 114.102439519339], [10.7166076586144, 114.091980965073], [10.7238700289372, 114.081453084720... (53)
 

`assign`(p49, plot([prop(scaleit(rot(shift(t, `+`(`*`(1.25, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)))), 0, 3.4), `+`(`*`(`/`(1, 8), `*`(Pi))), 0, 1.318), `/`(1, 5), -.239, 1.865)), t =...
`assign`(p49, plot([prop(scaleit(rot(shift(t, `+`(`*`(1.25, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)))), 0, 3.4), `+`(`*`(`/`(1, 8), `*`(Pi))), 0, 1.318), `/`(1, 5), -.239, 1.865)), t =...
 

PLOT(CURVES([[11.1414792398828, 111.693338225374], [11.1391350089763, 111.706109417344], [11.1370953061991, 111.717221563189], [11.1348014471003, 111.729718333376], [11.1324923828143, 111.742297940268... (54)
 

`assign`(p50, plot([prop(scaleit(rot(shift(t, `+`(`*`(1.25, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)))), 0, 3.4), `+`(`-`(`*`(`/`(1, 8), `*`(Pi)))), 0, 1.318), `/`(1, 5), .239, 1.865)),...
`assign`(p50, plot([prop(scaleit(rot(shift(t, `+`(`*`(1.25, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)))), 0, 3.4), `+`(`-`(`*`(`/`(1, 8), `*`(Pi)))), 0, 1.318), `/`(1, 5), .239, 1.865)),...
 

PLOT(CURVES([[16.3043950498946, 114.122427498702], [16.3020508189881, 114.109656306732], [16.3000111162109, 114.098544160886], [16.2977172571120, 114.086047390699], [16.2954081928261, 114.073467783808... (55)
 

`assign`(p51, plot([prop(scaleit(rot(shift(t, `+`(`*`(1.25, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)))), 0, 3.4), `+`(`-`(`*`(`/`(1, 8), `*`(Pi)))), 0, 1.318), `/`(1, 5), .239, 1.865)),...
`assign`(p51, plot([prop(scaleit(rot(shift(t, `+`(`*`(1.25, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)))), 0, 3.4), `+`(`-`(`*`(`/`(1, 8), `*`(Pi)))), 0, 1.318), `/`(1, 5), .239, 1.865)),...
 

PLOT(CURVES([[14.9020502864752, 112.089521267566], [14.9094232613504, 112.100209485582], [14.9158384473661, 112.109509246929], [14.9230529949842, 112.119967801194], [14.9303153653070, 112.130495681547... (56)
 

`assign`(p52, plot([prop(-.75, `+`(t, `-`(2.55375))), t = -2.125 .. 0])) 

PLOT(CURVES([[7.50000000000000, 59.5700000000000], [7.50000000000000, 59.6593792854271], [7.50000000000000, 59.7371477237688], [7.50000000000000, 59.8246064662311], [7.50000000000000, 59.9126449420100... (57)
 

`assign`(p53, plot([prop(.75, `+`(t, `-`(2.55375))), t = -2.125 .. 0])) 

PLOT(CURVES([[19.5000000000000, 59.5700000000000], [19.5000000000000, 59.6593792854271], [19.5000000000000, 59.7371477237688], [19.5000000000000, 59.8246064662311], [19.5000000000000, 59.9126449420100... (58)
 

 

`assign`(p54, plot([prop(`+`(`*`(.75, `*`(cos(t)))), `+`(`*`(.75, `*`(sin(t))), `*`(2.125, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))))), `-`(.5))), t = 0 .. Pi], color = black)) 

PLOT(CURVES([[19.5000000000000, 76.5792609530858], [19.4991815596353, 76.6783599668633], [19.4971378686554, 76.7645644456051], [19.4933597887841, 76.8614637918132], [19.4879755091976, 76.9589309430106... (59)
 

 

`assign`(p55, plot([prop(scaleit(shift(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 12), `*`(Pi)))), 0, `+`(`*`(1.75, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 1...
`assign`(p55, plot([prop(scaleit(shift(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 12), `*`(Pi)))), 0, `+`(`*`(1.75, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 1...
 

PLOT(CURVES([[16.6200000000000, 88.0878477185053], [16.6200000000000, 88.0541990463448], [16.6200000000000, 88.0249215166164], [16.6200000000000, 87.9919958723956], [16.6200000000000, 87.9588519756321... (60)
 

`assign`(p56, plot([prop(scaleit(shift(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 12), `*`(Pi)))), 0, `+`(`*`(1.75, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 1...
`assign`(p56, plot([prop(scaleit(shift(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 12), `*`(Pi)))), 0, `+`(`*`(1.75, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 1...
 

PLOT(CURVES([[13.4200000000312, 82.5452851343388], [13.4368243361114, 82.5744257392334], [13.4514631009756, 82.5997808237382], [13.4679259230860, 82.6282952680694], [13.4844978714677, 82.6569987246470... (61)
 

`assign`(p57, plot([prop(scaleit(shift(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 12), `*`(Pi))), 0, `+`(`*`(1.75, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))))...
`assign`(p57, plot([prop(scaleit(shift(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 12), `*`(Pi))), 0, `+`(`*`(1.75, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))))...
 

PLOT(CURVES([[10.3800000000000, 88.0878477185053], [10.3968243360802, 88.0587071136107], [10.4114631009444, 88.0333520291059], [10.4279259230548, 88.0048375847747], [10.4444978714366, 87.9761341281971... (62)
 

`assign`(p58, plot([prop(scaleit(shift(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 12), `*`(Pi))), 0, `+`(`*`(1.75, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))))...
`assign`(p58, plot([prop(scaleit(shift(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 12), `*`(Pi))), 0, `+`(`*`(1.75, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))))...
 

PLOT(CURVES([[10.3800000000000, 81.6878477185676], [10.3800000000000, 81.7214963907281], [10.3800000000000, 81.7507739204564], [10.3800000000000, 81.7836995646772], [10.3800000000000, 81.8168434614407... (63)
 

`assign`(p59, plot([prop(scaleit(shift(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 4), `*`(Pi)))), 0, `+`(`*`(1.75, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12...
`assign`(p59, plot([prop(scaleit(shift(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 4), `*`(Pi)))), 0, `+`(`*`(1.75, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12...
 

PLOT(CURVES([[21.4463244785438, 84.4270667536921], [21.4316031844735, 84.4015687244093], [21.4187942652174, 84.3793830254676], [21.4043892958708, 84.3544328866779], [21.3898888410368, 84.3293173621725... (64)
 

`assign`(p60, plot([prop(scaleit(shift(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 4), `*`(Pi)))), 0, `+`(`*`(1.75, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12...
`assign`(p60, plot([prop(scaleit(shift(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`/`(1, 4), `*`(Pi)))), 0, `+`(`*`(1.75, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12...
 

PLOT(CURVES([[16.5965822173981, 81.6270667537194], [16.6220802466809, 81.6417880477896], [16.6442659456226, 81.6545969670457], [16.6692160844124, 81.6690019363923], [16.6943316089178, 81.6835023912264... (65)
 

`assign`(p61, plot([prop(scaleit(shift(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 4), `*`(Pi))), 0, `+`(`*`(1.75, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12)))))...
`assign`(p61, plot([prop(scaleit(shift(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 4), `*`(Pi))), 0, `+`(`*`(1.75, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12)))))...
 

PLOT(CURVES([[5.55367552145625, 84.4270667536921], [5.57917355073901, 84.4123454596219], [5.60135924968072, 84.3995365403657], [5.62630938847050, 84.3851315710191], [5.65142491297589, 84.3706311161851... (66)
 

`assign`(p62, plot([prop(scaleit(shift(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 4), `*`(Pi))), 0, `+`(`*`(1.75, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12)))))...
`assign`(p62, plot([prop(scaleit(shift(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`*`(`/`(1, 4), `*`(Pi))), 0, `+`(`*`(1.75, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12)))))...
 

PLOT(CURVES([[8.35367552142898, 79.5773244925465], [8.33895422735877, 79.6028225218292], [8.32614530810261, 79.6250082207710], [8.31174033875602, 79.6499583595607], [8.29723988392199, 79.6750738840661... (67)
 

`assign`(p63, plot([prop(scaleit(shift(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`+`(`*`(5, `*`(Pi))), `/`(1, 12)))), 0, `+`(`*`(1.75, `*`(sin(`*`(`+`(`*`(17, `*`(Pi...
`assign`(p63, plot([prop(scaleit(shift(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`+`(`*`(5, `*`(Pi))), `/`(1, 12)))), 0, `+`(`*`(1.75, `*`(sin(`*`(`+`(`*`(17, `*`(Pi...
 

PLOT(CURVES([[22.6750889132455, 79.2928159108203], [22.6568760351864, 79.2823007007701], [22.6410291073709, 79.2731514727300], [22.6232075796639, 79.2628622089110], [22.6052679193029, 79.2525047411724... (68)
 

`assign`(p64, plot([prop(scaleit(shift(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`+`(`*`(5, `*`(Pi))), `/`(1, 12)))), 0, `+`(`*`(1.75, `*`(sin(`*`(`+`(`*`(17, `*`(Pi...
`assign`(p64, plot([prop(scaleit(shift(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `+`(`-`(`*`(`+`(`*`(5, `*`(Pi))), `/`(1, 12)))), 0, `+`(`*`(1.75, `*`(sin(`*`(`+`(`*`(17, `*`(Pi...
 

PLOT(CURVES([[18.6750889132845, 79.2928159108203], [18.6961193333848, 79.2928159108203], [18.7144177894650, 79.2928159108203], [18.7349963171030, 79.2928159108203], [18.7557112525802, 79.2928159108203... (69)
 

 

`assign`(p65, plot([prop(scaleit(shift(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `*`(`+`(`*`(5, `*`(Pi))), `/`(1, 12)), 0, `+`(`*`(1.75, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1...
`assign`(p65, plot([prop(scaleit(shift(rot(t, `*`(tan(`*`(`+`(`*`(19, `*`(Pi))), `/`(1, 12))), `*`(t)), `*`(`+`(`*`(5, `*`(Pi))), `/`(1, 12)), 0, `+`(`*`(1.75, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1...
 

PLOT(CURVES([[4.32491108675446, 79.2928159108203], [4.34594150685476, 79.2928159108203], [4.36423996293499, 79.2928159108203], [4.38481849057298, 79.2928159108203], [4.40553342605016, 79.2928159108203... (70)
 

`assign`(p66, plot([prop(scaleit(shift(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `*`(`+`(`*`(5, `*`(Pi))), `/`(1, 12)), 0, `+`(`*`(1.75, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1...
`assign`(p66, plot([prop(scaleit(shift(rot(t, `*`(tan(`*`(`+`(`*`(17, `*`(Pi))), `/`(1, 12))), `*`(t)), `*`(`+`(`*`(5, `*`(Pi))), `/`(1, 12)), 0, `+`(`*`(1.75, `*`(sin(`*`(`+`(`*`(17, `*`(Pi))), `/`(1...
 

PLOT(CURVES([[7.78901270185848, 77.2928159108397], [7.77079982379936, 77.3033311208899], [7.75495289598386, 77.3124803489300], [7.73713136827688, 77.3227696127490], [7.71919170791588, 77.3331270804876... (71)
 

 

`assign`(p67, plot([prop(-1, `+`(t, `-`(0.625e-1))), t = -.4375 .. 0])) 

PLOT(CURVES([[5.50000000000000, 93.], [5.50000000000000, 93.0184016175879], [5.50000000000000, 93.0344127666583], [5.50000000000000, 93.0524189783417], [5.50000000000000, 93.0705445468844], [5.5000000... (72)
 

`assign`(p68, plot([prop(1, `+`(t, `-`(0.625e-1))), t = -.4375 .. 0])) 

PLOT(CURVES([[21.5000000000000, 93.], [21.5000000000000, 93.0184016175879], [21.5000000000000, 93.0344127666583], [21.5000000000000, 93.0524189783417], [21.5000000000000, 93.0705445468844], [21.500000... (73)
 

`assign`(p69, plot([prop(-.875, `+`(t, .6875)), t = -`/`(1, 4) .. 0])) 

PLOT(CURVES([[6.50000000000000, 100.500000000000], [6.50000000000000, 100.510515210050], [6.50000000000000, 100.519664438090], [6.50000000000000, 100.529953701910], [6.50000000000000, 100.540311169648... (74)
 

`assign`(p70, plot([prop(.875, `+`(t, .6875)), t = -`/`(1, 4) .. 0])) 

PLOT(CURVES([[20.5000000000000, 100.500000000000], [20.5000000000000, 100.510515210050], [20.5000000000000, 100.519664438090], [20.5000000000000, 100.529953701910], [20.5000000000000, 100.540311169648... (75)
 

`assign`(p71, plot([`+`(t, 13.5), `+`(`-`(`^`(`+`(`*`(.75, `*`(t))), 2)), 118), t = -3.5 .. 3.5], scaling = constrained, color = black, axes = none)) 

PLOT(CURVES([[10., 111.109375000000], [10.0368032351759, 111.253525844563], [10.0688255333166, 111.377711000789], [10.1048379566834, 111.515992018538], [10.1410890937688, 111.653716107251], [10.177167... (76)
 

`assign`(p72, plot([`+`(t, 13.5), `+`(`-`(`^`(`+`(`*`(9, `*`(t))), 2)), 130), t = -.39 .. .39], color = black)) 

PLOT(CURVES([[13.1100000000000, 117.679900000000], [13.1141009319196, 117.937634649629], [13.1176691308553, 118.159671626422], [13.1216819437447, 118.406911313210], [13.1257213561628, 118.653155238159... (77)
 

 

 

 

for i from 0 by 2 to 60 do `assign`(p[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([7.5, `+`(i, 1)], [8.5, i], color = red), scaling = constrained) end do 

for i from 0 by 2 to 60 do `assign`(p[`+`(j, `*`(`/`(1, 2), `*`(i)))], rectangle([9.5, `+`(i, 1)], [10.5, i], color = red), scaling = constrained) end do 

for i from 0 by 2 to 60 do `assign`(p[`+`(`*`(2, `*`(j)), `*`(`/`(1, 2), `*`(i)))], rectangle([12, `+`(i, 1)], [13, i], color = red), scaling = constrained) end do 

for i from 0 by 2 to 60 do `assign`(p[`+`(`*`(3, `*`(j)), `*`(`/`(1, 2), `*`(i)))], rectangle([14, `+`(i, 1)], [15, i], color = red), scaling = constrained) end do 

for i from 0 by 2 to 60 do `assign`(p[`+`(`*`(4, `*`(j)), `*`(`/`(1, 2), `*`(i)))], rectangle([16.5, `+`(i, 1)], [17.5, i], color = red), scaling = constrained) end do 

for i from 0 by 2 to 60 do `assign`(p[`+`(`*`(5, `*`(j)), `*`(`/`(1, 2), `*`(i)))], rectangle([18.5, `+`(i, 1)], [19.5, i], color = red), scaling = constrained) end do 

 

for i from 0 by 2 to 60 do `assign`(v[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([1, `+`(i, 1)], [6, i], color = red), scaling = constrained) end do 

 

for i from 0 by 2 to 60 do `assign`(w[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([21, `+`(i, 1)], [26, i], color = red), scaling = constrained) end do 

`assign`(k, 3) 

for i from 0 by 2 to 4 do `assign`(q[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([7.5, `+`(`+`(`-`(7.5), i), 1)], [8.5, `+`(`-`(7.5), i)], color = red), scaling = constrained) end do
for i from 0 by 2 to 4 do `assign`(q[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([7.5, `+`(`+`(`-`(7.5), i), 1)], [8.5, `+`(`-`(7.5), i)], color = red), scaling = constrained) end dofor i from 0 by 2 to 4 do `assign`(q[`+`(k, `*`(`/`(1, 2), `*`(i)))], rectangle([9.5, `+`(`+`(`-`(7.5), i), 1)], [10.5, `+`(`-`(7.5), i)], color = red), scaling = constrained) end do
for i from 0 by 2 to 4 do `assign`(q[`+`(k, `*`(`/`(1, 2), `*`(i)))], rectangle([9.5, `+`(`+`(`-`(7.5), i), 1)], [10.5, `+`(`-`(7.5), i)], color = red), scaling = constrained) end do
 

for i from 0 by 2 to 4 do `assign`(q[`+`(`*`(2, `*`(k)), `*`(`/`(1, 2), `*`(i)))], rectangle([12, `+`(`+`(`-`(7.5), i), 1)], [13, `+`(`-`(7.5), i)], color = red), scaling = constrained) end do
for i from 0 by 2 to 4 do `assign`(q[`+`(`*`(2, `*`(k)), `*`(`/`(1, 2), `*`(i)))], rectangle([12, `+`(`+`(`-`(7.5), i), 1)], [13, `+`(`-`(7.5), i)], color = red), scaling = constrained) end do
 

for i from 0 by 2 to 4 do `assign`(q[`+`(`*`(3, `*`(k)), `*`(`/`(1, 2), `*`(i)))], rectangle([14, `+`(`+`(`-`(7.5), i), 1)], [15, `+`(`-`(7.5), i)], color = red), scaling = constrained) end do
for i from 0 by 2 to 4 do `assign`(q[`+`(`*`(3, `*`(k)), `*`(`/`(1, 2), `*`(i)))], rectangle([14, `+`(`+`(`-`(7.5), i), 1)], [15, `+`(`-`(7.5), i)], color = red), scaling = constrained) end do
 

for i from 0 by 2 to 4 do `assign`(q[`+`(`*`(4, `*`(k)), `*`(`/`(1, 2), `*`(i)))], rectangle([16.5, `+`(`+`(`-`(7.5), i), 1)], [17.5, `+`(`-`(7.5), i)], color = red), scaling = constrained) end do
for i from 0 by 2 to 4 do `assign`(q[`+`(`*`(4, `*`(k)), `*`(`/`(1, 2), `*`(i)))], rectangle([16.5, `+`(`+`(`-`(7.5), i), 1)], [17.5, `+`(`-`(7.5), i)], color = red), scaling = constrained) end do
 

for i from 0 by 2 to 4 do `assign`(q[`+`(`*`(5, `*`(k)), `*`(`/`(1, 2), `*`(i)))], rectangle([18.5, `+`(`+`(`-`(7.5), i), 1)], [19.5, `+`(`-`(7.5), i)], color = red), scaling = constrained) end do
for i from 0 by 2 to 4 do `assign`(q[`+`(`*`(5, `*`(k)), `*`(`/`(1, 2), `*`(i)))], rectangle([18.5, `+`(`+`(`-`(7.5), i), 1)], [19.5, `+`(`-`(7.5), i)], color = red), scaling = constrained) end do
 

 

for i from 0 by 2 to 4 do `assign`(dd[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([-1, `+`(`+`(`-`(7.5), i), 1)], [0, `+`(`-`(7.5), i)], color = red), scaling = constrained) end do
for i from 0 by 2 to 4 do `assign`(dd[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([-1, `+`(`+`(`-`(7.5), i), 1)], [0, `+`(`-`(7.5), i)], color = red), scaling = constrained) end do
 

for i from 0 by 2 to 4 do `assign`(dd[`+`(k, `*`(`/`(1, 2), `*`(i)))], rectangle([1, `+`(`+`(`-`(7.5), i), 1)], [6, `+`(`-`(7.5), i)], color = red), scaling = constrained) end do
for i from 0 by 2 to 4 do `assign`(dd[`+`(k, `*`(`/`(1, 2), `*`(i)))], rectangle([1, `+`(`+`(`-`(7.5), i), 1)], [6, `+`(`-`(7.5), i)], color = red), scaling = constrained) end do
 

for i from 0 by 2 to 4 do `assign`(ee[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([21, `+`(`+`(`-`(7.5), i), 1)], [26, `+`(`-`(7.5), i)], color = red), scaling = constrained) end do
for i from 0 by 2 to 4 do `assign`(ee[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([21, `+`(`+`(`-`(7.5), i), 1)], [26, `+`(`-`(7.5), i)], color = red), scaling = constrained) end do
 

for i from 0 by 2 to 4 do `assign`(ee[`+`(k, `*`(`/`(1, 2), `*`(i)))], rectangle([27, `+`(`+`(`-`(7.5), i), 1)], [28, `+`(`-`(7.5), i)], color = red), scaling = constrained) end do
for i from 0 by 2 to 4 do `assign`(ee[`+`(k, `*`(`/`(1, 2), `*`(i)))], rectangle([27, `+`(`+`(`-`(7.5), i), 1)], [28, `+`(`-`(7.5), i)], color = red), scaling = constrained) end do
 

`assign`(l, 18) 

for i from 0 by 2 to 34 do `assign`(r[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([7.5, `+`(`+`(`-`(44), i), 1)], [8.5, `+`(`-`(44), i)], color = red), scaling = constrained) end do
for i from 0 by 2 to 34 do `assign`(r[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([7.5, `+`(`+`(`-`(44), i), 1)], [8.5, `+`(`-`(44), i)], color = red), scaling = constrained) end dofor i from 0 by 2 to 34 do `assign`(r[`+`(l, `*`(`/`(1, 2), `*`(i)))], rectangle([9.5, `+`(`+`(`-`(44), i), 1)], [10.5, `+`(`-`(44), i)], color = red), scaling = constrained) end do
for i from 0 by 2 to 34 do `assign`(r[`+`(l, `*`(`/`(1, 2), `*`(i)))], rectangle([9.5, `+`(`+`(`-`(44), i), 1)], [10.5, `+`(`-`(44), i)], color = red), scaling = constrained) end do
 

for i from 0 by 2 to 34 do `assign`(r[`+`(`*`(2, `*`(l)), `*`(`/`(1, 2), `*`(i)))], rectangle([12, `+`(`+`(`-`(44), i), 1)], [13, `+`(`-`(44), i)], color = red), scaling = constrained) end do
for i from 0 by 2 to 34 do `assign`(r[`+`(`*`(2, `*`(l)), `*`(`/`(1, 2), `*`(i)))], rectangle([12, `+`(`+`(`-`(44), i), 1)], [13, `+`(`-`(44), i)], color = red), scaling = constrained) end do
 

for i from 0 by 2 to 34 do `assign`(r[`+`(`*`(3, `*`(l)), `*`(`/`(1, 2), `*`(i)))], rectangle([14, `+`(`+`(`-`(44), i), 1)], [15, `+`(`-`(44), i)], color = red), scaling = constrained) end do
for i from 0 by 2 to 34 do `assign`(r[`+`(`*`(3, `*`(l)), `*`(`/`(1, 2), `*`(i)))], rectangle([14, `+`(`+`(`-`(44), i), 1)], [15, `+`(`-`(44), i)], color = red), scaling = constrained) end do
 

for i from 0 by 2 to 34 do `assign`(r[`+`(`*`(4, `*`(l)), `*`(`/`(1, 2), `*`(i)))], rectangle([16.5, `+`(`+`(`-`(44), i), 1)], [17.5, `+`(`-`(44), i)], color = red), scaling = constrained) end do
for i from 0 by 2 to 34 do `assign`(r[`+`(`*`(4, `*`(l)), `*`(`/`(1, 2), `*`(i)))], rectangle([16.5, `+`(`+`(`-`(44), i), 1)], [17.5, `+`(`-`(44), i)], color = red), scaling = constrained) end do
 

for i from 0 by 2 to 34 do `assign`(r[`+`(`*`(5, `*`(l)), `*`(`/`(1, 2), `*`(i)))], rectangle([18.5, `+`(`+`(`-`(44), i), 1)], [19.5, `+`(`-`(44), i)], color = red), scaling = constrained) end do
for i from 0 by 2 to 34 do `assign`(r[`+`(`*`(5, `*`(l)), `*`(`/`(1, 2), `*`(i)))], rectangle([18.5, `+`(`+`(`-`(44), i), 1)], [19.5, `+`(`-`(44), i)], color = red), scaling = constrained) end do
 

 

for i from 0 by 2 to 34 do `assign`(s[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([3, `+`(`+`(`-`(44), i), 1)], [6, `+`(`-`(44), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 34 do `assign`(s[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([3, `+`(`+`(`-`(44), i), 1)], [6, `+`(`-`(44), i)], color = black), scaling = constrained) end do
 

 

for i from 0 by 2 to 34 do `assign`(u[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([21, `+`(`+`(`-`(44), i), 1)], [24, `+`(`-`(44), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 34 do `assign`(u[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([21, `+`(`+`(`-`(44), i), 1)], [24, `+`(`-`(44), i)], color = black), scaling = constrained) end do
 

 

 

for i from 0 by 2 to 4 do `assign`(a[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([-3.5, `+`(`+`(`-`(14), i), 1)], [-2.5, `+`(`-`(14), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 4 do `assign`(a[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([-3.5, `+`(`+`(`-`(14), i), 1)], [-2.5, `+`(`-`(14), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 4 do `assign`(a[`+`(k, `*`(`/`(1, 2), `*`(i)))], rectangle([-1.5, `+`(`+`(`-`(14), i), 1)], [-.5, `+`(`-`(14), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 4 do `assign`(a[`+`(k, `*`(`/`(1, 2), `*`(i)))], rectangle([-1.5, `+`(`+`(`-`(14), i), 1)], [-.5, `+`(`-`(14), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 4 do `assign`(a[`+`(`*`(2, `*`(k)), `*`(`/`(1, 2), `*`(i)))], rectangle([.5, `+`(`+`(`-`(14), i), 1)], [1.5, `+`(`-`(14), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 4 do `assign`(a[`+`(`*`(2, `*`(k)), `*`(`/`(1, 2), `*`(i)))], rectangle([.5, `+`(`+`(`-`(14), i), 1)], [1.5, `+`(`-`(14), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 4 do `assign`(b[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([25.5, `+`(`+`(`-`(14), i), 1)], [26.5, `+`(`-`(14), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 4 do `assign`(b[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([25.5, `+`(`+`(`-`(14), i), 1)], [26.5, `+`(`-`(14), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 4 do `assign`(b[`+`(k, `*`(`/`(1, 2), `*`(i)))], rectangle([27.5, `+`(`+`(`-`(14), i), 1)], [28.5, `+`(`-`(14), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 4 do `assign`(b[`+`(k, `*`(`/`(1, 2), `*`(i)))], rectangle([27.5, `+`(`+`(`-`(14), i), 1)], [28.5, `+`(`-`(14), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 4 do `assign`(b[`+`(`*`(2, `*`(k)), `*`(`/`(1, 2), `*`(i)))], rectangle([29.5, `+`(`+`(`-`(14), i), 1)], [30.5, `+`(`-`(14), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 4 do `assign`(b[`+`(`*`(2, `*`(k)), `*`(`/`(1, 2), `*`(i)))], rectangle([29.5, `+`(`+`(`-`(14), i), 1)], [30.5, `+`(`-`(14), i)], color = black), scaling = constrained) end do
 

 

for i from 0 by 2 to 8 do `assign`(c[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([`+`(`-`(5.5), i), -15], [`+`(`-`(4.5), i), -16], color = black), scaling = constrained) end do
for i from 0 by 2 to 8 do `assign`(c[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([`+`(`-`(5.5), i), -15], [`+`(`-`(4.5), i), -16], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 8 do `assign`(d[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([`+`(25.5, i), -15], [`+`(26.5, i), -16], color = black), scaling = constrained) end do
for i from 0 by 2 to 8 do `assign`(d[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([`+`(25.5, i), -15], [`+`(26.5, i), -16], color = black), scaling = constrained) end do
 

`assign`(m, 4) 

 

for i from 0 by 2 to 6 do `assign`(e[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([-5.5, `+`(`+`(`-`(24), i), 1)], [-4.5, `+`(`-`(24), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 6 do `assign`(e[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([-5.5, `+`(`+`(`-`(24), i), 1)], [-4.5, `+`(`-`(24), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 6 do `assign`(e[`+`(m, `*`(`/`(1, 2), `*`(i)))], rectangle([-3.5, `+`(`+`(`-`(24), i), 1)], [-2.5, `+`(`-`(24), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 6 do `assign`(e[`+`(m, `*`(`/`(1, 2), `*`(i)))], rectangle([-3.5, `+`(`+`(`-`(24), i), 1)], [-2.5, `+`(`-`(24), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 6 do `assign`(e[`+`(`*`(2, `*`(m)), `*`(`/`(1, 2), `*`(i)))], rectangle([-1.5, `+`(`+`(`-`(24), i), 1)], [-.5, `+`(`-`(24), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 6 do `assign`(e[`+`(`*`(2, `*`(m)), `*`(`/`(1, 2), `*`(i)))], rectangle([-1.5, `+`(`+`(`-`(24), i), 1)], [-.5, `+`(`-`(24), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 6 do `assign`(e[`+`(`*`(3, `*`(m)), `*`(`/`(1, 2), `*`(i)))], rectangle([.5, `+`(`+`(`-`(24), i), 1)], [1.5, `+`(`-`(24), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 6 do `assign`(e[`+`(`*`(3, `*`(m)), `*`(`/`(1, 2), `*`(i)))], rectangle([.5, `+`(`+`(`-`(24), i), 1)], [1.5, `+`(`-`(24), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 6 do `assign`(f[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([25.5, `+`(`+`(`-`(24), i), 1)], [26.5, `+`(`-`(24), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 6 do `assign`(f[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([25.5, `+`(`+`(`-`(24), i), 1)], [26.5, `+`(`-`(24), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 6 do `assign`(f[`+`(m, `*`(`/`(1, 2), `*`(i)))], rectangle([27.5, `+`(`+`(`-`(24), i), 1)], [28.5, `+`(`-`(24), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 6 do `assign`(f[`+`(m, `*`(`/`(1, 2), `*`(i)))], rectangle([27.5, `+`(`+`(`-`(24), i), 1)], [28.5, `+`(`-`(24), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 6 do `assign`(f[`+`(`*`(2, `*`(m)), `*`(`/`(1, 2), `*`(i)))], rectangle([29.5, `+`(`+`(`-`(24), i), 1)], [30.5, `+`(`-`(24), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 6 do `assign`(f[`+`(`*`(2, `*`(m)), `*`(`/`(1, 2), `*`(i)))], rectangle([29.5, `+`(`+`(`-`(24), i), 1)], [30.5, `+`(`-`(24), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 6 do `assign`(f[`+`(`*`(3, `*`(m)), `*`(`/`(1, 2), `*`(i)))], rectangle([31.5, `+`(`+`(`-`(24), i), 1)], [32.5, `+`(`-`(24), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 6 do `assign`(f[`+`(`*`(3, `*`(m)), `*`(`/`(1, 2), `*`(i)))], rectangle([31.5, `+`(`+`(`-`(24), i), 1)], [32.5, `+`(`-`(24), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 6 do `assign`(g[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([`+`(`-`(5.5), i), -25], [`+`(`-`(4.5), i), -26], color = black), scaling = constrained) end do
for i from 0 by 2 to 6 do `assign`(g[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([`+`(`-`(5.5), i), -25], [`+`(`-`(4.5), i), -26], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 6 do `assign`(g[`+`(m, `*`(`/`(1, 2), `*`(i)))], rectangle([`+`(`-`(5.5), i), -27], [`+`(`-`(4.5), i), -28], color = black), scaling = constrained) end do
for i from 0 by 2 to 6 do `assign`(g[`+`(m, `*`(`/`(1, 2), `*`(i)))], rectangle([`+`(`-`(5.5), i), -27], [`+`(`-`(4.5), i), -28], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 6 do `assign`(h[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([`+`(25.5, i), -25], [`+`(26.5, i), -26], color = black), scaling = constrained) end do
for i from 0 by 2 to 6 do `assign`(h[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([`+`(25.5, i), -25], [`+`(26.5, i), -26], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 6 do `assign`(h[`+`(m, `*`(`/`(1, 2), `*`(i)))], rectangle([`+`(25.5, i), -27], [`+`(26.5, i), -28], color = black), scaling = constrained) end do
for i from 0 by 2 to 6 do `assign`(h[`+`(m, `*`(`/`(1, 2), `*`(i)))], rectangle([`+`(25.5, i), -27], [`+`(26.5, i), -28], color = black), scaling = constrained) end do
 

`assign`(n, 12) 

for i from 0 by 2 to 22 do `assign`(aa[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([-9.5, `+`(`+`(`-`(52), i), 1)], [-8.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 22 do `assign`(aa[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([-9.5, `+`(`+`(`-`(52), i), 1)], [-8.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 22 do `assign`(aa[`+`(n, `*`(`/`(1, 2), `*`(i)))], rectangle([-7.5, `+`(`+`(`-`(52), i), 1)], [-6.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 22 do `assign`(aa[`+`(n, `*`(`/`(1, 2), `*`(i)))], rectangle([-7.5, `+`(`+`(`-`(52), i), 1)], [-6.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 22 do `assign`(aa[`+`(`*`(2, `*`(n)), `*`(`/`(1, 2), `*`(i)))], rectangle([-5.5, `+`(`+`(`-`(52), i), 1)], [-4.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 22 do `assign`(aa[`+`(`*`(2, `*`(n)), `*`(`/`(1, 2), `*`(i)))], rectangle([-5.5, `+`(`+`(`-`(52), i), 1)], [-4.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 22 do `assign`(aa[`+`(`*`(3, `*`(n)), `*`(`/`(1, 2), `*`(i)))], rectangle([-3.5, `+`(`+`(`-`(52), i), 1)], [-2.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 22 do `assign`(aa[`+`(`*`(3, `*`(n)), `*`(`/`(1, 2), `*`(i)))], rectangle([-3.5, `+`(`+`(`-`(52), i), 1)], [-2.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 22 do `assign`(aa[`+`(`*`(4, `*`(n)), `*`(`/`(1, 2), `*`(i)))], rectangle([-1.5, `+`(`+`(`-`(52), i), 1)], [-.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 22 do `assign`(aa[`+`(`*`(4, `*`(n)), `*`(`/`(1, 2), `*`(i)))], rectangle([-1.5, `+`(`+`(`-`(52), i), 1)], [-.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 22 do `assign`(aa[`+`(`*`(5, `*`(n)), `*`(`/`(1, 2), `*`(i)))], rectangle([.5, `+`(`+`(`-`(52), i), 1)], [1.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 22 do `assign`(aa[`+`(`*`(5, `*`(n)), `*`(`/`(1, 2), `*`(i)))], rectangle([.5, `+`(`+`(`-`(52), i), 1)], [1.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
 

 

 

for i from 0 by 2 to 22 do `assign`(bb[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([25.5, `+`(`+`(`-`(52), i), 1)], [26.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 22 do `assign`(bb[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([25.5, `+`(`+`(`-`(52), i), 1)], [26.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 22 do `assign`(bb[`+`(n, `*`(`/`(1, 2), `*`(i)))], rectangle([27.5, `+`(`+`(`-`(52), i), 1)], [28.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 22 do `assign`(bb[`+`(n, `*`(`/`(1, 2), `*`(i)))], rectangle([27.5, `+`(`+`(`-`(52), i), 1)], [28.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 22 do `assign`(bb[`+`(`*`(2, `*`(n)), `*`(`/`(1, 2), `*`(i)))], rectangle([29.5, `+`(`+`(`-`(52), i), 1)], [30.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 22 do `assign`(bb[`+`(`*`(2, `*`(n)), `*`(`/`(1, 2), `*`(i)))], rectangle([29.5, `+`(`+`(`-`(52), i), 1)], [30.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 22 do `assign`(bb[`+`(`*`(3, `*`(n)), `*`(`/`(1, 2), `*`(i)))], rectangle([31.5, `+`(`+`(`-`(52), i), 1)], [32.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 22 do `assign`(bb[`+`(`*`(3, `*`(n)), `*`(`/`(1, 2), `*`(i)))], rectangle([31.5, `+`(`+`(`-`(52), i), 1)], [32.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 22 do `assign`(bb[`+`(`*`(4, `*`(n)), `*`(`/`(1, 2), `*`(i)))], rectangle([33.5, `+`(`+`(`-`(52), i), 1)], [34.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 22 do `assign`(bb[`+`(`*`(4, `*`(n)), `*`(`/`(1, 2), `*`(i)))], rectangle([33.5, `+`(`+`(`-`(52), i), 1)], [34.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 22 do `assign`(bb[`+`(`*`(5, `*`(n)), `*`(`/`(1, 2), `*`(i)))], rectangle([35.5, `+`(`+`(`-`(52), i), 1)], [36.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 22 do `assign`(bb[`+`(`*`(5, `*`(n)), `*`(`/`(1, 2), `*`(i)))], rectangle([35.5, `+`(`+`(`-`(52), i), 1)], [36.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
 

 

for i from 0 by 2 to 8 do `assign`(cc[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([3, `+`(`+`(`-`(52), i), 1)], [6, `+`(`-`(52), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 8 do `assign`(cc[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([3, `+`(`+`(`-`(52), i), 1)], [6, `+`(`-`(52), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 8 do `assign`(cc[`+`(m, `*`(`/`(1, 2), `*`(i)))], rectangle([7.5, `+`(`+`(`-`(52), i), 1)], [10.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 8 do `assign`(cc[`+`(m, `*`(`/`(1, 2), `*`(i)))], rectangle([7.5, `+`(`+`(`-`(52), i), 1)], [10.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 8 do `assign`(cc[`+`(`*`(2, `*`(m)), `*`(`/`(1, 2), `*`(i)))], rectangle([12, `+`(`+`(`-`(52), i), 1)], [15, `+`(`-`(52), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 8 do `assign`(cc[`+`(`*`(2, `*`(m)), `*`(`/`(1, 2), `*`(i)))], rectangle([12, `+`(`+`(`-`(52), i), 1)], [15, `+`(`-`(52), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 8 do `assign`(cc[`+`(`*`(3, `*`(m)), `*`(`/`(1, 2), `*`(i)))], rectangle([16.5, `+`(`+`(`-`(52), i), 1)], [19.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 8 do `assign`(cc[`+`(`*`(3, `*`(m)), `*`(`/`(1, 2), `*`(i)))], rectangle([16.5, `+`(`+`(`-`(52), i), 1)], [19.5, `+`(`-`(52), i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 8 do `assign`(cc[`+`(`*`(4, `*`(m)), `*`(`/`(1, 2), `*`(i)))], rectangle([21, `+`(`+`(`-`(52), i), 1)], [24, `+`(`-`(52), i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 8 do `assign`(cc[`+`(`*`(4, `*`(m)), `*`(`/`(1, 2), `*`(i)))], rectangle([21, `+`(`+`(`-`(52), i), 1)], [24, `+`(`-`(52), i)], color = black), scaling = constrained) end dofor i from 0 by 2 to 2 do `assign`(ff[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([`+`(7.5, i), 61], [`+`(`+`(7.5, i), 1), 60], color = black), scaling = constrained) end do
for i from 0 by 2 to 2 do `assign`(ff[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([`+`(7.5, i), 61], [`+`(`+`(7.5, i), 1), 60], color = black), scaling = constrained) end do
 

 

`assign`(o, 2) 

for i from 0 by 2 to 2 do `assign`(ff[`+`(o, `*`(`/`(1, 2), `*`(i)))], rectangle([`+`(7.5, i), 63], [`+`(`+`(7.5, i), 1), 62], color = black), scaling = constrained) end do
for i from 0 by 2 to 2 do `assign`(ff[`+`(o, `*`(`/`(1, 2), `*`(i)))], rectangle([`+`(7.5, i), 63], [`+`(`+`(7.5, i), 1), 62], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 2 do `assign`(ff[`+`(`*`(2, `*`(o)), `*`(`/`(1, 2), `*`(i)))], rectangle([`+`(16.5, i), 61], [`+`(`+`(16.5, i), 1), 60], color = black), scaling = constrained) end do
for i from 0 by 2 to 2 do `assign`(ff[`+`(`*`(2, `*`(o)), `*`(`/`(1, 2), `*`(i)))], rectangle([`+`(16.5, i), 61], [`+`(`+`(16.5, i), 1), 60], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 2 do `assign`(ff[`+`(`*`(3, `*`(o)), `*`(`/`(1, 2), `*`(i)))], rectangle([`+`(16.5, i), 63], [`+`(`+`(16.5, i), 1), 62], color = black), scaling = constrained) end do
for i from 0 by 2 to 2 do `assign`(ff[`+`(`*`(3, `*`(o)), `*`(`/`(1, 2), `*`(i)))], rectangle([`+`(16.5, i), 63], [`+`(`+`(16.5, i), 1), 62], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 18 do `assign`(gg[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([12, `+`(`+`(60, i), 1)], [13, `+`(60, i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 18 do `assign`(gg[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([12, `+`(`+`(60, i), 1)], [13, `+`(60, i)], color = black), scaling = constrained) end do
 

 

for i from 0 by 2 to 18 do `assign`(gg[`+`(10, `*`(`/`(1, 2), `*`(i)))], rectangle([14, `+`(`+`(60, i), 1)], [15, `+`(60, i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 18 do `assign`(gg[`+`(10, `*`(`/`(1, 2), `*`(i)))], rectangle([14, `+`(`+`(60, i), 1)], [15, `+`(60, i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 10 do `assign`(hh[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([9.5, `+`(`+`(66, i), 1)], [10.5, `+`(66, i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 10 do `assign`(hh[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([9.5, `+`(`+`(66, i), 1)], [10.5, `+`(66, i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 10 do `assign`(hh[`+`(6, `*`(`/`(1, 2), `*`(i)))], rectangle([16.5, `+`(`+`(66, i), 1)], [17.5, `+`(66, i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 10 do `assign`(hh[`+`(6, `*`(`/`(1, 2), `*`(i)))], rectangle([16.5, `+`(`+`(66, i), 1)], [17.5, `+`(66, i)], color = black), scaling = constrained) end do
 

 

for i from 0 by 2 to 16 do `assign`(ii[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([5.5, `+`(`+`(60, i), 1)], [6.5, `+`(60, i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 16 do `assign`(ii[`+`(`*`(`/`(1, 2), `*`(i)))], rectangle([5.5, `+`(`+`(60, i), 1)], [6.5, `+`(60, i)], color = black), scaling = constrained) end do
 

for i from 0 by 2 to 16 do `assign`(ii[`+`(8, `*`(`/`(1, 2), `*`(i)))], rectangle([20.5, `+`(`+`(60, i), 1)], [21.5, `+`(60, i)], color = black), scaling = constrained) end do
for i from 0 by 2 to 16 do `assign`(ii[`+`(8, `*`(`/`(1, 2), `*`(i)))], rectangle([20.5, `+`(`+`(60, i), 1)], [21.5, `+`(60, i)], color = black), scaling = constrained) end do
 

 

 

display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
display(p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, p31, p32, p33, p34, p35, p36, p37, p38, p39, p40, p...
 

Plot_2d