{VERSION 6 0 "IBM INTEL NT" "6.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 1 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 0 1 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 1 } {PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Warning" -1 7 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 2 2 2 2 2 1 1 1 3 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Output" -1 11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 3 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Output" -1 12 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 3 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple P lot" -1 13 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 1 0 0 0 0 1 0 1 0 2 2 0 1 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "with(plots):" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 52 "a:=0:b:=2*Pi:n:=30:\nx0:=t-> cos(t):\ny0:=t->2*sin(t):\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 266 "x:=t->simplify(\nx0(t)-D(y0)(t)*(D(x0)(t)^2+D(y0)(t)^2)/(D(x0)(t) *(D@D)(y0)(t)-D(y0)(t)*(D@D)(x0)(t))):\ny:=t->simplify(\ny0(t)+D(x0)(t )*(D(x0)(t)^2+D(y0)(t)^2)/(D(x0)(t)*(D@D)(y0)(t)-D(y0)(t)*(D@D)(x0)(t) )):\nc:=plot([[x0,y0,a..b],[x(t),y(t),t=0..b]],color=[blue,red]):" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 94 "d:=plot([seq([[x0(t),y0(t)], [x(t),y(t)]],t=seq(a+k*(b-a)/n,k=0..n))],color=black,linestyle=2):" }} }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 "display(c,d,scaling=constra ined,axes=none);" }}{PARA 13 "" 1 "" {GLPLOT2D 544 414 414 {PLOTDATA 2 "6G-%'CURVESG6$X0%)anythingG6\"6\"[gl'\"%!!!#[dl\"cw\"#!!!!3FF000000 00000003FEFFB87D0C320EE3FEFF05F679EA1A43FEFDBC172F08C153FEFBE65639EEB7 C3FEF98A242CF0C513FEF6E0B7F7125833FEF3A4DE61DCA183FEEFCAB03E8427A3FEEB 711B54F97773FEE670DA7790B863FEE19911D7EA9C93FEDBA90DA9B67E93FED52FE517 D43013FECE78786ECBB483FEC7F8685D948B63FEBFC07566FC7843FEB8616D94936133 FEAF57BCAD4D53D3FEA6EF4930186353FE9D473B32074F93FE93AC26E92F46C3FE893B AE8020AD23FE7F47F0AC89E643FE742A195748F883FE6835BB16E2A3E3FE5D79BC85F1 FA43FE518CE24A135173FE44E178F06372C3FE3827A3A5F7F173FE2B8ACFC8FDFC73FE 1D351B162A0003FE100B2327A3C423FE01B4D95597A713FDE8F3D027414BD3FDCB8873 FD0ED0A3FDAF69007ED13A93FD9195C60E403503FD7407DA1D7DFD73FD54B400724EEF 83FD3630058C0D8A23FD16AA13420A3393FCEE3C48AFFFA6F3FCB3D0A966C27B93FC70 66E1CE5BE693FC33C0B12F8A7E23FBE59146E819D083FB68BB809AA3B493FABB746BAD FE2AC3F994958FF3A4C8CBF81E861FD9DEBC9BFA413862FA16336BFB28F0DD303BF95B FB9E4FC60FF4AEFBFC11C7B5AF81097BFC51DB9394B4699BFC918E36E9AEA4CBFCD09E A7EB58E09BFD0662B4F00EE3EBFD26A08272C37B8BFD450FF533F49C0BFD64C08BD43B 2E6BFD811BCBC154ED1BFDA00D220C099EFBFDBD44D62CA16BDBFDD9FA00EA67990BFD F776994CFF959BFE09126FBC24D31BFE167BE7A4FC7B3BFE24FB9B25B219FBFE31D100 F5ED821BFE3EA39809AE42ABFE4B5A555416AFCBFE56BCDE3726FC8BFE628B4A5F644E 3BFE6DE9BBB14A586BFE79ADA9ABD88D3BFE83B5ED7B81CC1BFE8EDDB6EC3A0FFBFE98 8964E102E4EBFEA1B9D8C1BD6BDBFEAB2D38F017CBDBFEB434E1CA72D08BFEBC03C16E 67B53BFEC3DF83503340FBFECB1AB3F300FAABFED272466F0DD03BFED8604E4AA7C63B FEDEB2155A9BD88BFEE426C399F477ABFEE91608812B3EFBFEED8D9A7622F82BFEF19E 715A97328BFEF56228E5F0F35BFEF856AB6606848BFEFAC971222AD2ABFEFCE2F3E20B 95ABFEFE7245E9C2FB3BFEFF63C7F6AA4ADBFEFFF27A989A3E1BFEFFF245245DFEBBFE FF67C00397BB7BFEFE58A4BBAC5A6BFEFCF429DB164D3BFEFAE2B173F1248BFEF844C9 D53DF9DBFEF5225EB347081BFEF1C2389E7116BBFEEDCA6A74D3E99BFEE92F60982D9F 9BFEE4174BA24C6C7BFEDE551B8AC4CDDBFED8D45E2657FCCBFED2286B16ACEF0BFECA F52BA0F92D6BFEC38D14C91004BBFEBC6F02102C066BFEB37E59E1C0D64BFEAB85B442 8141BBFEA1CCCBDC3BF1EBFE98CC84D2D3365BFE8E81961F58AA5BFE844F29624F313B FE7944D783C7518BFE6EC79C68305EBBFE6319AF2429382BFE5694707BBD4D7BFE4B5E 6D1006E90BFE3EF2328A6F9DDBFE31C82189AAE51BFE24975F74AF879BFE178C488679 721BFE08C1D03E53A97BFDF6683CA17095BBFDD8F1C4D0F1E0CBFDBDCEFD158253ABFD 9FB1B9A0804EDBFD82F5A57D066B2BFD648A043F2C6CFBFD46726D3093E51BFD269A99 FC7376ABFD07A364D72962ABFCCF6792A638B29BFC8F96AAA32DE77BFC5496B6821ADD 0BFC109CA866F4B55BFBA719AB5B5D909BFB247939DDB3DB9BFA4E543F5AD286BBF7BD 8A09E9423003F9734CEAD5B02D93FACB5E9ED36EC6B3FB6232A26880CD13FBEA03BA13 4DFFB3FC2F627A869FD453FC718FB165667FD3FCB11BDE5362CCD3FCF02E833ABD8563 FD1743BABA941D33FD34F3BAA2055E03FD54B9D1B3AC74D3FD72AB6970D88A33FD91CB 486E83EDB3FDAD98D045620763FDCBE1D5CFDF5393FDE86CFA043B4C63FE02358E7EDF 1703FE108E8EE8838573FE1D83549F175EB3FE2A831EA8E6E893FE388873C21E94A3FE 44EA05BC46FD83FE51415461D81833FE5D75D0132CB043FE685C63E16E74E3FE73A258 68F049E3FE7E7511EEE11673FE899EF84216ADF3FE931B842101E003FE9D9DD7C5E697 A3FEA6B0726A3BE543FEAF4613268A4233FEB80F64D90E6863FEC068C3FA1A28D3FEC7 9622C1F2C4D3FECEC37F0CA0DDB3FED551C9F0B0AE93FEDBEB1DB44E4933FEE13252AB 209543FEE6C228D9406743FEEB7E6E386B97D3FEEFB5407D3FDC63FEF37297E413C8F3 FEF6C3FE4C40EAF3FEF9BB594CDFC953FEFBF35EEA1168F3FEFDAB38A3395B33FEFEFC 2AA0CF3FE3FEFFC2CAFC3D5A33FF000000000000000000000000000003FB0E91C833BD E943FBF9C2BCFC0A2883FC80DFE12553B993FD02AB2A2ECC2CB3FD445039E94C6F93FD 80DF45C4C7F223FDBF3604322A5913FDFF3A01861A9C33FE1F416A277C2EB3FE3F7ECD 8842E273FE5B9B10E1A6A913FE7AE648F85DBB63FE99EA1CEC079B63FEB762BF62C812 A3FED1C4B4C801CB93FEF0A355F405C973FF052B1DE778F403FF13D6EC890354A3FF20 90D95F4DD033FF2E3BC6E0639F13FF3AF2CED99903D3FF47E3C8466DA303FF53783CDA B5F4F3FF5F9F155C110193FF6BDBB758A85443FF762E243356A923FF80F8F189461413 FF8BB90656B29713FF95D62C2E3BE713FF9F3BA663393543FFA934E86DFB66D3FFB1BF 31AB088C03FFBA6A57F2ECAB73FFC1DC8CB2D0B893FFC98C9E22DA3463FFD0580E13A5 2073FFD6FC058C38F0A3FFDD0391491AF343FFE2D45B540FD2E3FFE7F1D028808F23FF ECAD4A67921913FFF0DE0D699624E3FFF445E3683DA503FFF7A5F00A325533FFFA2FAD E95E85A3FFFC63BDFBBB31E3FFFE02B2CDF3DE33FFFF3FD0E5EC91F3FFFFD807EA429F 63FFFFFAFD39E34E23FFFF9B3276893DA3FFFEA71DF5D03E33FFFD5FC08F40A433FFFB 678A2C1EA383FFF8FC231B9835D3FFF60FD386E00A23FFF2A67411A96483FFEEE810FA 75FDE3FFEA597FA56CD383FFE584944E896433FFDFEC4269A97423FFDA697FBEA18F83 FFD3D5B0754EA383FFCD0FCC6CD72E13FFC5D9CE3707C053FFBDD7942B35C0C3FFB60A C2E42BEF63FFADA3E0F9BB4E43FFA3E30FB2E1EDA3FF9AA25098C3FDF3FF90C40648C1 9063FF8651C7FD772F03FF7C5C873CA40333FF716197019429C3FF661F565CAE82B3FF 59B12F6C845093FF4E66D1047A0493FF41038809709A33FF349CD6B33BB6C3FF280E46 F9F171F3FF1A3F9160BC8A13FF0C14EDFA3333D3FEFDE1D9F1A2E6D3FEE179C521F423 43FEC5496CB00D9063FEA63D93DA50C383FE8AFE07DCE84783FE6B49A5D6FF99D3FE4D 1D707EE67BB3FE2EE94D122F0253FE106441C4EBDA73FDE1FC71E19AD3E3FD9EE548B6 D52693FD60F7A79398BBB3FD238209B5DCCE73FCC30672DA8D9843FC3ED8E95E511D33 FB8FD74B0C348213F9D6A84DCC3F5EEBF9DA4708CF33D03BFB8ABB681620FC4BFC48F1 B220A99DDBFCBE24CD4F9A57CBFD20C03E2AF21D8BFD628F7F66EBF2FBFDA3AF4C3A47 BD2BFDDFABEB0498D3ABFE0EA9FF71DAC42BFE2E456D5B8766DBFE4D7750B346B51BFE 6D323A0F26D1FBFE88D107CFCD197BFEA78357A2ED0D0BFEC5E15B8B8C8D2BFEE2AEBA 1ADC597BFEFC6B8C8271983BFF0D3D0D249A879BFF19B9795FF9DBABFF27F38865DC20 ABFF3443E6BE1B93DBFF4175DF0A78BC8BFF4DB4D51468C17BFF5A2391ADB13E7BFF65 3C152A2BF84BFF70D8B5A538092BFF7C80F153D8607BFF864E4E80C55E2BFF90857AC8 DAB06BFF9AA8EC125F5EBBFFA428EE61BCE4EBFFACF2D95282259BFFB63B82516116AB FFBE23CC9C1139DBFFC61EB2B10C941BFFCCEE6B2C0B7B4BFFD3EA005B53B58BFFDA09 11026E1EDBFFDFF663C17C597BFFE5491BA96A4BFBFFEA5A62D3D9FDFBFFEEBD73EE8F D24BFFF2B88B53B27CEBFFF628EF05E4EF9BFFF8DEC7F1DEA8EBFFFB719A50816CBBFF FD42DA12F6B57BFFFEB16DEA356EBBFFFF92CC5E7CDB0BFFFFFCF89483ED6BFFFFDE56 643923CBFFFF31C35A75005BFFFE150482E6A71BFFFC52AC67B5FEBBFFFA59DCA36D75 4BFFF79858AC75404BFFF46B7C7E267BBBFFF0BF0365CDC5FBFFEC9789C5E7570BFFE8 23F84E184E2BFFE2D3549979AB6BFFDD475CE7A7C8BBFFD6F09CAB1E80EBFFD0C3989E 58E10BFFC9762A2537E41BFFC201298EB0441BFFBA1F4602E054BBFFB16CA8BD43F4AB FFA90065DC6E6CBBFF9FF96065B232FBFF958BA2BF5E0D6BFF8BB201396EDC5BFF813B 23BDD1D02BFF7631CE4B0915ABFF6BB56DB8AA074BFF602E8D3619C43BFF5465BDEEC9 87ABFF476C90721B806BFF3BABD8DCDAB0BBFF2DC5341E8C39BBFF20ECDD56D7ED5BFF 13F2891A2F051BFF05B53FCBD4714BFEEE42792681762BFED344BE8745324BFEB62654 FCD3E3ABFE994ECBE78A816BFE7999E47039BC1BFE5DD26E56E7096BFE3D8DF7DD2E78 2BFE1EE62CCBA7FE6BFE004317C409F42BFDC2B50F14D778FBFD8335E90D62012BFD3F 7B81D974E4DBFD011064916D9E7BFC866B735956D88BFC01C8220DA6F84BFAF4A5313D 203693E1C306F72CECE67-%'COLOURG6&%$RGBG$\"\"!F/F.$\"*++++\"!\")-F$6$X0 F'F(F)[gl'\"%!!!#adl\"fw\"#!!!!C008000000000000C007F5F2FD387C81C007DCE 7D23030CAC007AECF7D7B1EDDC0076D91EF26DF7CC0071A592F94CA52C006BD6AD56C3 04BC0064DD53B41ECB1C005CAC79E00AB2BC005393984B6B8BEC0049509EE598F08C00 3F93A5B6658FCC0033E6DCB3E0C88C00278059E2C8980C001AFDDFE1F7E66C000F39D3 5D6523CC0000D299C41953EBFFE8B151AC534CCBFFCB37C52CD03A5BFFB0E24032702B 2BFF93E79EB4EA27EBFF7863FC1B9EBCCBFF5BF015300FB33BFF422EF8623DE7CBFF26 F485186E1F9BFF0B6F5B397873CBFEE876864200308BFEB8256BF20AB18BFE886C0407 0A376BFE5C170AB0CAA0DBFE339403913423EBFE097FE7242EA90BFDCCD09667F878AB FD87BAF403DAEEDBFD4E71342999347BFD15A21E17F594CBFCCB6EEBB7BCD54BFC7294 E9ABFD272BFC26A31F75CE17EBFBC4984F0E99DA4BFB558CDB09A964BBFAEF49151DE2 E2CBFA59668EE03742ABF9D9A68F3009CD6BF91E196E928D83DBF84D91EA71EBD21BF7 478B5BFF88ED4BF60C99BDDD6FF2CBF3F2FFA3FB08116BF07AF25DF1284593EC0D3172 2701A933F27B4E6D6F07D533F52BA2568BB49C23F696F1302DEB3323F7D5B23990C0AF 43F8B95988A135BF43F9727FFCD4A7B863FA1EF492771A21E3FA9D753236A16763FB24 AF17F7CA2303FB89148EF4102863FC03CEA06E91ABC3FC46D06F2B9E3203FC9C1704E0 147963FCF925D19114D743FD30A4BF5FFA20B3FD6D1C60771388B3FDAA49B218C01003 FDEE530EF34DC283FE1FCFB290112B43FE475038927560E3FE723C56367348A3FEA058 5C70392BB3FECCC08235D8DB43FEFE0699EA353F43FF1857043795F473FF3442A6C2CD CF23FF4D7BD07A487663FF6B1AF718CE7E23FF862960510B7363FFA1160C7F41BD03FF BE0A409923FA63FFDAED9DA4C28943FFF4E41DA6F571F40007FAD852F64A440014DB61 BF4C9E5400225A680F774B24002D916CCA85D5540039D575ADDEAB840044AFE2FCAB08 54004EB771406BE7640057F8D521E07CA400608AFC412824C400689AC88BB63454006F 04B648DDDE14007463B6D8644E3400790986DAEC6C44007C83D3C1FC94F4007EA0ED1E F974D4007F6CE12EC348D4007FE194A50581C4007FFFFFE2822004007FE11C65E4A064 007F6F42EA2CED84007EA9D5DB89C164007C4A856FC099A400792FC9632F308400749B 63A923E6F4006EDDAE1443A29400681137135CB8D40060D70CA180E8840058780A35D6 1824004EEB7CBD686B34004490C4F2AF031400391EBBA3D25A44002E6FEC28E5A32400 21D0919C2AA6E400149780C654083400076A7AFF7D6E23FFF64F6E7D132063FFD89A63 4B46B3D3FFBF1FA4B8B93823FFA14ED217583003FF86E9D111BC6613FF6A1F96599B60 63FF4F07D4C0441213FF334244026B0433FF1A5631439A05C3FF00370A8F394023FECC 1D89229FCCC3FEA067CA10C22AA3FE734E9889730A43FE4733BC21605A03FE1EA8B347 5CA263FDF403113B19CF83FDA8C52F49BD1773FD6AD169525B36B3FD2EA85A925082D3 FCFAFC9471E5F543FC9B07A3AF6785A3FC4B8C9C7D82A063FC03579028DF20E3FB8E1F F6955F6143FB249D7CDBA99763FAA3686D597DC863FA1CB5B0EBFAC773F96D14FD93EA 56A3F8C4239FFB5A9583F7CFB5A032E4F3E3F6B16471768E67E3F51E50210FEA8703F2 ABAA45C3EA7F83EAFA117C83F8A4CBF024E7DA9DC20A1BF4155652B9D9C42BF5FC885E 6A803AEBF750A061B64B445BF83F91380E1C444BF920CF1DE321689BF9D0E1BDB45777 0BFA5D7F402FCDA17BFAF27E247AC9D76BFB517C31B1D7965BFBC4AF7E7F6A8A4BFC23 6A490F323C4BFC73291FE54D68CBFCC5AA1F8C038A1BFD16443EBAA9DDFBFD4D5CD17A E2282BFD8A0707D79EBD4BFDCF6DB0CF20D6EBFE0A5A9864B7BE7BFE306A817C2A40FB FE5D5B4EECD9524BFE888B005A90E86BFEB6FE1FE22258FBFEE86612AE6CD08BFF0BC5 7FD9C1C39BFF25B235871DAD2BFF401C582302AA4BFF5CF7E5A632E8BBFF76CFF7F04F DCBBFF94E5C4FF6D07FBFFB0216944F905ABFFCAFF5E4E973B3BFFE7A06AA9B68A0C00 01F4A3D1733B8C000E8A9B7A27E97C001B87B08EB2E58C0027C068F4748D3C00346738 BF5BA99C003EC746E269903C0049F5DBCDD2B98C0053AF379CAFC14C005C7F41C4897E CC006471A4C62EE5EC006B98577B0EE1CC0072118E4045EDBC0076F5FB78C9CA0C007A C75A262BF8BC007DB88868407E2C007F76592D7AB70C00800000000000000000000000 000003F0C55D59FEDFAA23F37221C7333E13C3F54637FC8B99DFC3F68C226649D25BF3 F7865E9B9576A863F846367174B7F6A3F8FFC9540585C683F97E432F9D602D83FA0F42 AE213A84E3FA753A81DC55C383FAE0AA2068ACB6F3FB37429D3F51D743FB8A1F59F954 B503FBE5635F4BC635A3FC2116BF8BF57893FC5E7656CF05BBC3FC97BB0A98F3EBE3FC E06025E0337083FD12FD4A97FFD803FD3BF17C0CECB433FD658503771167C3FD936D4F 63C78F93FDBFB2766E86B1E3FDF1842B55431E13FE13A4C9B27636A3FE2BC6214ED456 23FE4677BC3EF700A3FE62969ADE89D7D3FE7E7A0A5F78DA93FE99A9C6EEC67DD3FEB7 E5C61D486543FED2F07004084DB3FEEF7F884D43A993FF047858D4C38463FF120DA34A 45F9F3FF1E71D666401203FF2AE9122A577B63FF3689B08AD55653FF4208E78531E593 FF4C60E155D74563FF5624AC81CD4463FF5EF2B33ACE29E3FF6636C7C29CE3D3FF6D83 67A070A293FF731128C69AE603FF77EF0CADAD85F3FF7B8A84B9012AB3FF7E5038408B 1E23FF7FA618D41F0D73FF7FF4B9DE7E95A3FF7F1D5E2F260DA3FF7CFA0DA8029433FF 7A1F2FD3E70F73FF75C0A6FACA9F33FF706E6B2B3A2AC3FF6A1200E6A17233FF62BD45 8A03B0C3FF5ACF33B66230C3FF51514565D20623FF4771AA7F30C783FF3C40F7F06E19 C3FF317BEEC9A7F453FF24F418FEE43543FF1869CA4A2F2603FF0B760C3A5F0663FEFB 19E39A198D73FEE0F2DA55D55843FEC5CD2EA8C42C63FEA797BCE9251CE3FE8C3399D9 3FF363FE70516DC6B8DBA3FE5442C505483E63FE3AE07B8ED82293FE206314F6A823F3 FE06CFF8E188BF63FDD8C517907C2673FDABF18C02B3E763FD7A934F09862C63FD505F C2FA4B0413FD28F674728DBF13FD0152335BEE4A43FCB8F96055A91373FC7B41344196 0F83FC3F555AA34FDB63FC0A771B70FF45F3FBAEC17ACCA6CCD3FB60A0DCE5BECB83FB 125957A7917F83FAA705DDA3956B33FA3E12E47E05D1C3F9CE960BEE6D69A3F94059A2 BA372C93F898AA5CC8CA23E3F7F74065BD0976A3F71B7C942DBFC803F6067F234AB3FF F3F472F64FF20D6383F26DC63D604A29D3F08CB286DF038FE3ED2A49C97DBB83CBD51C B9DDCC90151BED31395FCB0A833BF08319CCB15E21ABF25FEE8B7C5264ABF49754CCF5 3773CBF5FC21918FDF6D6BF71384DEC5CB840BF7FE18C22DDFECEBF8A6FB26F31AA9AB F93BC1D6A08B68ABF9C5D71F2386662BFA3C0FC0A7A32B2BFAA85CA07239BF9BFB16B2 1188DBE58BFB5AD5489CB1887BFBB2A97D9AF51ACBFC0B836678D859EBFC41BDA20E68 00EBFC78005E6F5A88DBFCBEB4FBE1A22C9BFCFFC8415DA4761BFD28A6010F3DD13BFD 4F3D4691DA8C6BFD7C286621530C6BFDA947A6F057310BFDDA9AFE7C87C80BFE04DCE4 0615182BFE1F22F22BF88AEBFE3B3AF3B4077A7BFE5439AEDF1F070BFE6FA517412237 ABFE8C46BA3B4ACC6BFEA86B55BD0EA68BFEC39D20E4E6EA6BFEE1937D9972CD0BFEFC 1E24779E6CCBFF0BEFEB0B92FFCBFF182CE74791B1DBFF251A43074C882BFF30C1CBB0 FD2DDBFF3C54FF26C8479BFF46F965B8854A9BFF51531A3E56B48BFF5A75A5A41F870B FF62E3E2F584440BFF6A48558227D7EBFF702E2DF7D68AEBFF75D6E427D77EFBFF79DE D734512E4BFF7D1122CD8709DBFF7F0A803881565BFF7FF92F587B246BFF7FB4475C34 799BFF7E30B25CCC53CBFF7BB36C308F280BFF77C9309092710BFF736DF4FCF6893BFF 6D65D12B68BE0BFF6687919550EB0BFF5EB0F204B55F0BFF55F75CF8AF63EBFF4CC76B 40F8A8DBFF4206D9D31B64CBFF370E2B151BC46BFF2AD3597B12D3ABFF1F3909A89A69 BBFF11E54CD64E3CCBFF04B7F6AE62F6BBFEEE8377BE5AEE7BFED1E61547F886CBFEB7 42E135C164CBFE9BDC532E4EA44BFE7DA773BDFB9FCBFE6283BC474F9C4BFE472041D2 370D8BFE2BCEF00C70C40BFE134DCEF4FEBDBBFDF3E620E49C692BFDC360B443A8C3DB FD91B5E2EA5C15EBFD67FC9CD10A90CBFD3A7E32C55B0B9BFD1404ADA3C3B21BFCE0F0 761FBA319BFC9A4353B8EEECCBFC597388FBE6ADDBFC23E4233782891BFBE14DB0618C 46EBFB886003FCBEC1BBFB34124063ABA97BFAE9EACCA2CA968BFA6E77E224ED176BFA 0E4085E52BBE0BF9812E3A199B1A1BF905F121ACD1A8BBF84C31E75302D84BF7752EF5 4172A5FBF684CEDE9F655BABF55485EB2C79EFFBF38812EAFB8FF5CBF06703A8059D2F C3A506800A539D92D-F+6&F-F0F.F.-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!3FF00 00000000000C00800000000000000000000000000000000000000000000-F+6&F-F.F. F.-%*LINESTYLEG6#\"\"#-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!3FEF4CFC32755 B12C00675F449A49FEE3FDA9CD9AC6F8F4E3F8B9C05B67694CAF;F=-F$6%X0F'F(F)[g l'\"%!!!#%\"#\"#!!!!3FED3BC3AF076322C0024C447F8BD15A3FEA07F920F144DA3F B9D6B6DA29FF18F;F=-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!3FE9E3779B8DA7AEB FF96A99B4D009763FF2CF230491E0123FD37EC43BAB3D35F;F=-F$6%X0F'F(F)[gl'\" %!!!#%\"#\"#!!!!3FE5698496CC3684BFECC2D09EAB8BBB3FF7C7D7A836DA213FE3B3 257BA27E3EF;F=-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!3FE0000000000000BFD80 000000000003FFBB67AE875ED0F3FEF2D4A4584AAB0F;F=-F$6%X0F'F(F)[gl'\"%!!! #%\"#\"#!!!!3FD3C6EF3691DEFBBFB6A99B45B36BE73FFE6F0E13607C643FF4A54E7B D2CE07F;F=-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!3FBAC26099A81A2BBF6C1176B 644E9F83FFFD31F950A827F3FF79B94676F69B4F;F=-F$6%X0F'F(F)[gl'\"%!!!#%\" #\"#!!!!BFBAC26099A81A2B3F6C1176B644E9F83FFFD31F950A827F3FF79B94676F69 B4F;F=-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!BFD3C6EF3691DEFB3FB6A99B45B36 BE73FFE6F0E13607C643FF4A54E7BD2CE07F;F=-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"# !!!!BFE00000000000003FD80000000000003FFBB67AE875ED0F3FEF2D4A4584AAB0F; F=-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!BFE5698496CC36843FECC2D09EAB8BBB3 FF7C7D7A836DA213FE3B3257BA27E3EF;F=-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!! BFE9E3779B8DA7AE3FF96A99B4D009763FF2CF230491E0123FD37EC43BAB3D35F;F=-F $6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!BFED3BC3AF07632240024C447F8BD15A3FEA0 7F920F144DA3FB9D6B6DA29FF18F;F=-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!BFEF 4CFC32755B12400675F449A49FEE3FDA9CD9AC6F8F4E3F8B9C05B67694CAF;F=-F$6%X 0F'F(F)[gl'\"%!!!#%\"#\"#!!!!BFF00000000000004008000000000000000000000 00000000000000000000000F;F=-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!BFEF4CFC 32755B12400675F449A49FEEBFDA9CD9AC6F8F4EBF8B9C05B67694CAF;F=-F$6%X0F'F (F)[gl'\"%!!!#%\"#\"#!!!!BFED3BC3AF07632240024C447F8BD15ABFEA07F920F14 4DABFB9D6B6DA29FF18F;F=-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!BFE9E3779B8D A7AE3FF96A99B4D00976BFF2CF230491E012BFD37EC43BAB3D35F;F=-F$6%X0F'F(F)[ gl'\"%!!!#%\"#\"#!!!!BFE5698496CC36843FECC2D09EAB8BBBBFF7C7D7A836DA21B FE3B3257BA27E3EF;F=-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!BFE0000000000000 3FD8000000000000BFFBB67AE875ED0FBFEF2D4A4584AAB0F;F=-F$6%X0F'F(F)[gl' \"%!!!#%\"#\"#!!!!BFD3C6EF3691DEFB3FB6A99B45B36BE7BFFE6F0E13607C64BFF4 A54E7BD2CE07F;F=-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!BFBAC26099A81A2B3F6 C1176B644E9F8BFFFD31F950A827FBFF79B94676F69B4F;F=-F$6%X0F'F(F)[gl'\"%! !!#%\"#\"#!!!!3FBAC26099A81A2BBF6C1176B644E9F8BFFFD31F950A827FBFF79B94 676F69B4F;F=-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!3FD3C6EF3691DEFBBFB6A99 B45B36BE7BFFE6F0E13607C64BFF4A54E7BD2CE07F;F=-F$6%X0F'F(F)[gl'\"%!!!#% \"#\"#!!!!3FE0000000000000BFD8000000000000BFFBB67AE875ED0FBFEF2D4A4584 AAB0F;F=-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!3FE5698496CC3684BFECC2D09EA B8BBBBFF7C7D7A836DA21BFE3B3257BA27E3EF;F=-F$6%X0F'F(F)[gl'\"%!!!#%\"# \"#!!!!3FE9E3779B8DA7AEBFF96A99B4D00976BFF2CF230491E012BFD37EC43BAB3D3 5F;F=-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!3FED3BC3AF076322C0024C447F8BD1 5ABFEA07F920F144DABFB9D6B6DA29FF18F;F=-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#! !!!3FEF4CFC32755B12C00675F449A49FEEBFDA9CD9AC6F8F4EBF8B9C05B67694CAF;F =-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!3FF0000000000000C00800000000000000 000000000000000000000000000000F;F=-%(SCALINGG6#%,CONSTRAINEDG-%+AXESLA BELSG6%Q!F)F\\s-%%FONTG6#%(DEFAULTG-%*AXESSTYLEG6#%%NONEG-%%VIEWG6$F`s F`s" 1 2 0 1 10 0 2 9 1 1 1 1.000000 45.000000 45.000000 0 0 "Curve 1 " "Curve 2" "Curve 3" "Curve 4" "Curve 5" "Curve 6" "Curve 7" "Curve 8 " "Curve 9" "Curve 10" "Curve 11" "Curve 12" "Curve 13" "Curve 14" "Cu rve 15" "Curve 16" "Curve 17" "Curve 18" "Curve 19" "Curve 20" "Curve \+ 21" "Curve 22" "Curve 23" "Curve 24" "Curve 25" "Curve 26" "Curve 27" "Curve 28" "Curve 29" "Curve 30" "Curve 31" "Curve 32" "Curve 33" }}}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "with(plots):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 52 "a:=0:b:=2*Pi:n:=30:\nx0:=t->2*cos(t ):\ny0:=t->sin(t):\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 282 "x: =t->simplify(\nx0(t)-D(y0)(t)*(D(x0)(t)^2+D(y0)(t)^2)/(D(x0)(t)*(D@D)( y0)(t)-D(y0)(t)*(D@D)(x0)(t))):\ny:=t->simplify(\ny0(t)+D(x0)(t)*(D(x0 )(t)^2+D(y0)(t)^2)/(D(x0)(t)*(D@D)(y0)(t)-D(y0)(t)*(D@D)(x0)(t))):\nc: =plot([[x0,y0,a..b],[x(t),y(t),t=0..b]],color=[blue,red],linestyle=[1, 2]):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 94 "d:=plot([seq([[x0(t ),y0(t)],[x(t),y(t)]],t=seq(a+k*(b-a)/n,k=0..n))],color=black,linestyl e=2):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 "display(c,d,scalin g=constrained,axes=none);" }}{PARA 13 "" 1 "" {GLPLOT2D 378 384 384 {PLOTDATA 2 "6G-%'CURVESG6%X0%)anythingG6\"6\"[gl'\"%!!!#[dl\"cw\"#!!! !40000000000000003FFFFB87D0C320EE3FFFF05F679EA1A43FFFDBC172F08C153FFFB E65639EEB7C3FFF98A242CF0C513FFF6E0B7F7125833FFF3A4DE61DCA183FFEFCAB03E 8427A3FFEB711B54F97773FFE670DA7790B863FFE19911D7EA9C93FFDBA90DA9B67E93 FFD52FE517D43013FFCE78786ECBB483FFC7F8685D948B63FFBFC07566FC7843FFB861 6D94936133FFAF57BCAD4D53D3FFA6EF4930186353FF9D473B32074F93FF93AC26E92F 46C3FF893BAE8020AD23FF7F47F0AC89E643FF742A195748F883FF6835BB16E2A3E3FF 5D79BC85F1FA43FF518CE24A135173FF44E178F06372C3FF3827A3A5F7F173FF2B8ACF C8FDFC73FF1D351B162A0003FF100B2327A3C423FF01B4D95597A713FEE8F3D027414B D3FECB8873FD0ED0A3FEAF69007ED13A93FE9195C60E403503FE7407DA1D7DFD73FE54 B400724EEF83FE3630058C0D8A23FE16AA13420A3393FDEE3C48AFFFA6F3FDB3D0A966 C27B93FD7066E1CE5BE693FD33C0B12F8A7E23FCE59146E819D083FC68BB809AA3B493 FBBB746BADFE2AC3FA94958FF3A4C8CBF91E861FD9DEBC9BFB413862FA16336BFC28F0 DD303BF95BFC9E4FC60FF4AEFBFD11C7B5AF81097BFD51DB9394B4699BFD918E36E9AE A4CBFDD09EA7EB58E09BFE0662B4F00EE3EBFE26A08272C37B8BFE450FF533F49C0BFE 64C08BD43B2E6BFE811BCBC154ED1BFEA00D220C099EFBFEBD44D62CA16BDBFED9FA00 EA67990BFEF776994CFF959BFF09126FBC24D31BFF167BE7A4FC7B3BFF24FB9B25B219 FBFF31D100F5ED821BFF3EA39809AE42ABFF4B5A555416AFCBFF56BCDE3726FC8BFF62 8B4A5F644E3BFF6DE9BBB14A586BFF79ADA9ABD88D3BFF83B5ED7B81CC1BFF8EDDB6EC 3A0FFBFF988964E102E4EBFFA1B9D8C1BD6BDBFFAB2D38F017CBDBFFB434E1CA72D08B FFBC03C16E67B53BFFC3DF83503340FBFFCB1AB3F300FAABFFD272466F0DD03BFFD860 4E4AA7C63BFFDEB2155A9BD88BFFE426C399F477ABFFE91608812B3EFBFFED8D9A7622 F82BFFF19E715A97328BFFF56228E5F0F35BFFF856AB6606848BFFFAC971222AD2ABFF FCE2F3E20B95ABFFFE7245E9C2FB3BFFFF63C7F6AA4ADBFFFFF27A989A3E1BFFFFF245 245DFEBBFFFF67C00397BB7BFFFE58A4BBAC5A6BFFFCF429DB164D3BFFFAE2B173F124 8BFFF844C9D53DF9DBFFF5225EB347081BFFF1C2389E7116BBFFEDCA6A74D3E99BFFE9 2F60982D9F9BFFE4174BA24C6C7BFFDE551B8AC4CDDBFFD8D45E2657FCCBFFD2286B16 ACEF0BFFCAF52BA0F92D6BFFC38D14C91004BBFFBC6F02102C066BFFB37E59E1C0D64B FFAB85B4428141BBFFA1CCCBDC3BF1EBFF98CC84D2D3365BFF8E81961F58AA5BFF844F 29624F313BFF7944D783C7518BFF6EC79C68305EBBFF6319AF2429382BFF5694707BBD 4D7BFF4B5E6D1006E90BFF3EF2328A6F9DDBFF31C82189AAE51BFF24975F74AF879BFF 178C488679721BFF08C1D03E53A97BFEF6683CA17095BBFED8F1C4D0F1E0CBFEBDCEFD 158253ABFE9FB1B9A0804EDBFE82F5A57D066B2BFE648A043F2C6CFBFE46726D3093E5 1BFE269A99FC7376ABFE07A364D72962ABFDCF6792A638B29BFD8F96AAA32DE77BFD54 96B6821ADD0BFD109CA866F4B55BFCA719AB5B5D909BFC247939DDB3DB9BFB4E543F5A D286BBF8BD8A09E9423003FA734CEAD5B02D93FBCB5E9ED36EC6B3FC6232A26880CD13 FCEA03BA134DFFB3FD2F627A869FD453FD718FB165667FD3FDB11BDE5362CCD3FDF02E 833ABD8563FE1743BABA941D33FE34F3BAA2055E03FE54B9D1B3AC74D3FE72AB6970D8 8A33FE91CB486E83EDB3FEAD98D045620763FECBE1D5CFDF5393FEE86CFA043B4C63FF 02358E7EDF1703FF108E8EE8838573FF1D83549F175EB3FF2A831EA8E6E893FF388873 C21E94A3FF44EA05BC46FD83FF51415461D81833FF5D75D0132CB043FF685C63E16E74 E3FF73A25868F049E3FF7E7511EEE11673FF899EF84216ADF3FF931B842101E003FF9D 9DD7C5E697A3FFA6B0726A3BE543FFAF4613268A4233FFB80F64D90E6863FFC068C3FA 1A28D3FFC79622C1F2C4D3FFCEC37F0CA0DDB3FFD551C9F0B0AE93FFDBEB1DB44E4933 FFE13252AB209543FFE6C228D9406743FFEB7E6E386B97D3FFEFB5407D3FDC63FFF372 97E413C8F3FFF6C3FE4C40EAF3FFF9BB594CDFC953FFFBF35EEA1168F3FFFDAB38A339 5B33FFFEFC2AA0CF3FE3FFFFC2CAFC3D5A3400000000000000000000000000000003FA 0E91C833BDE943FAF9C2BCFC0A2883FB80DFE12553B993FC02AB2A2ECC2CB3FC445039 E94C6F93FC80DF45C4C7F223FCBF3604322A5913FCFF3A01861A9C33FD1F416A277C2E B3FD3F7ECD8842E273FD5B9B10E1A6A913FD7AE648F85DBB63FD99EA1CEC079B63FDB7 62BF62C812A3FDD1C4B4C801CB93FDF0A355F405C973FE052B1DE778F403FE13D6EC89 0354A3FE2090D95F4DD033FE2E3BC6E0639F13FE3AF2CED99903D3FE47E3C8466DA303 FE53783CDAB5F4F3FE5F9F155C110193FE6BDBB758A85443FE762E243356A923FE80F8 F189461413FE8BB90656B29713FE95D62C2E3BE713FE9F3BA663393543FEA934E86DFB 66D3FEB1BF31AB088C03FEBA6A57F2ECAB73FEC1DC8CB2D0B893FEC98C9E22DA3463FE D0580E13A52073FED6FC058C38F0A3FEDD0391491AF343FEE2D45B540FD2E3FEE7F1D0 28808F23FEECAD4A67921913FEF0DE0D699624E3FEF445E3683DA503FEF7A5F00A3255 33FEFA2FADE95E85A3FEFC63BDFBBB31E3FEFE02B2CDF3DE33FEFF3FD0E5EC91F3FEFF D807EA429F63FEFFFAFD39E34E23FEFF9B3276893DA3FEFEA71DF5D03E33FEFD5FC08F 40A433FEFB678A2C1EA383FEF8FC231B9835D3FEF60FD386E00A23FEF2A67411A96483 FEEEE810FA75FDE3FEEA597FA56CD383FEE584944E896433FEDFEC4269A97423FEDA69 7FBEA18F83FED3D5B0754EA383FECD0FCC6CD72E13FEC5D9CE3707C053FEBDD7942B35 C0C3FEB60AC2E42BEF63FEADA3E0F9BB4E43FEA3E30FB2E1EDA3FE9AA25098C3FDF3FE 90C40648C19063FE8651C7FD772F03FE7C5C873CA40333FE716197019429C3FE661F56 5CAE82B3FE59B12F6C845093FE4E66D1047A0493FE41038809709A33FE349CD6B33BB6 C3FE280E46F9F171F3FE1A3F9160BC8A13FE0C14EDFA3333D3FDFDE1D9F1A2E6D3FDE1 79C521F42343FDC5496CB00D9063FDA63D93DA50C383FD8AFE07DCE84783FD6B49A5D6 FF99D3FD4D1D707EE67BB3FD2EE94D122F0253FD106441C4EBDA73FCE1FC71E19AD3E3 FC9EE548B6D52693FC60F7A79398BBB3FC238209B5DCCE73FBC30672DA8D9843FB3ED8 E95E511D33FA8FD74B0C348213F8D6A84DCC3F5EEBF8DA4708CF33D03BFA8ABB681620 FC4BFB48F1B220A99DDBFBBE24CD4F9A57CBFC20C03E2AF21D8BFC628F7F66EBF2FBFC A3AF4C3A47BD2BFCDFABEB0498D3ABFD0EA9FF71DAC42BFD2E456D5B8766DBFD4D7750 B346B51BFD6D323A0F26D1FBFD88D107CFCD197BFDA78357A2ED0D0BFDC5E15B8B8C8D 2BFDE2AEBA1ADC597BFDFC6B8C8271983BFE0D3D0D249A879BFE19B9795FF9DBABFE27 F38865DC20ABFE3443E6BE1B93DBFE4175DF0A78BC8BFE4DB4D51468C17BFE5A2391AD B13E7BFE653C152A2BF84BFE70D8B5A538092BFE7C80F153D8607BFE864E4E80C55E2B FE90857AC8DAB06BFE9AA8EC125F5EBBFEA428EE61BCE4EBFEACF2D95282259BFEB63B 82516116ABFEBE23CC9C1139DBFEC61EB2B10C941BFECCEE6B2C0B7B4BFED3EA005B53 B58BFEDA0911026E1EDBFEDFF663C17C597BFEE5491BA96A4BFBFEEA5A62D3D9FDFBFE EEBD73EE8FD24BFEF2B88B53B27CEBFEF628EF05E4EF9BFEF8DEC7F1DEA8EBFEFB719A 50816CBBFEFD42DA12F6B57BFEFEB16DEA356EBBFEFF92CC5E7CDB0BFEFFFCF89483ED 6BFEFFDE56643923CBFEFF31C35A75005BFEFE150482E6A71BFEFC52AC67B5FEBBFEFA 59DCA36D754BFEF79858AC75404BFEF46B7C7E267BBBFEF0BF0365CDC5FBFEEC9789C5 E7570BFEE823F84E184E2BFEE2D3549979AB6BFEDD475CE7A7C8BBFED6F09CAB1E80EB FED0C3989E58E10BFEC9762A2537E41BFEC201298EB0441BFEBA1F4602E054BBFEB16C A8BD43F4ABFEA90065DC6E6CBBFE9FF96065B232FBFE958BA2BF5E0D6BFE8BB201396E DC5BFE813B23BDD1D02BFE7631CE4B0915ABFE6BB56DB8AA074BFE602E8D3619C43BFE 5465BDEEC987ABFE476C90721B806BFE3BABD8DCDAB0BBFE2DC5341E8C39BBFE20ECDD 56D7ED5BFE13F2891A2F051BFE05B53FCBD4714BFDEE42792681762BFDD344BE874532 4BFDB62654FCD3E3ABFD994ECBE78A816BFD7999E47039BC1BFD5DD26E56E7096BFD3D 8DF7DD2E782BFD1EE62CCBA7FE6BFD004317C409F42BFCC2B50F14D778FBFC8335E90D 62012BFC3F7B81D974E4DBFC011064916D9E7BFB866B735956D88BFB01C8220DA6F84B F9F4A5313D203693E0C306F72CECE67-%'COLOURG6&%$RGBG$\"\"!F/F.$\"*++++\"! \")-%*LINESTYLEG6#\"\"\"-F$6%X0F'F(F)[gl'\"%!!!#adl\"fw\"#!!!!3FF80000 000000003FF7F5F2FD387C813FF7DCE7D23030CA3FF7AECF7D7B1EDD3FF76D91EF26DF 7C3FF71A592F94CA523FF6BD6AD56C304B3FF64DD53B41ECB13FF5CAC79E00AB2B3FF5 393984B6B8BE3FF49509EE598F083FF3F93A5B6658FC3FF33E6DCB3E0C883FF278059E 2C89803FF1AFDDFE1F7E663FF0F39D35D6523C3FF00D299C41953E3FEE8B151AC534CC 3FECB37C52CD03A53FEB0E24032702B23FE93E79EB4EA27E3FE7863FC1B9EBCC3FE5BF 015300FB333FE422EF8623DE7C3FE26F485186E1F93FE0B6F5B397873C3FDE87686420 03083FDB8256BF20AB183FD886C04070A3763FD5C170AB0CAA0D3FD339403913423E3F D097FE7242EA903FCCCD09667F878A3FC87BAF403DAEED3FC4E713429993473FC15A21 E17F594C3FBCB6EEBB7BCD543FB7294E9ABFD2723FB26A31F75CE17E3FAC4984F0E99D A43FA558CDB09A964B3F9EF49151DE2E2C3F959668EE03742A3F8D9A68F3009CD63F81 E196E928D83D3F74D91EA71EBD213F6478B5BFF88ED43F50C99BDDD6FF2C3F2F2FFA3F B081163EF7AF25DF128459BEB0D31722701A93BF17B4E6D6F07D53BF42BA2568BB49C2 BF596F1302DEB332BF6D5B23990C0AF4BF7B95988A135BF4BF8727FFCD4A7B86BF91EF 492771A21EBF99D753236A1676BFA24AF17F7CA230BFA89148EF410286BFB03CEA06E9 1ABCBFB46D06F2B9E320BFB9C1704E014796BFBF925D19114D74BFC30A4BF5FFA20BBF C6D1C60771388BBFCAA49B218C0100BFCEE530EF34DC28BFD1FCFB290112B4BFD47503 8927560EBFD723C56367348ABFDA0585C70392BBBFDCCC08235D8DB4BFDFE0699EA353 F4BFE1857043795F47BFE3442A6C2CDCF2BFE4D7BD07A48766BFE6B1AF718CE7E2BFE8 62960510B736BFEA1160C7F41BD0BFEBE0A409923FA6BFEDAED9DA4C2894BFEF4E41DA 6F571FBFF07FAD852F64A4BFF14DB61BF4C9E5BFF225A680F774B2BFF2D916CCA85D55 BFF39D575ADDEAB8BFF44AFE2FCAB085BFF4EB771406BE76BFF57F8D521E07CABFF608 AFC412824CBFF689AC88BB6345BFF6F04B648DDDE1BFF7463B6D8644E3BFF790986DAE C6C4BFF7C83D3C1FC94FBFF7EA0ED1EF974DBFF7F6CE12EC348DBFF7FE194A50581CBF F7FFFFFE282200BFF7FE11C65E4A06BFF7F6F42EA2CED8BFF7EA9D5DB89C16BFF7C4A8 56FC099ABFF792FC9632F308BFF749B63A923E6FBFF6EDDAE1443A29BFF681137135CB 8DBFF60D70CA180E88BFF58780A35D6182BFF4EEB7CBD686B3BFF4490C4F2AF031BFF3 91EBBA3D25A4BFF2E6FEC28E5A32BFF21D0919C2AA6EBFF149780C654083BFF076A7AF F7D6E2BFEF64F6E7D13206BFED89A634B46B3DBFEBF1FA4B8B9382BFEA14ED21758300 BFE86E9D111BC661BFE6A1F96599B606BFE4F07D4C044121BFE334244026B043BFE1A5 631439A05CBFE00370A8F39402BFDCC1D89229FCCCBFDA067CA10C22AABFD734E98897 30A4BFD4733BC21605A0BFD1EA8B3475CA26BFCF403113B19CF8BFCA8C52F49BD177BF C6AD169525B36BBFC2EA85A925082DBFBFAFC9471E5F54BFB9B07A3AF6785ABFB4B8C9 C7D82A06BFB03579028DF20EBFA8E1FF6955F614BFA249D7CDBA9976BF9A3686D597DC 86BF91CB5B0EBFAC77BF86D14FD93EA56ABF7C4239FFB5A958BF6CFB5A032E4F3EBF5B 16471768E67EBF41E50210FEA870BF1ABAA45C3EA7F8BE9FA117C83F8A4C3EF24E7DA9 DC20A13F3155652B9D9C423F4FC885E6A803AE3F650A061B64B4453F73F91380E1C444 3F820CF1DE3216893F8D0E1BDB4577703F95D7F402FCDA173F9F27E247AC9D763FA517 C31B1D79653FAC4AF7E7F6A8A43FB236A490F323C43FB73291FE54D68C3FBC5AA1F8C0 38A13FC16443EBAA9DDF3FC4D5CD17AE22823FC8A0707D79EBD43FCCF6DB0CF20D6E3F D0A5A9864B7BE73FD306A817C2A40F3FD5D5B4EECD95243FD888B005A90E863FDB6FE1 FE22258F3FDE86612AE6CD083FE0BC57FD9C1C393FE25B235871DAD23FE401C582302A A43FE5CF7E5A632E8B3FE76CFF7F04FDCB3FE94E5C4FF6D07F3FEB0216944F905A3FEC AFF5E4E973B33FEE7A06AA9B68A03FF01F4A3D1733B83FF0E8A9B7A27E973FF1B87B08 EB2E583FF27C068F4748D33FF346738BF5BA993FF3EC746E2699033FF49F5DBCDD2B98 3FF53AF379CAFC143FF5C7F41C4897EC3FF6471A4C62EE5E3FF6B98577B0EE1C3FF721 18E4045EDB3FF76F5FB78C9CA03FF7AC75A262BF8B3FF7DB88868407E23FF7F76592D7 AB703FF80000000000008000000000000000BF1C55D59FEDFAA2BF47221C7333E13CBF 64637FC8B99DFCBF78C226649D25BFBF8865E9B9576A86BF946367174B7F6ABF9FFC95 40585C68BFA7E432F9D602D8BFB0F42AE213A84EBFB753A81DC55C38BFBE0AA2068ACB 6FBFC37429D3F51D74BFC8A1F59F954B50BFCE5635F4BC635ABFD2116BF8BF5789BFD5 E7656CF05BBCBFD97BB0A98F3EBEBFDE06025E033708BFE12FD4A97FFD80BFE3BF17C0 CECB43BFE658503771167CBFE936D4F63C78F9BFEBFB2766E86B1EBFEF1842B55431E1 BFF13A4C9B27636ABFF2BC6214ED4562BFF4677BC3EF700ABFF62969ADE89D7DBFF7E7 A0A5F78DA9BFF99A9C6EEC67DDBFFB7E5C61D48654BFFD2F07004084DBBFFEF7F884D4 3A99C00047858D4C3846C00120DA34A45F9FC001E71D66640120C002AE9122A577B6C0 03689B08AD5565C004208E78531E59C004C60E155D7456C005624AC81CD446C005EF2B 33ACE29EC006636C7C29CE3DC006D8367A070A29C00731128C69AE60C0077EF0CADAD8 5FC007B8A84B9012ABC007E5038408B1E2C007FA618D41F0D7C007FF4B9DE7E95AC007 F1D5E2F260DAC007CFA0DA802943C007A1F2FD3E70F7C0075C0A6FACA9F3C00706E6B2 B3A2ACC006A1200E6A1723C0062BD458A03B0CC005ACF33B66230CC0051514565D2062 C004771AA7F30C78C003C40F7F06E19CC00317BEEC9A7F45C0024F418FEE4354C00186 9CA4A2F260C000B760C3A5F066BFFFB19E39A198D7BFFE0F2DA55D5584BFFC5CD2EA8C 42C6BFFA797BCE9251CEBFF8C3399D93FF36BFF70516DC6B8DBABFF5442C505483E6BF F3AE07B8ED8229BFF206314F6A823FBFF06CFF8E188BF6BFED8C517907C267BFEABF18 C02B3E76BFE7A934F09862C6BFE505FC2FA4B041BFE28F674728DBF1BFE0152335BEE4 A4BFDB8F96055A9137BFD7B413441960F8BFD3F555AA34FDB6BFD0A771B70FF45FBFCA EC17ACCA6CCDBFC60A0DCE5BECB8BFC125957A7917F8BFBA705DDA3956B3BFB3E12E47 E05D1CBFACE960BEE6D69ABFA4059A2BA372C9BF998AA5CC8CA23EBF8F74065BD0976A BF81B7C942DBFC80BF7067F234AB3FFFBF572F64FF20D638BF36DC63D604A29DBF18CB 286DF038FEBEE2A49C97DBB83C3D61CB9DDCC901513EE31395FCB0A8333F18319CCB15 E21A3F35FEE8B7C5264A3F59754CCF53773C3F6FC21918FDF6D63F81384DEC5CB8403F 8FE18C22DDFECE3F9A6FB26F31AA9A3FA3BC1D6A08B68A3FAC5D71F23866623FB3C0FC 0A7A32B23FBA85CA07239BF93FC16B21188DBE583FC5AD5489CB18873FCB2A97D9AF51 AC3FD0B836678D859E3FD41BDA20E6800E3FD78005E6F5A88D3FDBEB4FBE1A22C93FDF FC8415DA47613FE28A6010F3DD133FE4F3D4691DA8C63FE7C286621530C63FEA947A6F 0573103FEDA9AFE7C87C803FF04DCE406151823FF1F22F22BF88AE3FF3B3AF3B4077A7 3FF5439AEDF1F0703FF6FA517412237A3FF8C46BA3B4ACC63FFA86B55BD0EA683FFC39 D20E4E6EA63FFE1937D9972CD03FFFC1E24779E6CC4000BEFEB0B92FFC400182CE7479 1B1D400251A43074C88240030C1CBB0FD2DD4003C54FF26C847940046F965B8854A940 051531A3E56B484005A75A5A41F87040062E3E2F5844404006A48558227D7E400702E2 DF7D68AE40075D6E427D77EF40079DED734512E44007D1122CD8709D4007F0A8038815 654007FF92F587B2464007FB4475C347994007E30B25CCC53C4007BB36C308F2804007 7C9309092710400736DF4FCF68934006D65D12B68BE04006687919550EB04005EB0F20 4B55F040055F75CF8AF63E4004CC76B40F8A8D4004206D9D31B64C400370E2B151BC46 4002AD3597B12D3A4001F3909A89A69B40011E54CD64E3CC40004B7F6AE62F6B3FFEE8 377BE5AEE73FFD1E61547F886C3FFB742E135C164C3FF9BDC532E4EA443FF7DA773BDF B9FC3FF6283BC474F9C43FF472041D2370D83FF2BCEF00C70C403FF134DCEF4FEBDB3F EF3E620E49C6923FEC360B443A8C3D3FE91B5E2EA5C15E3FE67FC9CD10A90C3FE3A7E3 2C55B0B93FE1404ADA3C3B213FDE0F0761FBA3193FD9A4353B8EEECC3FD597388FBE6A DD3FD23E42337828913FCE14DB0618C46E3FC886003FCBEC1B3FC34124063ABA973FBE 9EACCA2CA9683FB6E77E224ED1763FB0E4085E52BBE03FA812E3A199B1A13FA05F121A CD1A8B3F94C31E75302D843F8752EF54172A5F3F784CEDE9F655BA3F65485EB2C79EFF 3F48812EAFB8FF5C3F16703A8059D2FCBA606800A539D92D-F+6&F-F0F.F.-F46#\"\" #-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!40000000000000003FF800000000000000 000000000000000000000000000000-F+6&F-F.F.F.F<-F$6%X0F'F(F)[gl'\"%!!!#% \"#\"#!!!!3FFF4CFC3259DE323FF675F449A49FEE3FCA9CD9AC6F8F4EBF9B9C05B306 F8CFFBF<-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!3FFD3BC3AEEBE6433FF24C447FA E2D723FDA07F920F144DABFC9D6B6DA29FF18FBF<-F$6%X0F'F(F)[gl'\"%!!!#%\"# \"#!!!!3FF9E3779BA9248D3FE96A99B4C24B063FE2CF23048421A2BFE37EC43BAB3D3 5FBF<-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!3FF5698496B0B9A43FDCC2D09E9DCD 4B3FE7C7D7A8449890BFF3B3257BCBB98EFBF<-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#! !!!3FF00000000000003FC80000000000003FEBB67AE875ED0FBFFF2D4A4584AAB0FBF <-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!3FE3C6EF3691DEFC3FA6A99B454578683F EE6F0E13607C64C004A54E7BB071F0FBF<-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!3 FCAC26099A81A2B3F5C1176C40359E53FEFD31F94FCC40FC0079B94676F69B4FBF<-F$ 6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!BFCAC26099A81A2BBF5C1176C40359E53FEFD3 1F94FCC40FC0079B94676F69B4FBF<-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!BFE3C 6EF3691DEFCBFA6A99B454578683FEE6F0E13607C64C004A54E7BB071F0FBF<-F$6%X0 F'F(F)[gl'\"%!!!#%\"#\"#!!!!BFF0000000000000BFC80000000000003FEBB67AE8 75ED0FBFFF2D4A4584AAB0FBF<-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!BFF569849 6B0B9A4BFDCC2D09E9DCD4B3FE7C7D7A8449890BFF3B3257BCBB98EFBF<-F$6%X0F'F( F)[gl'\"%!!!#%\"#\"#!!!!BFF9E3779BA9248DBFE96A99B4C24B063FE2CF23048421 A2BFE37EC43BAB3D35FBF<-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!BFFD3BC3AEEBE 643BFF24C447FAE2D723FDA07F920F144DABFC9D6B6DA29FF18FBF<-F$6%X0F'F(F)[g l'\"%!!!#%\"#\"#!!!!BFFF4CFC3259DE32BFF675F449A49FEE3FCA9CD9AC6F8F4EBF 9B9C05B306F8CFFBF<-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!C000000000000000B FF800000000000000000000000000000000000000000000FBF<-F$6%X0F'F(F)[gl'\" %!!!#%\"#\"#!!!!BFFF4CFC3259DE32BFF675F449A49FEEBFCA9CD9AC6F8F4E3F9B9C 05B306F8CFFBF<-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!BFFD3BC3AEEBE643BFF24 C447FAE2D72BFDA07F920F144DA3FC9D6B6DA29FF18FBF<-F$6%X0F'F(F)[gl'\"%!!! #%\"#\"#!!!!BFF9E3779BA9248DBFE96A99B4C24B06BFE2CF23048421A23FE37EC43B AB3D35FBF<-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!BFF5698496B0B9A4BFDCC2D09 E9DCD4BBFE7C7D7A84498903FF3B3257BCBB98EFBF<-F$6%X0F'F(F)[gl'\"%!!!#%\" #\"#!!!!BFF0000000000000BFC8000000000000BFEBB67AE875ED0F3FFF2D4A4584AA B0FBF<-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!BFE3C6EF3691DEFCBFA6A99B45457 868BFEE6F0E13607C644004A54E7BB071F0FBF<-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"# !!!!BFCAC26099A81A2BBF5C1176C40359E5BFEFD31F94FCC40F40079B94676F69B4FB F<-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!3FCAC26099A81A2B3F5C1176C40359E5B FEFD31F94FCC40F40079B94676F69B4FBF<-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!! 3FE3C6EF3691DEFC3FA6A99B45457868BFEE6F0E13607C644004A54E7BB071F0FBF<-F $6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!3FF00000000000003FC8000000000000BFEBB 67AE875ED0F3FFF2D4A4584AAB0FBF<-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!3FF5 698496B0B9A43FDCC2D09E9DCD4BBFE7C7D7A84498903FF3B3257BCBB98EFBF<-F$6%X 0F'F(F)[gl'\"%!!!#%\"#\"#!!!!3FF9E3779BA9248D3FE96A99B4C24B06BFE2CF230 48421A23FE37EC43BAB3D35FBF<-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!3FFD3BC3 AEEBE6433FF24C447FAE2D72BFDA07F920F144DA3FC9D6B6DA29FF18FBF<-F$6%X0F'F (F)[gl'\"%!!!#%\"#\"#!!!!3FFF4CFC3259DE323FF675F449A49FEEBFCA9CD9AC6F8 F4E3F9B9C05B306F8CFFBF<-F$6%X0F'F(F)[gl'\"%!!!#%\"#\"#!!!!400000000000 00003FF800000000000000000000000000000000000000000000FBF<-%(SCALINGG6#% ,CONSTRAINEDG-%+AXESLABELSG6%Q!F)F_s-%%FONTG6#%(DEFAULTG-%*AXESSTYLEG6 #%%NONEG-%%VIEWG6$FcsFcs" 1 2 0 1 10 0 2 9 1 1 1 1.000000 45.000000 45.000000 0 0 "Curve 1" "Curve 2" "Curve 3" "Curve 4" "Curve 5" "Curve 6" "Curve 7" "Curve 8" "Curve 9" "Curve 10" "Curve 11" "Curve 12" "Cu rve 13" "Curve 14" "Curve 15" "Curve 16" "Curve 17" "Curve 18" "Curve \+ 19" "Curve 20" "Curve 21" "Curve 22" "Curve 23" "Curve 24" "Curve 25" "Curve 26" "Curve 27" "Curve 28" "Curve 29" "Curve 30" "Curve 31" "Cur ve 32" "Curve 33" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 41 "displa y(c,scaling=constrained,axes=none);" }}{PARA 13 "" 1 "" {GLPLOT2D 575 575 575 {PLOTDATA 2 "6(-%'CURVESG6$X0%)anythingG6\"6\"[gl'\"%!!!#[dl\" cw\"#!!!!3FF00000000000003FEFFB87D0C320EE3FEFF05F679EA1A43FEFDBC172F08 C153FEFBE65639EEB7C3FEF98A242CF0C513FEF6E0B7F7125833FEF3A4DE61DCA183FE EFCAB03E8427A3FEEB711B54F97773FEE670DA7790B863FEE19911D7EA9C93FEDBA90D A9B67E93FED52FE517D43013FECE78786ECBB483FEC7F8685D948B63FEBFC07566FC78 43FEB8616D94936133FEAF57BCAD4D53D3FEA6EF4930186353FE9D473B32074F93FE93 AC26E92F46C3FE893BAE8020AD23FE7F47F0AC89E643FE742A195748F883FE6835BB16 E2A3E3FE5D79BC85F1FA43FE518CE24A135173FE44E178F06372C3FE3827A3A5F7F173 FE2B8ACFC8FDFC73FE1D351B162A0003FE100B2327A3C423FE01B4D95597A713FDE8F3 D027414BD3FDCB8873FD0ED0A3FDAF69007ED13A93FD9195C60E403503FD7407DA1D7D FD73FD54B400724EEF83FD3630058C0D8A23FD16AA13420A3393FCEE3C48AFFFA6F3FC B3D0A966C27B93FC7066E1CE5BE693FC33C0B12F8A7E23FBE59146E819D083FB68BB80 9AA3B493FABB746BADFE2AC3F994958FF3A4C8CBF81E861FD9DEBC9BFA413862FA1633 6BFB28F0DD303BF95BFB9E4FC60FF4AEFBFC11C7B5AF81097BFC51DB9394B4699BFC91 8E36E9AEA4CBFCD09EA7EB58E09BFD0662B4F00EE3EBFD26A08272C37B8BFD450FF533 F49C0BFD64C08BD43B2E6BFD811BCBC154ED1BFDA00D220C099EFBFDBD44D62CA16BDB FDD9FA00EA67990BFDF776994CFF959BFE09126FBC24D31BFE167BE7A4FC7B3BFE24FB 9B25B219FBFE31D100F5ED821BFE3EA39809AE42ABFE4B5A555416AFCBFE56BCDE3726 FC8BFE628B4A5F644E3BFE6DE9BBB14A586BFE79ADA9ABD88D3BFE83B5ED7B81CC1BFE 8EDDB6EC3A0FFBFE988964E102E4EBFEA1B9D8C1BD6BDBFEAB2D38F017CBDBFEB434E1 CA72D08BFEBC03C16E67B53BFEC3DF83503340FBFECB1AB3F300FAABFED272466F0DD0 3BFED8604E4AA7C63BFEDEB2155A9BD88BFEE426C399F477ABFEE91608812B3EFBFEED 8D9A7622F82BFEF19E715A97328BFEF56228E5F0F35BFEF856AB6606848BFEFAC97122 2AD2ABFEFCE2F3E20B95ABFEFE7245E9C2FB3BFEFF63C7F6AA4ADBFEFFF27A989A3E1B FEFFF245245DFEBBFEFF67C00397BB7BFEFE58A4BBAC5A6BFEFCF429DB164D3BFEFAE2 B173F1248BFEF844C9D53DF9DBFEF5225EB347081BFEF1C2389E7116BBFEEDCA6A74D3 E99BFEE92F60982D9F9BFEE4174BA24C6C7BFEDE551B8AC4CDDBFED8D45E2657FCCBFE D2286B16ACEF0BFECAF52BA0F92D6BFEC38D14C91004BBFEBC6F02102C066BFEB37E59 E1C0D64BFEAB85B4428141BBFEA1CCCBDC3BF1EBFE98CC84D2D3365BFE8E81961F58AA 5BFE844F29624F313BFE7944D783C7518BFE6EC79C68305EBBFE6319AF2429382BFE56 94707BBD4D7BFE4B5E6D1006E90BFE3EF2328A6F9DDBFE31C82189AAE51BFE24975F74 AF879BFE178C488679721BFE08C1D03E53A97BFDF6683CA17095BBFDD8F1C4D0F1E0CB FDBDCEFD158253ABFD9FB1B9A0804EDBFD82F5A57D066B2BFD648A043F2C6CFBFD4672 6D3093E51BFD269A99FC7376ABFD07A364D72962ABFCCF6792A638B29BFC8F96AAA32D E77BFC5496B6821ADD0BFC109CA866F4B55BFBA719AB5B5D909BFB247939DDB3DB9BFA 4E543F5AD286BBF7BD8A09E9423003F9734CEAD5B02D93FACB5E9ED36EC6B3FB6232A2 6880CD13FBEA03BA134DFFB3FC2F627A869FD453FC718FB165667FD3FCB11BDE5362CC D3FCF02E833ABD8563FD1743BABA941D33FD34F3BAA2055E03FD54B9D1B3AC74D3FD72 AB6970D88A33FD91CB486E83EDB3FDAD98D045620763FDCBE1D5CFDF5393FDE86CFA04 3B4C63FE02358E7EDF1703FE108E8EE8838573FE1D83549F175EB3FE2A831EA8E6E893 FE388873C21E94A3FE44EA05BC46FD83FE51415461D81833FE5D75D0132CB043FE685C 63E16E74E3FE73A25868F049E3FE7E7511EEE11673FE899EF84216ADF3FE931B842101 E003FE9D9DD7C5E697A3FEA6B0726A3BE543FEAF4613268A4233FEB80F64D90E6863FE C068C3FA1A28D3FEC79622C1F2C4D3FECEC37F0CA0DDB3FED551C9F0B0AE93FEDBEB1D B44E4933FEE13252AB209543FEE6C228D9406743FEEB7E6E386B97D3FEEFB5407D3FDC 63FEF37297E413C8F3FEF6C3FE4C40EAF3FEF9BB594CDFC953FEFBF35EEA1168F3FEFD AB38A3395B33FEFEFC2AA0CF3FE3FEFFC2CAFC3D5A33FF000000000000000000000000 000003FB0E91C833BDE943FBF9C2BCFC0A2883FC80DFE12553B993FD02AB2A2ECC2CB3 FD445039E94C6F93FD80DF45C4C7F223FDBF3604322A5913FDFF3A01861A9C33FE1F41 6A277C2EB3FE3F7ECD8842E273FE5B9B10E1A6A913FE7AE648F85DBB63FE99EA1CEC07 9B63FEB762BF62C812A3FED1C4B4C801CB93FEF0A355F405C973FF052B1DE778F403FF 13D6EC890354A3FF2090D95F4DD033FF2E3BC6E0639F13FF3AF2CED99903D3FF47E3C8 466DA303FF53783CDAB5F4F3FF5F9F155C110193FF6BDBB758A85443FF762E243356A9 23FF80F8F189461413FF8BB90656B29713FF95D62C2E3BE713FF9F3BA663393543FFA9 34E86DFB66D3FFB1BF31AB088C03FFBA6A57F2ECAB73FFC1DC8CB2D0B893FFC98C9E22 DA3463FFD0580E13A52073FFD6FC058C38F0A3FFDD0391491AF343FFE2D45B540FD2E3 FFE7F1D028808F23FFECAD4A67921913FFF0DE0D699624E3FFF445E3683DA503FFF7A5 F00A325533FFFA2FADE95E85A3FFFC63BDFBBB31E3FFFE02B2CDF3DE33FFFF3FD0E5EC 91F3FFFFD807EA429F63FFFFFAFD39E34E23FFFF9B3276893DA3FFFEA71DF5D03E33FF FD5FC08F40A433FFFB678A2C1EA383FFF8FC231B9835D3FFF60FD386E00A23FFF2A674 11A96483FFEEE810FA75FDE3FFEA597FA56CD383FFE584944E896433FFDFEC4269A974 23FFDA697FBEA18F83FFD3D5B0754EA383FFCD0FCC6CD72E13FFC5D9CE3707C053FFBD D7942B35C0C3FFB60AC2E42BEF63FFADA3E0F9BB4E43FFA3E30FB2E1EDA3FF9AA25098 C3FDF3FF90C40648C19063FF8651C7FD772F03FF7C5C873CA40333FF716197019429C3 FF661F565CAE82B3FF59B12F6C845093FF4E66D1047A0493FF41038809709A33FF349C D6B33BB6C3FF280E46F9F171F3FF1A3F9160BC8A13FF0C14EDFA3333D3FEFDE1D9F1A2 E6D3FEE179C521F42343FEC5496CB00D9063FEA63D93DA50C383FE8AFE07DCE84783FE 6B49A5D6FF99D3FE4D1D707EE67BB3FE2EE94D122F0253FE106441C4EBDA73FDE1FC71 E19AD3E3FD9EE548B6D52693FD60F7A79398BBB3FD238209B5DCCE73FCC30672DA8D98 43FC3ED8E95E511D33FB8FD74B0C348213F9D6A84DCC3F5EEBF9DA4708CF33D03BFB8A BB681620FC4BFC48F1B220A99DDBFCBE24CD4F9A57CBFD20C03E2AF21D8BFD628F7F66 EBF2FBFDA3AF4C3A47BD2BFDDFABEB0498D3ABFE0EA9FF71DAC42BFE2E456D5B8766DB FE4D7750B346B51BFE6D323A0F26D1FBFE88D107CFCD197BFEA78357A2ED0D0BFEC5E1 5B8B8C8D2BFEE2AEBA1ADC597BFEFC6B8C8271983BFF0D3D0D249A879BFF19B9795FF9 DBABFF27F38865DC20ABFF3443E6BE1B93DBFF4175DF0A78BC8BFF4DB4D51468C17BFF 5A2391ADB13E7BFF653C152A2BF84BFF70D8B5A538092BFF7C80F153D8607BFF864E4E 80C55E2BFF90857AC8DAB06BFF9AA8EC125F5EBBFFA428EE61BCE4EBFFACF2D9528225 9BFFB63B82516116ABFFBE23CC9C1139DBFFC61EB2B10C941BFFCCEE6B2C0B7B4BFFD3 EA005B53B58BFFDA0911026E1EDBFFDFF663C17C597BFFE5491BA96A4BFBFFEA5A62D3 D9FDFBFFEEBD73EE8FD24BFFF2B88B53B27CEBFFF628EF05E4EF9BFFF8DEC7F1DEA8EB FFFB719A50816CBBFFFD42DA12F6B57BFFFEB16DEA356EBBFFFF92CC5E7CDB0BFFFFFC F89483ED6BFFFFDE56643923CBFFFF31C35A75005BFFFE150482E6A71BFFFC52AC67B5 FEBBFFFA59DCA36D754BFFF79858AC75404BFFF46B7C7E267BBBFFF0BF0365CDC5FBFF EC9789C5E7570BFFE823F84E184E2BFFE2D3549979AB6BFFDD475CE7A7C8BBFFD6F09C AB1E80EBFFD0C3989E58E10BFFC9762A2537E41BFFC201298EB0441BFFBA1F4602E054 BBFFB16CA8BD43F4ABFFA90065DC6E6CBBFF9FF96065B232FBFF958BA2BF5E0D6BFF8B B201396EDC5BFF813B23BDD1D02BFF7631CE4B0915ABFF6BB56DB8AA074BFF602E8D36 19C43BFF5465BDEEC987ABFF476C90721B806BFF3BABD8DCDAB0BBFF2DC5341E8C39BB FF20ECDD56D7ED5BFF13F2891A2F051BFF05B53FCBD4714BFEEE42792681762BFED344 BE8745324BFEB62654FCD3E3ABFE994ECBE78A816BFE7999E47039BC1BFE5DD26E56E7 096BFE3D8DF7DD2E782BFE1EE62CCBA7FE6BFE004317C409F42BFDC2B50F14D778FBFD 8335E90D62012BFD3F7B81D974E4DBFD011064916D9E7BFC866B735956D88BFC01C822 0DA6F84BFAF4A5313D203693E1C306F72CECE67-%'COLOURG6&%$RGBG$\"\"!F/F.$\" *++++\"!\")-F$6$X0F'F(F)[gl'\"%!!!#adl\"fw\"#!!!!C008000000000000C007F 5F2FD387C81C007DCE7D23030CAC007AECF7D7B1EDDC0076D91EF26DF7CC0071A592F9 4CA52C006BD6AD56C304BC0064DD53B41ECB1C005CAC79E00AB2BC005393984B6B8BEC 0049509EE598F08C003F93A5B6658FCC0033E6DCB3E0C88C00278059E2C8980C001AFD DFE1F7E66C000F39D35D6523CC0000D299C41953EBFFE8B151AC534CCBFFCB37C52CD0 3A5BFFB0E24032702B2BFF93E79EB4EA27EBFF7863FC1B9EBCCBFF5BF015300FB33BFF 422EF8623DE7CBFF26F485186E1F9BFF0B6F5B397873CBFEE876864200308BFEB8256B F20AB18BFE886C04070A376BFE5C170AB0CAA0DBFE339403913423EBFE097FE7242EA9 0BFDCCD09667F878ABFD87BAF403DAEEDBFD4E71342999347BFD15A21E17F594CBFCCB 6EEBB7BCD54BFC7294E9ABFD272BFC26A31F75CE17EBFBC4984F0E99DA4BFB558CDB09 A964BBFAEF49151DE2E2CBFA59668EE03742ABF9D9A68F3009CD6BF91E196E928D83DB F84D91EA71EBD21BF7478B5BFF88ED4BF60C99BDDD6FF2CBF3F2FFA3FB08116BF07AF2 5DF1284593EC0D31722701A933F27B4E6D6F07D533F52BA2568BB49C23F696F1302DEB 3323F7D5B23990C0AF43F8B95988A135BF43F9727FFCD4A7B863FA1EF492771A21E3FA 9D753236A16763FB24AF17F7CA2303FB89148EF4102863FC03CEA06E91ABC3FC46D06F 2B9E3203FC9C1704E0147963FCF925D19114D743FD30A4BF5FFA20B3FD6D1C60771388 B3FDAA49B218C01003FDEE530EF34DC283FE1FCFB290112B43FE475038927560E3FE72 3C56367348A3FEA0585C70392BB3FECCC08235D8DB43FEFE0699EA353F43FF18570437 95F473FF3442A6C2CDCF23FF4D7BD07A487663FF6B1AF718CE7E23FF862960510B7363 FFA1160C7F41BD03FFBE0A409923FA63FFDAED9DA4C28943FFF4E41DA6F571F40007FA D852F64A440014DB61BF4C9E5400225A680F774B24002D916CCA85D5540039D575ADDE AB840044AFE2FCAB0854004EB771406BE7640057F8D521E07CA400608AFC412824C400 689AC88BB63454006F04B648DDDE14007463B6D8644E3400790986DAEC6C44007C83D3 C1FC94F4007EA0ED1EF974D4007F6CE12EC348D4007FE194A50581C4007FFFFFE28220 04007FE11C65E4A064007F6F42EA2CED84007EA9D5DB89C164007C4A856FC099A40079 2FC9632F308400749B63A923E6F4006EDDAE1443A29400681137135CB8D40060D70CA1 80E8840058780A35D61824004EEB7CBD686B34004490C4F2AF031400391EBBA3D25A44 002E6FEC28E5A3240021D0919C2AA6E400149780C654083400076A7AFF7D6E23FFF64F 6E7D132063FFD89A634B46B3D3FFBF1FA4B8B93823FFA14ED217583003FF86E9D111BC 6613FF6A1F96599B6063FF4F07D4C0441213FF334244026B0433FF1A5631439A05C3FF 00370A8F394023FECC1D89229FCCC3FEA067CA10C22AA3FE734E9889730A43FE4733BC 21605A03FE1EA8B3475CA263FDF403113B19CF83FDA8C52F49BD1773FD6AD169525B36 B3FD2EA85A925082D3FCFAFC9471E5F543FC9B07A3AF6785A3FC4B8C9C7D82A063FC03 579028DF20E3FB8E1FF6955F6143FB249D7CDBA99763FAA3686D597DC863FA1CB5B0EB FAC773F96D14FD93EA56A3F8C4239FFB5A9583F7CFB5A032E4F3E3F6B16471768E67E3 F51E50210FEA8703F2ABAA45C3EA7F83EAFA117C83F8A4CBF024E7DA9DC20A1BF41556 52B9D9C42BF5FC885E6A803AEBF750A061B64B445BF83F91380E1C444BF920CF1DE321 689BF9D0E1BDB457770BFA5D7F402FCDA17BFAF27E247AC9D76BFB517C31B1D7965BFB C4AF7E7F6A8A4BFC236A490F323C4BFC73291FE54D68CBFCC5AA1F8C038A1BFD16443E BAA9DDFBFD4D5CD17AE2282BFD8A0707D79EBD4BFDCF6DB0CF20D6EBFE0A5A9864B7BE 7BFE306A817C2A40FBFE5D5B4EECD9524BFE888B005A90E86BFEB6FE1FE22258FBFEE8 6612AE6CD08BFF0BC57FD9C1C39BFF25B235871DAD2BFF401C582302AA4BFF5CF7E5A6 32E8BBFF76CFF7F04FDCBBFF94E5C4FF6D07FBFFB0216944F905ABFFCAFF5E4E973B3B FFE7A06AA9B68A0C0001F4A3D1733B8C000E8A9B7A27E97C001B87B08EB2E58C0027C0 68F4748D3C00346738BF5BA99C003EC746E269903C0049F5DBCDD2B98C0053AF379CAF C14C005C7F41C4897ECC006471A4C62EE5EC006B98577B0EE1CC0072118E4045EDBC00 76F5FB78C9CA0C007AC75A262BF8BC007DB88868407E2C007F76592D7AB70C00800000 000000000000000000000003F0C55D59FEDFAA23F37221C7333E13C3F54637FC8B99DF C3F68C226649D25BF3F7865E9B9576A863F846367174B7F6A3F8FFC9540585C683F97E 432F9D602D83FA0F42AE213A84E3FA753A81DC55C383FAE0AA2068ACB6F3FB37429D3F 51D743FB8A1F59F954B503FBE5635F4BC635A3FC2116BF8BF57893FC5E7656CF05BBC3 FC97BB0A98F3EBE3FCE06025E0337083FD12FD4A97FFD803FD3BF17C0CECB433FD6585 03771167C3FD936D4F63C78F93FDBFB2766E86B1E3FDF1842B55431E13FE13A4C9B276 36A3FE2BC6214ED45623FE4677BC3EF700A3FE62969ADE89D7D3FE7E7A0A5F78DA93FE 99A9C6EEC67DD3FEB7E5C61D486543FED2F07004084DB3FEEF7F884D43A993FF047858 D4C38463FF120DA34A45F9F3FF1E71D666401203FF2AE9122A577B63FF3689B08AD556 53FF4208E78531E593FF4C60E155D74563FF5624AC81CD4463FF5EF2B33ACE29E3FF66 36C7C29CE3D3FF6D8367A070A293FF731128C69AE603FF77EF0CADAD85F3FF7B8A84B9 012AB3FF7E5038408B1E23FF7FA618D41F0D73FF7FF4B9DE7E95A3FF7F1D5E2F260DA3 FF7CFA0DA8029433FF7A1F2FD3E70F73FF75C0A6FACA9F33FF706E6B2B3A2AC3FF6A12 00E6A17233FF62BD458A03B0C3FF5ACF33B66230C3FF51514565D20623FF4771AA7F30 C783FF3C40F7F06E19C3FF317BEEC9A7F453FF24F418FEE43543FF1869CA4A2F2603FF 0B760C3A5F0663FEFB19E39A198D73FEE0F2DA55D55843FEC5CD2EA8C42C63FEA797BC E9251CE3FE8C3399D93FF363FE70516DC6B8DBA3FE5442C505483E63FE3AE07B8ED822 93FE206314F6A823F3FE06CFF8E188BF63FDD8C517907C2673FDABF18C02B3E763FD7A 934F09862C63FD505FC2FA4B0413FD28F674728DBF13FD0152335BEE4A43FCB8F96055 A91373FC7B413441960F83FC3F555AA34FDB63FC0A771B70FF45F3FBAEC17ACCA6CCD3 FB60A0DCE5BECB83FB125957A7917F83FAA705DDA3956B33FA3E12E47E05D1C3F9CE96 0BEE6D69A3F94059A2BA372C93F898AA5CC8CA23E3F7F74065BD0976A3F71B7C942DBF C803F6067F234AB3FFF3F472F64FF20D6383F26DC63D604A29D3F08CB286DF038FE3ED 2A49C97DBB83CBD51CB9DDCC90151BED31395FCB0A833BF08319CCB15E21ABF25FEE8B 7C5264ABF49754CCF53773CBF5FC21918FDF6D6BF71384DEC5CB840BF7FE18C22DDFEC EBF8A6FB26F31AA9ABF93BC1D6A08B68ABF9C5D71F2386662BFA3C0FC0A7A32B2BFAA8 5CA07239BF9BFB16B21188DBE58BFB5AD5489CB1887BFBB2A97D9AF51ACBFC0B836678 D859EBFC41BDA20E6800EBFC78005E6F5A88DBFCBEB4FBE1A22C9BFCFFC8415DA4761B FD28A6010F3DD13BFD4F3D4691DA8C6BFD7C286621530C6BFDA947A6F057310BFDDA9A FE7C87C80BFE04DCE40615182BFE1F22F22BF88AEBFE3B3AF3B4077A7BFE5439AEDF1F 070BFE6FA517412237ABFE8C46BA3B4ACC6BFEA86B55BD0EA68BFEC39D20E4E6EA6BFE E1937D9972CD0BFEFC1E24779E6CCBFF0BEFEB0B92FFCBFF182CE74791B1DBFF251A43 074C882BFF30C1CBB0FD2DDBFF3C54FF26C8479BFF46F965B8854A9BFF51531A3E56B4 8BFF5A75A5A41F870BFF62E3E2F584440BFF6A48558227D7EBFF702E2DF7D68AEBFF75 D6E427D77EFBFF79DED734512E4BFF7D1122CD8709DBFF7F0A803881565BFF7FF92F58 7B246BFF7FB4475C34799BFF7E30B25CCC53CBFF7BB36C308F280BFF77C9309092710B FF736DF4FCF6893BFF6D65D12B68BE0BFF6687919550EB0BFF5EB0F204B55F0BFF55F7 5CF8AF63EBFF4CC76B40F8A8DBFF4206D9D31B64CBFF370E2B151BC46BFF2AD3597B12 D3ABFF1F3909A89A69BBFF11E54CD64E3CCBFF04B7F6AE62F6BBFEEE8377BE5AEE7BFE D1E61547F886CBFEB742E135C164CBFE9BDC532E4EA44BFE7DA773BDFB9FCBFE6283BC 474F9C4BFE472041D2370D8BFE2BCEF00C70C40BFE134DCEF4FEBDBBFDF3E620E49C69 2BFDC360B443A8C3DBFD91B5E2EA5C15EBFD67FC9CD10A90CBFD3A7E32C55B0B9BFD14 04ADA3C3B21BFCE0F0761FBA319BFC9A4353B8EEECCBFC597388FBE6ADDBFC23E42337 82891BFBE14DB0618C46EBFB886003FCBEC1BBFB34124063ABA97BFAE9EACCA2CA968B FA6E77E224ED176BFA0E4085E52BBE0BF9812E3A199B1A1BF905F121ACD1A8BBF84C31 E75302D84BF7752EF54172A5FBF684CEDE9F655BABF55485EB2C79EFFBF38812EAFB8F F5CBF06703A8059D2FC3A506800A539D92D-F+6&F-F0F.F.-%(SCALINGG6#%,CONSTRA INEDG-%+AXESLABELSG6$Q!F)F?-%*AXESSTYLEG6#%%NONEG-%%VIEWG6$%(DEFAULTGF G" 1 2 0 1 10 0 2 9 1 1 1 1.000000 45.000000 45.000000 0 0 "Curve 1" " Curve 2" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 62 "a:=1:plot([cos(t)^3+a*sin(t)^3,sin(t)^3,t=0..2*Pi],ax es=none);" }}{PARA 13 "" 1 "" {GLPLOT2D 208 429 429 {PLOTDATA 2 "6&-%' CURVESG6$7io7$$\"\"\"\"\"!$F*F*7$$\"31EY:()y:Z(*!#=$\"3>2L+#Rd[a#!#?7$ $\"3t36,()eb:#*F/$\"3V2eH/;vD;!#>7$$\"3EcKBo>(4Y)F/$\"3l9Uye\\o+bF87$$ \"3iH%po`ND3)F/$\"34[KNRzEA')F87$$\"3xE$zyx!QQxF/$\"3wkOrl)Q$f7F/7$$\" 3oLP$z7y7X(F/$\"3i,Lq$z#))Q)eTEh>)GF/7$$\"3cB(*3Vf4rqF/$\"33TrF,WF=NF/7$$\"3- Prg%=U)RsF/$\"3!eopb.8;&\\F/7$$\"3(y'z#Q\"RGRxF/$\"3u^d8Iy=\"['F/7$$\" 37K5[@:R]%)F/$\"3o&R>nq+H*yF/7$$\"3Lo-vI2%)>#*F/$\"37^qi0Bye!*F/7$$\"3 5!4$=$HhTv*F/$\"3/bl%******Fgp7$$\"3]w:)F/$\"3;2?V^^.!\\)F/7$$\"3F$zi$QSI0uF/$\"3'[p:'pqXU zF/7$$\"3Wqk*3ZejN'F/$\"3\"*G\"R5*R:>sF/7$$\"3'o/6yBh!e^F/$\"3!p,v!Qq1 SkF/7$$\"3yM&>yf9F/$\"331u=!zq#pUF/7$$!3KY@Ld&=;[&F2$\"3Nt*e`Ah\"3NF/ 7$$!3+Hy_Up;g8F/$\"3csSsbhIxGF/7$$!3=@-y/]qREF/$\"3M\"fv!>2c)H#F/7$$!3 /uiyU6W&)RF/$\"3%e^?-[(3M&exF /$!3'G*=8N4$>B\"F/7$$!3'4CK^PQCZ(F/$!3%>nUntwhp\"F/7$$!3ypgf(p2]D(F/$! 38\"p')41hyB#F/7$$!3`Uuf?Wr@rF/$!3M)*)4c<\\*GGF/7$$!3CI(zKh+92(F/$!3UR \"3d&zGwMF/7$$!39EE__D\"GE(F/$!3E%eHc98*\\]F/7$$!3I&)4mA%3.v(F/$!3R'y5 76zs]'F/7$$!3#HwaY]8)z%)F/$!3;?\"zv#*pBx*F/$!3Q(QgVsC3v*F/7$$!3l#o&fGP;P**F/$!3gZD))ptDM **F/7$$!3QDz@s+')****F/$!3#H:Ekyf)****F/7$$!3$ptntjL!Q**F/$!3gmp$R^L0% **F/7$$!3KOe\\6f%4t*F/$!33;K(*R$*H_(*F/7$$!3c\"4K;TD,())F/$!3))*y'oZX# p.*F/7$$!3%[K8AF(*H<)F/$!3Bq')H<:_,&)F/7$$!3WV*yxh8>J(F/$!3aU-&4.)GwyF /7$$!3W`\"Rkf#HQjF/$!3MSBg&)e02sF/7$$!3(HvtY%\\UQ_F/$!3o1p<6?!4\\'F/7$ $!37.bkIeV.SF/$!3B\"pn)ymHIdF/7$$!3)e`d,Vh;o#F/$!3AQf'*)GD>'\\F/7$$!3z '>\"eKVl78F/$!3(z#H/tJ@7UF/7$$\"3ea&=_Kem[)F2$!3qMTX&\\&=$\\$F/7$$\"3_ %fL%Q69o8F/$!3#z')yWqwN(GF/7$$\"3%G([b4YJEEF/$!3/&)Hb/%4WI#F/7$$\"3Dq# **pnH\"3SF/$!3\\Ly![Cx\\s\"F/7$$\"3S]wz\"*\\>&H&F/$!3Fb%>A#\\tJ7F/7$$ \"3%[=(ofv'HM'F/$!3o:'>6'*y@n)F87$$\"3y0'[bdCaF(F/$!3)HR&zU^5^dF87$$\" 3t#=`8Mww7)F/$!3]PjNzBI+MF87$$\"3^kKo?F3_#F27$F($\"3GMDF^'H?_&!#X-%'COLOURG6&%$RGBG$\"#5! \"\"F+F+-%+AXESLABELSG6$Q!6\"Fadl-%*AXESSTYLEG6#%%NONEG-%%VIEWG6$%(DEF AULTGFjdl" 1 2 0 1 10 0 2 9 1 1 2 1.000000 45.000000 45.000000 0 0 "Cu rve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 52 "a:=0:b:=2*Pi:n:=3 0:\nx0:=t->1/cos(t):\ny0:=t->tan(t):\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 294 "x:=t->simplify(\nx0(t)-D(y0)(t)*(D(x0)(t)^2+D(y0)(t) ^2)/(D(x0)(t)*(D@D)(y0)(t)-D(y0)(t)*(D@D)(x0)(t))):\ny:=t->simplify(\n y0(t)+D(x0)(t)*(D(x0)(t)^2+D(y0)(t)^2)/(D(x0)(t)*(D@D)(y0)(t)-D(y0)(t) *(D@D)(x0)(t))):\nc:=plot([[x0,y0,a..b]],color=blue):\nd:=plot([[x(t), y(t),t=0..b]],color=red,thickness=2):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 94 "e:=plot([seq([[x0(t),y0(t)],[x(t),y(t)]],t=seq(a+k *(b-a)/n,k=0..n))],color=black,linestyle=2):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 64 "display(c,d,e,scaling=constrained,axes=none,view =[-7..7,-5..5]);" }}{PARA 13 "" 1 "" {GLPLOT2D 497 419 419 {PLOTDATA 2 "6G-%'CURVESG6$7ep7$$\"\"\"\"\"!$F*F*7$$\"3YD'H9F_%45!#<$\"3/Xh^iJ=y 8!#=7$$\"3+lsJ?(>P.\"F/$\"3$4G&za2r=EF27$$\"3;9tn4jC\"3\"F/$\"3n-m//!* 47TF27$$\"3-\")ej#3fc:\"F/$\"39IPn%y\\Ez&F27$$\"3_.E(\\%=9l7F/$\"3/!e5 hvM(\\xF27$$\"3'e'fmHg\">T\"F/$\"3?&H,:]\"[n**F27$$\"3$\\F/$\"3Y5\"e+b%3FCF/7$$\"3Uq!*=o-zfRF/$\"3d7+_Z3WJQF/7$$\"3y$pj2\"H!z: &F/$\"33$o#z8e.g]F/7$$\"3:2AQ\")z=MuF/$\"3yR[;@TimtF/7$$\"381azgTm8**F /$\"3;'=<5x*4j)*F/7$$\"3))Q0Ui)R+\\\"!#;$\"3]=)*[g/o'[\"F\\p7$$\"3%Gk& p'[k>*>F\\p$\"3CDPI=GX*)>F\\p7$$\"3:RMLtj50IF\\p$\"3S7#ey2UM+$F\\p7$$ \"3%*eVG(H$eISF\\p$\"3$\\*p3\"fU$HSF\\p7$$\"3I0k*eh]\">hF\\p$\"3;y\\Ya ML=hF\\p7$$\"37hxV%\\\"Hf#)F\\p$\"3+AoW$4'oe#)F\\p7$$\"3gLew0l>q7!#:$ \"3'*oy;Tr:q7F[r7$$\"3IZ6d*Gb)[FF[r$\"3'**H@,5P)[FF[r7$$!3/4]LwF\\p$!3;<0s)z)HN>F\\p7$$!3q(* **\\,C7e9F\\p$!3yDW^#H*oa9F\\p7$$!3cZmNF]ce(*F/$!31\\&Qew#>2(*F/7$$!3% 390*oXaRtF/$!3C@j.D85rsF/7$$!3%p8Xt:s%y\\F/$!3'G=JMu0q([F/7$$!3/;!*fX$ H!zPF/$!3=x(f)\\#>Vk$F/7$$!3+-eK&HM.l#F/$!3q;EV=#RWX#F/7$$!3=)\\6]$f@$ )>F/$!3)*\\qmCGk78F/7$$!3!>#e1]Kd59F/ $!37\"4mrg^%[**F27$$!3C*4$=+&\\^E\"F/$!3)y')flsf)\\xF27$$!3?!G,'eo#[: \"F/$!3%>O[>oGgx&F27$$!3/r-THPJ$3\"F/$!3uI+5Qp:mTF27$$!3RBH/E&3[.\"F/$ !3%HuJ%>fOhEF27$$!3p50NVUQ45F/$!3-r&fVc\">t8F27$$!3F,[44[++5F/$!338L)4 NC85$!#?7$$!3%R'R!)33C45F/$\"3]pBam\"3EO\"F27$$!3,@H:y:pL5F/$\"3/'*z#) R'*fWcSwF27$$!3')=zb=yN19F/$\"3)yD-0(4f))) *F27$$!3UO!Qr%)yKl\"F/$\"3q'>.2FglJ\"F/7$$!3vNY3#eJP+#F/$\"3?)=I3Lejt \"F/7$$!39i0hCVc]EF/$\"3%*=V:0woaCF/7$$!3)*fBL@vPLQF/$\"3,VIxCjk+PF/7$ $!3'fOy*p`K;^F/$\"3hAZ7'QZw,&F/7$$!3n%4e]DMDu(F/$\"3=fxFJVoxwF/7$$!34N pu#\\]I-\"F\\p$\"3+A1O=9:=5F\\p7$$!3V$=duXv'4:F\\p$\"3lr2SY)fj]\"F\\p7 $$!3'=G$evB\"=)>F\\p$\"3)ov\\W#yGz>F\\p7$$!3!*4XA'[%p%)GF\\p$\"3O-0Qz1 'H)GF\\p7$$!3^002;B8OPF\\p$\"3t86$Rz$zMPF\\p7$$!3JNP?&))G6I&F\\p$\"37f ?&fg&=+`F\\p7$$!3yXx'=Abdq'F\\p$\"3fx#QAb4]q'F\\p7$$!39IQZ$plK7*F\\p$ \"3c]MkFwrA\"*F\\p7$$!3s@)[M<)oE9F[r$\"3-0x\"o7`mU\"F[r7$$!3cE]sY@> F[r$!3T,&R#G7W@>F[r7$$\"3y'e\")[eA72\"F[r$!3K4WA3f8Oyv$[@F\\p7$$\" 3%zWzt&F/$!3OI:#)zYa'4&F/ 7$$\"3Terqg#F/$!38TI3YBg2CF/ 7$$\"3_Z-\\S1o)*>F/$!3-L`yur_IFG\\PP\"F27$ F($\"36YKhSr8/#)!#F-%'COLOURG6&%$RGBGF+F+$\"*++++\"!\")-F$6%7\\p7$$\" \"#F*F+7$$\"31PMA!R^s0#F/$!3s!>>wS6aB&Fgy7$$\"3F*)[4>r@4AF/$!3qtigv#Q; f$!#>7$$\"32\"\\AGCc\"GDF/$!373]$=5f1R\"F27$$\"3_OZ!>HzA b!)>F/7$$\"3!pkk&pLQS()F/$!3F!GhGi**yK%F/7$$\"3'o1N1q.(*e\"F\\p$!3Zwx! y#oJI5F\\p7$$\"3ao:/`I](e$F\\p$!3Jy4FQ0eJGF\\p7$$\"3+`#HYR&yT7F[r$!3*y NDgN1\\7\"F[r7$$\"3AO!>e58Wu#F[r$!3'yu5\"Q$R6f#F[r7$$\"3p3N/'yFt@)F[r$ !39]BSiSJ&*zF[r7$$\"3SQ;.UWk[>Ffr$!3wxM\\J#z*=>Ffr7$$\"3'*G\\c0!Hkh'Ff r$!3+s[w\"=yTu1e%Fe]m7$$\"3![$G2R*Ho7\"!#6$!3c0*3%p@eE6F`^m7$$ \"3slg:fzm)4%F`^m$!3W&**3h!pG)4%F`^m7$$\"3IFjAQI=aT!#5$!3+#[SGd+T:%F[_ m7$$!351OZZv\\%R*Figl$\"3)es[K_#\\%R*Figl7$$!3MW1cbom`%RO!)z\")y!*F/$\"3m8W(*oYl'f%F/7$$!3v<-?^GG8cF/$\"3c1`bC,Bp >F/7$$!3a&\\GK#[+]SF/$\"3(GqR()*>=4$*F27$$!3%y?5!3@@!3$F/$\"3[bwL&)f0a QF27$$!3\"\\`!GKgoUDF/$\"3c*\\bpNGiW\"F27$$!3dz1_2`?;AF/$\"3AFH%z*4-qP Fjhl7$$!3Q$3rq\\No0#F/$\"3y:2]x7ty^Fgy7$$!3>svqa)G++#F/$\"3#=\\l/ZRe'f !#D7$$!3/*H+jyef0#F/$!3Gc<\"*f]Fgy7$$!3]F3o\"pO!4AF/$!3+ZIDN%oqe$Fj hl7$$!38gMfQ#fh^#F/$!3i*RyN\"yCX8F27$$!3?qv)=A)QkIF/$!3e7rzZY6vPF27$$! 3ony3r&Hj)RF/$!3DF/7$$!3YGA !=Z;z.*F/$!3#Gi0+KpSc%F/7$$!3t'=Tq^s*3;F\\p$!3]Na1DL+Z5F\\p7$$!3$)\\v8 )G.Vs$F\\p$!3%H*y\"=tR\"eHF\\p7$$!3Zx*3O.8m7\"F[r$!3I08\"R)4f85F[r7$$! 3w(z47t3GG*F[r$!3K(*)y()3/:0*F[r7$$!3%z!3\\u,&3K*p;;Figl$\"3ZqACElp; ;Figl7$$\"3K/\"fLSD)=9F[_m$\"3eE>tfxw=9F[_m7$$\"39]HICS\\eCF`^m$\"3OL* GXms\"eCF`^m7$$\"3U50o\"3W5>)Fe]m$\"3o:'*p1j\"))=)Fe]m7$$\"3q\\eS!G'>] >Fe]m$\"3gdjUAc\")[>Fe]m7$$\"363$)f^**Q=uFj\\m$\"3#37?6E(Q3uFj\\m7$$\" 3e9m@bAi*)>Fj\\m$\"3M$)f6QO<$)>Fj\\m7$$\"3RDw'z*\\R+!)Ffr$\"3C'3.-Y>G& zFfr7$$\"3;5x\"3\"[3lAFfr$\"32-pNVg)QB#Ffr7$$\"3'**=_mVxhO*F[r$\"3%o^` LgwT8*F[r7$$\"3Yr?\"p*)*)>!GF[r$\"3K)36*z7jZEF[r7$$\"3Q3P)y(p/*>\"F[r$ \"3U%pEoqpN3\"F[r7$$\"3A*yhLwYPa$F\\p$\"3'H^)p@q:\"z#F\\p7$$\"3'))oobi Nof\"F\\p$\"3LtANd.\\O5F\\p7$$\"3U^K5)y94x)F/$\"3'R[X%*Qi?N%F/7$$\"3I) z!*fcL'*e&F/$\"3yiAw*oiD&>F/7$$\"3O!*)yIW*>cSF/$\"3!pdtL9WrM*F27$$\"3m _(HgyFU1$F/$\"3=\\!)otjJuPF27$$\"3S>RWXqfZDF/$\"3%zG#)p%)\\^Y\"F27$$\" 3yk(QRwjBA#F/$\"3-F]O*[O%HRFjhl7$$\"3g&4J\"*)=)o0#F/$\"3oJIOFQ/&=&FgyF ]hl-Fdgl6&FfglFgglF+F+-%*THICKNESSG6#F_hl-F$6%7$F'F]hl-Fdgl6&FfglF*F*F *-%*LINESTYLEGF`an-F$6%7$7$$\"3EH]'[fSB-\"F/$\"3E@-q;ccD@F27$$\"3(p'Gu #[gq8#F/$!3bEUo+Nn?>FjhlFdanFfan-F$6%7$7$$\"3#o/1&yij%4\"F/$\"3)4O&3`o G_WF27$$\"3Q(=&3_*[Ki#F/$!3ws;1@59lH[^716\"F/7$$\"3#zUgEm2dn'F/$!3%3]Zid#zRFF/F danFfan-F$6%7$7$F^hl$\"3?x)ov!30K,aA,aAH[^716\"F/7$$!3#zUgEm2dn'F/$\"3%3]Zid#zRFF/Fd anFfan-F$6%7$7$$!3f*y*\\xz1O7F/$!3)*3O0!GDaE(F27$$!3AMm**Rw3xPF/$\"3i? [&Rb8.n(F2FdanFfan-F$6%7$7$$!3#o/1&yij%4\"F/$!3)4O&3`oG_WF27$$!3Q(=&3_ *[Ki#F/$\"3ws;1@59lFjhlFdanFfan-F$6%7$7$$!\"\"F*F+7$F_inF+F danFfan-F$6%7$7$Fb\\oF^bn7$Fg\\oFcbnFdanFfan-F$6%7$7$Fe[oF[cn7$Fj[oF`c nFdanFfan-F$6%7$7$FhjnFhcn7$F][oF]dnFdanFfan-F$6%7$7$F[jnFedn7$F`jnFjd nFdanFfan-F$6%7$7$F_inF`en7$FdinFeenFdanFfan-F$6%7$7$FbhnF]fn7$FghnFbf nFdanFfan-F$6%7$7$FegnFjfn7$FjgnF_gnFdanFfan-F$6%7$7$FhfnFggn7$F]gnF\\ hnFdanFfan-F$6%7$7$F[fnFdhn7$F`fnFihnFdanFfan-F$6%7$7$F^hlFain7$FcenFe inFdanFfan-F$6%7$7$FcdnF]jn7$FhdnFbjnFdanFfan-F$6%7$7$FfcnFjjn7$F[dnF_ [oFdanFfan-F$6%7$7$FibnFg[o7$F^cnF\\\\oFdanFfan-F$6%7$7$F\\bnFd\\o7$Fa bnFi\\oFdanFfanFaan-%+AXESLABELSG6%Q!6\"F[bo-%%FONTG6#%(DEFAULTG-%(SCA LINGG6#%,CONSTRAINEDG-%*AXESSTYLEG6#%%NONEG-%%VIEWG6$;$!\"(F*$\"\"(F*; $!\"&F*$\"\"&F*" 1 2 0 1 10 0 2 9 1 1 1 1.000000 45.000000 45.000000 0 0 "Curve 1" "Curve 2" "Curve 3" "Curve 4" "Curve 5" "Curve 6" "Curve 7" "Curve 8" "Curve 9" "Curve 10" "Curve 11" "Curve 12" "Curve 13" "C urve 14" "Curve 15" "Curve 16" "Curve 17" "Curve 18" "Curve 19" "Curve 20" "Curve 21" "Curve 22" "Curve 23" "Curve 24" "Curve 25" "Curve 26 " "Curve 27" "Curve 28" "Curve 29" "Curve 30" "Curve 31" "Curve 32" "C urve 33" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart:" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 70 "A:=[u*cos(a),-u*sin(a)]:B:=[ v*cos(a),v*sin(a)]:M:=expand(t*A+(1-t)*B):" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 78 "sol:=solve(\{add((expand(B-A ))[k]^2,k=1..2)=l\},v):M1:=subs(v=subs(sol[1],v),M):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 106 "M11:=diff(M1,t):M12:=diff(M1,u):\nsol2:= solve(\{M11[1]*M12[2]-M11[2]*M12[1]\},t):M1:=subs(t=subs(sol2,t),M1): " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 77 "maxi:=expand(simplify(combine(solve(4*u^2*sin( a)^4-4*u^2*sin(a)^2+l,u)[2])));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%% maxiG,$*&#\"\"\"\"\"#F(*(*&%\"lGF()-%$cosG6#%\"aGF)F(F'-%$sinGF0!\"\"F .!\"#F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 73 "aa:=Pi/8:ll:=1 :maxif:=evalf(subs(\{a=aa,l=ll\},maxi));inter:=-maxif..maxif;" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 11 "" 1 "" {XPPMATH 20 "6# >%&maxifG$\"+iN@99!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&interG;$! +iN@99!\"*$\"+iN@99F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 221 "p lot([[t*cos(aa),t*sin(aa),t=-2..2],[t*cos(aa),-t*sin(aa),t=-2..2],\n[o p(subs(\{a=aa,l=ll\},M1)),u=inter],[op(subs(\{a=aa,l=ll\},-M1)),u=inte r]],scaling=constrained,color=[black $ 2,red $ 2],axes=none,thickness= [1 $ 2,2 $ 2]);" }}{PARA 13 "" 1 "" {GLPLOT2D 496 496 496 {PLOTDATA 2 "6*-%'CURVESG6%7S7$$!3[tD-l!fx%=!#<$!3k&z,tkoOl(!#=7$$!3!yE;mG2sw\"F*$ !3Ta,TcA,?tF-7$$!3[fH$\\h>rp\"F*$!3Hlju9'*pHqF-7$$!3XFV)yp)H=;F*$!3S%3 Wjo7Kq'F-7$$!39rHj/`&*Q:F*$!3aZ*\\1fhXP'F-7$$!3#ypzm,*)*f9F*$!3C(*[C;D ZZgF-7$$!3sY&e$frx'Q\"F*$!3&*\\a&R2>Uu&F-7$$!3gq()p@0(4J\"F*$!3vE'*e*p <-V&F-7$$!3X9&)e)=rDB\"F*$!3h&)o.HqZ0^F-7$$!39MQ8$GBW:\"F*$!3?'4Lf!yx \"y%F-7$$!3'*)4vnbQS2\"F*$!3Y9(ysO8)[WF-7$$!3<1S/YcB.5F*$!3A8cZ3\"Qb:% F-7$$!3XLf%=Q$GN#*F-$!3i[%>\"H'z`#QF-7$$!3#z))4YWP\\V)F-$!3EtgK([lQ\\$ F-7$$!3K;reLeljwF-$!3%3ZJO=!RuJF-7$$!3K(fz1CeK'pF-$!3S1df,gF%)GF-7$$!3 \">*p!)exTIhF-$!30I2ry@IRDF-7$$!3DR]zEE*[U&F-$!3m5jV+T1ZAF-7$$!3wiRVu \"*>/YF-$!37bv\">u@r!>F-7$$!3g@0%zSYx(QF-$!3g;Dh`^@1;F-7$$!3ACv_'e723$ F-$!3u(>8^$H2w7F-7$$!3h5BY1zu@BF-$!35#H!o7Z*ph*!#>7$$!3*>ePM)y%)H:F-$! 3s.i(oTPoL'Far7$$!3Kn-oyXOE!)Far$!3\")z./l!HYK$Far7$$!3N(z4SDpS#=!#?$! 3SAj=PAabv!#@7$$\"3oP#>Adg_'zFar$\"3-)))[o&*=$*H$Far7$$\"3#egV!3Hy0:F- $\"3I0E,Dq:PiFar7$$\"3'*)Qdwt*zrAF-$\"3A)HLLi-,T*Far7$$\"3/T\"\\u2qJ1$ F-$\"3Gy[$**e1)o7F-7$$\"3SN/aj:PPQF-$\"3M(H$[X8\\*e\"F-7$$\"3=([K+J^ke %F-$\"3E0$zdLq(**=F-7$$\"3]e8\"Rlw\"=aF-$\"32gLQ`AGWAF-7$$\"3a7c'y')=b ;'F-$\"3KZr8M:%Qb#F-7$$\"3KoLE)>mM'pF-$\"3)HIZ/9iV)GF-7$$\"3#p8'*y2Dlo (F-$\"3w!\\&yMH'Q=$F-7$$\"3a]@@=%>qZ)F-$\"3wcN_6kH6NF-7$$\"3WO]y()H\"3 A*F-$\"37Ulk&z&Q>QF-7$$\"3K)4kBe\"H)***F-$\"3Tif(R(zUTTF-7$$\"3;&Rr=!> %e2\"F*$\"3]jRCnIGcWF-7$$\"3y(yi**>?a:\"F*$\"3!>?W1<2fy%F-7$$\"34y)H\" fN1K7F*$\"3;7E(*eVP.^F-7$$\"3>rQsjCW58F*$\"3.,/%=TI!GaF-7$$\"3#4<:9Ns \")Q\"F*$\"3[R^n[\")**\\dF-7$$\"3MJ'*[X!)ff9F*$\"31r1bgI&e/'F-7$$\"3s/ WG^*f9a\"F*$\"3#)3(pnQs5K(F-7$$\" 3[tD-l!fx%=F*$\"3k&z,tkoOl(F--%'COLOURG6&%$RGBG\"\"!F_[lF_[l-%*THICKNE SSG6#\"\"\"-F$6%7S7$F(Fiz7$F/$\"3Ta,TcA,?tF-7$F4$\"3Hlju9'*pHqF-7$F9$ \"3S%3Wjo7Kq'F-7$F>$\"3aZ*\\1fhXP'F-7$FC$\"3C(*[C;DZZgF-7$FH$\"3&*\\a& R2>Uu&F-7$FM$\"3vE'*e*p<-V&F-7$FR$\"3h&)o.HqZ0^F-7$FW$\"3?'4Lf!yx\"y%F -7$Ffn$\"3Y9(ysO8)[WF-7$F[o$\"3A8cZ3\"Qb:%F-7$F`o$\"3i[%>\"H'z`#QF-7$F eo$\"3EtgK([lQ\\$F-7$Fjo$\"3%3ZJO=!RuJF-7$F_p$\"3S1df,gF%)GF-7$Fdp$\"3 0I2ry@IRDF-7$Fip$\"3m5jV+T1ZAF-7$F^q$\"37bv\">u@r!>F-7$Fcq$\"3g;Dh`^@1 ;F-7$Fhq$\"3u(>8^$H2w7F-7$F]r$\"35#H!o7Z*ph*Far7$Fcr$\"3s.i(oTPoL'Far7 $Fhr$\"3\")z./l!HYK$Far7$F]s$\"3SAj=PAabvFbs7$Fds$!3-)))[o&*=$*H$Far7$ Fis$!3I0E,Dq:PiFar7$F^t$!3A)HLLi-,T*Far7$Fct$!3Gy[$**e1)o7F-7$Fht$!3M( H$[X8\\*e\"F-7$F]u$!3E0$zdLq(**=F-7$Fbu$!32gLQ`AGWAF-7$Fgu$!3KZr8M:%Qb #F-7$F\\v$!3)HIZ/9iV)GF-7$Fav$!3w!\\&yMH'Q=$F-7$Ffv$!3wcN_6kH6NF-7$F[w $!37Ulk&z&Q>QF-7$F`w$!3Tif(R(zUTTF-7$Few$!3]jRCnIGcWF-7$Fjw$!3!>?W1<2f y%F-7$F_x$!3;7E(*eVP.^F-7$Fdx$!3.,/%=TI!GaF-7$Fix$!3[R^n[\")**\\dF-7$F ^y$!31r1bgI&e/'F-7$Fcy$!3#)3(pnQs5K(F-7$FgzF+F[[lF`[l-F$6%7]o7$$!3q_F=b\"=X!eKP\"F *$\"3'z?`bf@pn'F-7$$!3wV$Ryn=OP\"F*$\"3)yqW\")*Gi\"o'F-7$$!3m6lO9c'HP \"F*$\"3!oF.E*odtmF-7$$!3a2!=qM8WO\"F*$\"35/XF$*=\"pd'F-7$$!3#eq$\\TfJ [8F*$\"35G[%eYFGT'F-7$$!3!4)\\]Ap_#H\"F*$\"3'3QPFAf[#fF-7$$!3IyK%)))4d ;7F*$\"3g%pB%*>C*p`F-7$$!3r&[#3\"e>n7\"F*$\"3V3(=x3]V\"[F-7$$!3Rkb`B%) zL5F*$\"3[i1d/:!GK%F-7$$!3y_ehO4.,$*F-$\"35/u8Jjt_QF-7$$!3W5)RRGv&F-$ \"3ASIo)=D!>FF-7$$!3#)*zUmn#=UYF-$\"3QPamc>6*[#F-7$$!3UGFs%39XQ$F-$\"3 7kbMk%*\\\"H#F-7$$!3kM\\2X&*eA@F-$\"3KY^'4f+t:#F-7$$!3ob#4rsS(f\"*Far$ \"3+8nJK:3(3#F-7$$\"3'))3*)=WdKl\"Far$\"3I@nWu\"*er?F-7$$\"3Tbu.II)fU \"F-$\"3pQ_KFS\"*4@F-7$$\"3Mb/Z`\"GrY#F-$\"3aW#3z)*3x=#F-7$$\"3x$y\\v` l7k$F-$\"3O,xo*[ulK#F-7$$\"3rF/8M\"3Fk%F-$\"3m(yC]D3#*[#F-7$$\"3Y)RL6n Pdp&F-$\"3<-%oBi(31FF-7$$\"3i.tH)e4*\\mF-$\"3ObEg*G%\\XHF-7$$\"3Ixuj%o T5f(F-$\"3#43#)fb)RCKF-7$$\"3Bod#f'=D.%)F-$\"3/]Nr`B.-NF-7$$\"30n%GLSP 0A*F-$\"3\\+ER.AG>QF-7$$\"3sbt(QG/-+\"F*$\"3=2a$3$)4A;%F-7$$\"3yQR2SSW i5F*$\"3i\\>fo@dmWF-7$$\"3tOZ_lMWB6F*$\"3w!4a4:;dz%F-7$$\"3E-o!o$p`z6F *$\"3&z))Rr9Q)H^F-7$$\"37>K`&4.vA\"F*$\"3S)eoHv)=WaF-7$$\"3Yz'\\AeatE \"F*$\"35@\"F*$\"33Orry*oW7\"F-7$$\"3o-mGTcU2 7F*$\"3j5H^+L2:KFar7$$\"30;X+*\\t@F-7$$\"3m#3iQ%\\B L7F*$!3w-\"=X!eKP\"F*$!3'z?`bf@pn'F-7$$\"3wV$Ryn=OP\"F*$!3)yqW\") *Gi\"o'F-7$$\"3m6lO9c'HP\"F*$!3!oF.E*odtmF-7$$\"3a2!=qM8WO\"F*$!35/XF$ *=\"pd'F-7$$\"3#eq$\\TfJ[8F*$!35G[%eYFGT'F-7$$\"3!4)\\]Ap_#H\"F*$!3'3Q PFAf[#fF-7$$\"3IyK%)))4d;7F*$!3g%pB%*>C*p`F-7$$\"3r&[#3\"e>n7\"F*$!3V3 (=x3]V\"[F-7$$\"3Rkb`B%)zL5F*$!3[i1d/:!GK%F-7$$\"3y_ehO4.,$*F-$!35/u8J jt_QF-7$$\"3W5)RRGv&F-$!3ASIo)=D!>FF-7$$\"3#)*zUmn#=UYF-$!3QPamc>6*[#F -7$$\"3UGFs%39XQ$F-$!37kbMk%*\\\"H#F-7$$\"3kM\\2X&*eA@F-$!3KY^'4f+t:#F -7$$\"3ob#4rsS(f\"*Far$!3+8nJK:3(3#F-7$$!3'))3*)=WdKl\"Far$!3I@nWu\"*e r?F-7$$!3Tbu.II)fU\"F-$!3pQ_KFS\"*4@F-7$$!3Mb/Z`\"GrY#F-$!3aW#3z)*3x=# F-7$$!3x$y\\v`l7k$F-$!3O,xo*[ulK#F-7$$!3rF/8M\"3Fk%F-$!3m(yC]D3#*[#F-7 $$!3Y)RL6nPdp&F-$!3<-%oBi(31FF-7$$!3i.tH)e4*\\mF-$!3ObEg*G%\\XHF-7$$!3 Ixuj%oT5f(F-$!3#43#)fb)RCKF-7$$!3Bod#f'=D.%)F-$!3/]Nr`B.-NF-7$$!30n%GL SP0A*F-$!3\\+ER.AG>QF-7$$!3sbt(QG/-+\"F*$!3=2a$3$)4A;%F-7$$!3yQR2SSWi5 F*$!3i\\>fo@dmWF-7$$!3tOZ_lMWB6F*$!3w!4a4:;dz%F-7$$!3E-o!o$p`z6F*$!3&z ))Rr9Q)H^F-7$$!37>K`&4.vA\"F*$!3S)eoHv)=WaF-7$$!3Yz'\\AeatE\"F*$!35@\"F*$!33Orry*oW 7\"F-7$$!3o-mGTcU27F*$!3j5H^+L2:KFar7$$!30;X+*\\t@ F-7$$!3m#3iQ%\\BL7F*$\"3w- " 0 "" {MPLTEXT 1 0 33 "eliminate(\{x=M1[1],y=M 1[2]\},\{u\}):" }}{PARA 7 "" 1 "" {TEXT -1 33 "Warning, computation in terrupted\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart:" }} {PARA 7 "" 1 "" {TEXT -1 50 "Warning, the name changecoords has been r edefined\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "plus:=proc(A,B,a,b)\n[a*A[1]+b*B[1] ,a*A[2]+b*B[2]]\nend:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 76 "A: =[u*cos(a),-u*sin(a)]:B:=[v*cos(a),v*sin(a)]:M:=plus(A,B,(1/2+t),(1/2- t)):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 45 "g:=add((expand(B-A))[k]^2,k=1..2):combine(g):" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 79 "M1:=diff(M,u):M2:=diff(M,v):M3:=diff(M,t):U:=plus(M1,M2,diff(g,v), -diff(g,u)):\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 89 "sol:=solv e(\{M3[1]*U[2]-M3[2]*U[1]\},t):M:=factor(combine(subs(t=combine(subs(s ol,t)),M))):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 82 "M:=[(u+v)*cos(a)*(u^2-2*u*v*cos(a)^ 2+v^2),(-u+v)*sin(a)*(u^2+2*u*v*sin(a)^2+v^2)]:" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 70 "M:=[(u+v)*cos(a)*(1-2*u*v*sin(a)^2),(-u+v)*sin (a)*(1+2*u*v*cos(a)^2)]:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 49 "sol:=solve(\{g=l\},v):M1:=subs(v=subs(sol[1],v),M):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 99 "sol:=solve(\{(u+v)^2-4*u*v*cos(a)^2=l\},v):M1:=subs(v=subs(sol[1 ],v),M):B1:=subs(v=subs(sol[1],v),B):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 77 "maxi:=expand(simplify(combine(solve(4*u^2*sin(a)^4-4* u^2*sin(a)^2+l,u)[2])));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%maxiG,$ *&#\"\"\"\"\"#F(*(*&%\"lGF()-%$cosG6#%\"aGF)F(F'-%$sinGF0!\"\"F.!\"#F( F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 73 "aa:=Pi/8:ll:=1:maxif: =evalf(subs(\{a=aa,l=ll\},maxi));inter:=-maxif..maxif;" }}{PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&maxifG$ \"+iN@99!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&interG;$!+iN@99!\"* $\"+iN@99F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 134 "n:=10:anime :=display(seq(plot(subs(\{a=aa,l=ll\},[A,B1,M1]),color=black,thickness =3),u=seq(-maxif+k/n*maxif,k=0..2*n)),insequence=true):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 144 "plot([\n[op(subs(\{a=aa,l=ll\},M1) ),u=inter],[op(subs(\{a=aa,l=ll\},-M1)),u=inter]],scaling=constrained, color=[red $ 2],axes=none,thickness=[2 $ 2]);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 13 "" 1 "" {GLPLOT2D 496 496 496 {PLOTDATA 2 "6(-%'CURVESG6%7]o7$$!3m`!z^vrlI\"!#<$\"30'zZ7@t@T&!#=7$$!3ONRFR?5c8 F*$\"3H.QY:3$eT'F-7$$!3+k3Lgqno8F*$\"3C$Q/Mi*)Gh'F-7$$!3OX\"pT\"3qr8F* $\"3%R3Q4))\\el'F-7$$!3)o>\"=X!eKP\"F*$\"3k/Kb&f@pn'F-7$$!3aV$Ryn=OP\" F*$\"3W.Z9)*Gi\"o'F-7$$!3)=^mVhlHP\"F*$\"39!G.E*odtmF-7$$!3K2!=qM8WO\" F*$\"3)=]uK*=\"pd'F-7$$!3/1P\\TfJ[8F*$\"3KI[%eYFGT'F-7$$!39\")\\]Ap_#H \"F*$\"3vzttA#f[#fF-7$$!3_yK%)))4d;7F*$\"3q&pB%*>C*p`F-7$$!3$f[#3\"e>n 7\"F*$\"3a4(=x3]V\"[F-7$$!3mqX],GK%F-7$$!3y_ehO4.,$* F-$\"35/u8Jjt_QF-7$$!3c6)RRGv&F-$\"3xSIo)=D!>FF-7$$!3#)*zUmn#=UYF-$\"3 AQamc>6*[#F-7$$!3IFFs%39XQ$F-$\"37kbMk%*\\\"H#F-7$$!33M\\2X&*eA@F-$\"3 /Y^'4f+t:#F-7$$!3kP#4rsS(f\"*!#>$\"3s7nJK:3(3#F-7$$\"3o#4*)=WdKl\"Fjq$ \"3-@nWu\"*er?F-7$$\"3Tbu.II)fU\"F-$\"3UQ_KFS\"*4@F-7$$\"3m`/Z`\"GrY#F -$\"3aW#3z)*3x=#F-7$$\"3x$y\\v`l7k$F-$\"3\"3q(o*[ulK#F-7$$\"3QH/8M\"3F k%F-$\"3%zyC]D3#*[#F-7$$\"3c*RL6nPdp&F-$\"3<-%oBi(31FF-7$$\"3]-tH)e4* \\mF-$\"3ObEg*G%\\XHF-7$$\"3Ixuj%oT5f(F-$\"3Z\"3#)fb)RCKF-7$$\"3Mpd#f' =D.%)F-$\"3/]Nr`B.-NF-7$$\"30n%GLSP0A*F-$\"3%**f#R.AG>QF-7$$\"3sbt(QG/ -+\"F*$\"331a$3$)4A;%F-7$$\"3yQR2SSWi5F*$\"3i\\>fo@dmWF-7$$\"3tOZ_lMWB 6F*$\"3w!4a4:;dz%F-7$$\"3E-o!o$p`z6F*$\"3&z))Rr9Q)H^F-7$$\"37>K`&4.vA \"F*$\"3S)eoHv)=WaF-7$$\"3Cz'\\AeatE\"F*$\"35@ \"F*$\"33Orry*oW7\"F-7$$\"3o-mGTcU27F*$\"3U))G^+L2:KFjq7$$\"3F;X+*\\t@F-7$$\"3)G3iQ%\\BL7F*$!3K3aXuTb18F*$!3P;G.v([\"=X!eKP \"F*$!3k/Kb&f@pn'F-7$$\"3aV$Ryn=OP\"F*$!3W.Z9)*Gi\"o'F-7$$\"3)=^mVhlHP \"F*$!39!G.E*odtmF-7$$\"3K2!=qM8WO\"F*$!3)=]uK*=\"pd'F-7$$\"3/1P\\TfJ[ 8F*$!3KI[%eYFGT'F-7$$\"39\")\\]Ap_#H\"F*$!3vzttA#f[#fF-7$$\"3_yK%)))4d ;7F*$!3q&pB%*>C*p`F-7$$\"3$f[#3\"e>n7\"F*$!3a4(=x3]V\"[F-7$$\"3mqX],GK%F-7$$\"3y_ehO4.,$*F-$!35/u8Jjt_QF-7$$\"3c6)RRGv&F-$! 3xSIo)=D!>FF-7$$\"3#)*zUmn#=UYF-$!3AQamc>6*[#F-7$$\"3IFFs%39XQ$F-$!37k bMk%*\\\"H#F-7$$\"33M\\2X&*eA@F-$!3/Y^'4f+t:#F-7$$\"3kP#4rsS(f\"*Fjq$! 3s7nJK:3(3#F-7$$!3o#4*)=WdKl\"Fjq$!3-@nWu\"*er?F-7$$!3Tbu.II)fU\"F-$!3 UQ_KFS\"*4@F-7$$!3m`/Z`\"GrY#F-$!3aW#3z)*3x=#F-7$$!3x$y\\v`l7k$F-$!3\" 3q(o*[ulK#F-7$$!3QH/8M\"3Fk%F-$!3%zyC]D3#*[#F-7$$!3c*RL6nPdp&F-$!3<-%o Bi(31FF-7$$!3]-tH)e4*\\mF-$!3ObEg*G%\\XHF-7$$!3Ixuj%oT5f(F-$!3Z\"3#)fb )RCKF-7$$!3Mpd#f'=D.%)F-$!3/]Nr`B.-NF-7$$!30n%GLSP0A*F-$!3%**f#R.AG>QF -7$$!3sbt(QG/-+\"F*$!331a$3$)4A;%F-7$$!3yQR2SSWi5F*$!3i\\>fo@dmWF-7$$! 3tOZ_lMWB6F*$!3w!4a4:;dz%F-7$$!3E-o!o$p`z6F*$!3&z))Rr9Q)H^F-7$$!37>K`& 4.vA\"F*$!3S)eoHv)=WaF-7$$!3Cz'\\AeatE\"F*$!35@\"F*$!33Orry*oW7\"F-7$$!3o-mGTcU27F* $!3U))G^+L2:KFjq7$$!3F;X+*\\t@F-7$$!3)G3iQ%\\BL7F *$\"3K3aXuTb18F*$ \"3P;G.v([ " 0 "" {MPLTEXT 1 0 247 "fond:=plot([[t*cos(aa),t*sin(aa),t =-2..2],[t*cos(aa),-t*sin(aa),t=-2..2],\n[op(subs(\{a=aa,l=ll\},M1)),u =inter],[op(subs(\{a=aa,l=ll\},-M1)),u=inter]],scaling=constrained,col or=[black $ 2,red $ 2],axes=none,thickness=[1 $ 2,2 $ 2]):display(fond ,anime);" }}{PARA 13 "" 1 "" {GLPLOT2D 496 496 496 {PLOTDATA 2 "6'-%(A NIMATEG677)-%'CURVESG6%7%7$$!3k\"oJX'Hc18!#<$\"3n'>M++h>T&!#=7$$!3h&=B pt)eQ#*F1$!3#f!4-_([n#QF17$$!30P)*)=_rlI\"F.$\"3r!)y9zv;7aF1-%'COLOURG 6&%$RGBG\"\"!F@F@-%*THICKNESSG6#\"\"$-%+AXESLABELSG6$Q!6\"FH-%%VIEWG6$ %(DEFAULTGFM-F(6%7S7$$!3[tD-l!fx%=F.$!3k&z,tkoOl(F17$$!3!yE;mG2sw\"F.$ !3Ta,TcA,?tF17$$!3[fH$\\h>rp\"F.$!3Hlju9'*pHqF17$$!3XFV)yp)H=;F.$!3S%3 Wjo7Kq'F17$$!39rHj/`&*Q:F.$!3aZ*\\1fhXP'F17$$!3#ypzm,*)*f9F.$!3C(*[C;D ZZgF17$$!3sY&e$frx'Q\"F.$!3&*\\a&R2>Uu&F17$$!3gq()p@0(4J\"F.$!3vE'*e*p <-V&F17$$!3X9&)e)=rDB\"F.$!3h&)o.HqZ0^F17$$!39MQ8$GBW:\"F.$!3?'4Lf!yx \"y%F17$$!3'*)4vnbQS2\"F.$!3Y9(ysO8)[WF17$$!3<1S/YcB.5F.$!3A8cZ3\"Qb:% F17$$!3XLf%=Q$GN#*F1$!3i[%>\"H'z`#QF17$$!3#z))4YWP\\V)F1$!3EtgK([lQ\\$ F17$$!3K;reLeljwF1$!3%3ZJO=!RuJF17$$!3K(fz1CeK'pF1$!3S1df,gF%)GF17$$!3 \">*p!)exTIhF1$!30I2ry@IRDF17$$!3DR]zEE*[U&F1$!3m5jV+T1ZAF17$$!3wiRVu \"*>/YF1$!37bv\">u@r!>F17$$!3g@0%zSYx(QF1$!3g;Dh`^@1;F17$$!3ACv_'e723$ F1$!3u(>8^$H2w7F17$$!3h5BY1zu@BF1$!35#H!o7Z*ph*!#>7$$!3*>ePM)y%)H:F1$! 3s.i(oTPoL'Fit7$$!3Kn-oyXOE!)Fit$!3\")z./l!HYK$Fit7$$!3N(z4SDpS#=!#?$! 3SAj=PAabv!#@7$$\"3oP#>Adg_'zFit$\"3-)))[o&*=$*H$Fit7$$\"3#egV!3Hy0:F1 $\"3I0E,Dq:PiFit7$$\"3'*)Qdwt*zrAF1$\"3A)HLLi-,T*Fit7$$\"3/T\"\\u2qJ1$ F1$\"3Gy[$**e1)o7F17$$\"3SN/aj:PPQF1$\"3M(H$[X8\\*e\"F17$$\"3=([K+J^ke %F1$\"3E0$zdLq(**=F17$$\"3]e8\"Rlw\"=aF1$\"32gLQ`AGWAF17$$\"3a7c'y')=b ;'F1$\"3KZr8M:%Qb#F17$$\"3KoLE)>mM'pF1$\"3)HIZ/9iV)GF17$$\"3#p8'*y2Dlo (F1$\"3w!\\&yMH'Q=$F17$$\"3a]@@=%>qZ)F1$\"3wcN_6kH6NF17$$\"3WO]y()H\"3 A*F1$\"37Ulk&z&Q>QF17$$\"3K)4kBe\"H)***F1$\"3Tif(R(zUTTF17$$\"3;&Rr=!> %e2\"F.$\"3]jRCnIGcWF17$$\"3y(yi**>?a:\"F.$\"3!>?W1<2fy%F17$$\"34y)H\" fN1K7F.$\"3;7E(*eVP.^F17$$\"3>rQsjCW58F.$\"3.,/%=TI!GaF17$$\"3#4<:9Ns \")Q\"F.$\"3[R^n[\")**\\dF17$$\"3MJ'*[X!)ff9F.$\"31r1bgI&e/'F17$$\"3s/ WG^*f9a\"F.$\"3#)3(pnQs5K(F17$$\" 3[tD-l!fx%=F.$\"3k&z,tkoOl(F1F<-FB6#\"\"\"-F(6%7S7$FRFa]l7$FW$\"3Ta,Tc A,?tF17$Ffn$\"3Hlju9'*pHqF17$F[o$\"3S%3Wjo7Kq'F17$F`o$\"3aZ*\\1fhXP'F1 7$Feo$\"3C(*[C;DZZgF17$Fjo$\"3&*\\a&R2>Uu&F17$F_p$\"3vE'*e*p<-V&F17$Fd p$\"3h&)o.HqZ0^F17$Fip$\"3?'4Lf!yx\"y%F17$F^q$\"3Y9(ysO8)[WF17$Fcq$\"3 A8cZ3\"Qb:%F17$Fhq$\"3i[%>\"H'z`#QF17$F]r$\"3EtgK([lQ\\$F17$Fbr$\"3%3Z JO=!RuJF17$Fgr$\"3S1df,gF%)GF17$F\\s$\"30I2ry@IRDF17$Fas$\"3m5jV+T1ZAF 17$Ffs$\"37bv\">u@r!>F17$F[t$\"3g;Dh`^@1;F17$F`t$\"3u(>8^$H2w7F17$Fet$ \"35#H!o7Z*ph*Fit7$F[u$\"3s.i(oTPoL'Fit7$F`u$\"3\")z./l!HYK$Fit7$Feu$ \"3SAj=PAabvFju7$F\\v$!3-)))[o&*=$*H$Fit7$Fav$!3I0E,Dq:PiFit7$Ffv$!3A) HLLi-,T*Fit7$F[w$!3Gy[$**e1)o7F17$F`w$!3M(H$[X8\\*e\"F17$Few$!3E0$zdLq (**=F17$Fjw$!32gLQ`AGWAF17$F_x$!3KZr8M:%Qb#F17$Fdx$!3)HIZ/9iV)GF17$Fix $!3w!\\&yMH'Q=$F17$F^y$!3wcN_6kH6NF17$Fcy$!37Ulk&z&Q>QF17$Fhy$!3Tif(R( zUTTF17$F]z$!3]jRCnIGcWF17$Fbz$!3!>?W1<2fy%F17$Fgz$!3;7E(*eVP.^F17$F\\ [l$!3.,/%=TI!GaF17$Fa[l$!3[R^n[\")**\\dF17$Ff[l$!31r1bgI&e/'F17$F[\\l$ !3#)3(pnQs5K(F17$F_]lFTF\"=X!eKP\"F.$\"3k/Kb&f@pn'F17$ $!3aV$Ryn=OP\"F.$\"3W.Z9)*Gi\"o'F17$$!3)=^mVhlHP\"F.$\"39!G.E*odtmF17$ $!3K2!=qM8WO\"F.$\"3)=]uK*=\"pd'F17$$!3/1P\\TfJ[8F.$\"3KI[%eYFGT'F17$$ !39\")\\]Ap_#H\"F.$\"3vzttA#f[#fF17$$!3_yK%)))4d;7F.$\"3q&pB%*>C*p`F17 $$!3$f[#3\"e>n7\"F.$\"3a4(=x3]V\"[F17$$!3mqX],GK%F17 $$!3y_ehO4.,$*F1$\"35/u8Jjt_QF17$$!3c6)RRGv&F1$\"3xSIo)=D!>FF17$$!3#)* zUmn#=UYF1$\"3AQamc>6*[#F17$$!3IFFs%39XQ$F1$\"37kbMk%*\\\"H#F17$$!33M \\2X&*eA@F1$\"3/Y^'4f+t:#F17$$!3kP#4rsS(f\"*Fit$\"3s7nJK:3(3#F17$$\"3o #4*)=WdKl\"Fit$\"3-@nWu\"*er?F17$$\"3Tbu.II)fU\"F1$\"3UQ_KFS\"*4@F17$$ \"3m`/Z`\"GrY#F1$\"3aW#3z)*3x=#F17$$\"3x$y\\v`l7k$F1$\"3\"3q(o*[ulK#F1 7$$\"3QH/8M\"3Fk%F1$\"3%zyC]D3#*[#F17$$\"3c*RL6nPdp&F1$\"3<-%oBi(31FF1 7$$\"3]-tH)e4*\\mF1$\"3ObEg*G%\\XHF17$$\"3Ixuj%oT5f(F1$\"3Z\"3#)fb)RCK F17$$\"3Mpd#f'=D.%)F1$\"3/]Nr`B.-NF17$$\"30n%GLSP0A*F1$\"3%**f#R.AG>QF 17$$\"3sbt(QG/-+\"F.$\"331a$3$)4A;%F17$$\"3yQR2SSWi5F.$\"3i\\>fo@dmWF1 7$$\"3tOZ_lMWB6F.$\"3w!4a4:;dz%F17$$\"3E-o!o$p`z6F.$\"3&z))Rr9Q)H^F17$ $\"37>K`&4.vA\"F.$\"3S)eoHv)=WaF17$$\"3Cz'\\AeatE\"F.$\"35@\"F.$\"33Orry*oW7\"F17$$\"3o-mGTcU27F.$\"3U))G^+L2:KFit7 $$\"3F;X+*\\t@F17$$\"3)G3iQ%\\BL7F.$!3K3aXuTb18F.$!3P;G.v([\"=X!eKP\"F.$!3k/Kb&f @pn'F17$$\"3aV$Ryn=OP\"F.$!3W.Z9)*Gi\"o'F17$$\"3)=^mVhlHP\"F.$!39!G.E* odtmF17$$\"3K2!=qM8WO\"F.$!3)=]uK*=\"pd'F17$$\"3/1P\\TfJ[8F.$!3KI[%eYF GT'F17$$\"39\")\\]Ap_#H\"F.$!3vzttA#f[#fF17$$\"3_yK%)))4d;7F.$!3q&pB%* >C*p`F17$$\"3$f[#3\"e>n7\"F.$!3a4(=x3]V\"[F17$$\"3mqX ],GK%F17$$\"3y_ehO4.,$*F1$!35/u8Jjt_QF17$$\"3c6)RRGv&F1$!3xSIo)=D!>FF1 7$$\"3#)*zUmn#=UYF1$!3AQamc>6*[#F17$$\"3IFFs%39XQ$F1$!37kbMk%*\\\"H#F1 7$$\"33M\\2X&*eA@F1$!3/Y^'4f+t:#F17$$\"3kP#4rsS(f\"*Fit$!3s7nJK:3(3#F1 7$$!3o#4*)=WdKl\"Fit$!3-@nWu\"*er?F17$$!3Tbu.II)fU\"F1$!3UQ_KFS\"*4@F1 7$$!3m`/Z`\"GrY#F1$!3aW#3z)*3x=#F17$$!3x$y\\v`l7k$F1$!3\"3q(o*[ulK#F17 $$!3QH/8M\"3Fk%F1$!3%zyC]D3#*[#F17$$!3c*RL6nPdp&F1$!3<-%oBi(31FF17$$!3 ]-tH)e4*\\mF1$!3ObEg*G%\\XHF17$$!3Ixuj%oT5f(F1$!3Z\"3#)fb)RCKF17$$!3Mp d#f'=D.%)F1$!3/]Nr`B.-NF17$$!30n%GLSP0A*F1$!3%**f#R.AG>QF17$$!3sbt(QG/ -+\"F.$!331a$3$)4A;%F17$$!3yQR2SSWi5F.$!3i\\>fo@dmWF17$$!3tOZ_lMWB6F.$ !3w!4a4:;dz%F17$$!3E-o!o$p`z6F.$!3&z))Rr9Q)H^F17$$!37>K`&4.vA\"F.$!3S) eoHv)=WaF17$$!3Cz'\\AeatE\"F.$!35@\"F.$!33Orry*oW7\"F17$$!3o-mGTcU27F.$!3U))G^+L2:K Fit7$$!3F;X+*\\t@F17$$!3)G3iQ%\\BL7F.$\"3K3aXuTb18F.$\"3P;G.v([P]_/\"F.$\"3K\"4e:!)o&HVF17$$!3%R\"eol!fx%=F1$!3 3G!\\+loOl(Fit7$$!3#[*='yI2&[6F.$\"3'e,`=3h4%\\F1FKGmI\"Fit$\"3KoQ ?>(yx$RyF1$\"3A=0-+m'*[*Rq3]GF1F]!HAH#F1Fx%F1$\"3U^\\$>'yhw>F17$$!3p 3,LWb]J\\Fit$\"3gBqf,vqv?F1FRF1$\"36f-,+$)eB;F17$$\"3%*\\A$zV5;/'F1$\"3F#Rm>)p^-DF17$$\"3MZPV?8 N%H#F1$\"3=Ur>V+)=<#F1F#R#3\"F17$$\"3#y9TDpuV?(F1$\"3'*R!ogq\\T)HF17$$\"3m][<2`%y)[F 1$\"37/i'fc7a`#F1FT&Fit7$$\"3Yz\")o^dgo#)F1$\"3CCaEW'o\\U$F17$$\"3!p(=b3o8?sF1$\" 3)*R+,u\"*>4JF1FT&Fit7$$\"3Z:5O\"[O;,\"F.$\"39%H6x]N.>%F17$$\"3)*GY/,J[ !4\"F.$\"33e%Q#R#3\"F17$$\"3s4&Q;G*)**3\"F.$\"3Bz(fHV$)[^%F17$$\"3?Gq#z,H#> 7F.$\"3eyQVY*HyQ&F1FRF1$ !3*H*4a,$)eB;F17$$\"3AJCMj()[e6F.$\"3O*pKjd<')z%F17$$\"3K'f8F.$\"3- C-0C=CElF1F!HbF_F17$$\"3!*\\5Q&)RXt8F.$\"3%e?2eG !\\zmF1FP]_/\"F.$!3K\"4e:!)o&HVF17$$\"3o C@eX8V$H\"F.$\"33xfQ`!ovN&F17$$\"3g$Hq'*QAPD\"F.$\"3e&z'Rchi2QF1FM++h>T&F17$$\"3)H#yU 3>+R#*F1$\"3n7p#QF17$$\"38(ylxSalI\"F.$!37sLk2Wv6aF1F " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 58 "eliminate(\{x=M[ 1],y=M[2],(u+v)^2-4*u*v*cos(a)^2=l\},\{u,v\}):" }}{PARA 7 "" 1 "" {TEXT -1 33 "Warning, computation interrupted\n" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 692 "restart:\n A:=[u,a*u]:B:=[v,-v*a]:M:=expand(t *A+(1-t)*B);\n sol:=[solve(\{add((expand(B-A))[k]^2,k=1..2)=L^2\},v)]: \n M1:=simplify(subs(op(sol[1]),M)):\n M11:=normal(diff(M1,t)); M12:=n ormal(diff(M1,u)):\n eq:=numer(normal(M11[1]*M12[2]-M11[2]*M12[1])):\n sol2:=solve(eq,t):\n M1:=simplify(subs(t=sol2,M1)); maxi:=expand(sim plify(combine(solve(-4*a^2*u^2+L^2+a^2*L^2,u)[2])));\n \+ \n aa:=evalf(tan(Pi/8));ll:=1:maxif:=evalf(subs(\{a=aa,L =ll\},maxi));inter:=-maxif..maxif;\n Mf:=subs(\{a=aa,L=ll\},M1);\n plo t([[t,t*aa,t=-2..2],[t,-t*aa,t=-2..2], [op(Mf),u=inter],[op(subs(\{a=a a,L=ll\},-Mf)),u=inter]],scaling=constrained,color=[black $ 2,red $ 2] ,axes=none,thickness=[1 $ 2,2 $ 2]);" }}{PARA 7 "" 1 "" {TEXT -1 50 "W arning, the name changecoords has been redefined\n" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#>%\"MG7$,(%\"vG\"\"\"*&F'F(%\"tGF(!\"\"*&%\"uGF(F*F(F (,(*&F'F(%\"aGF(F+*(F'F(F0F(F*F(F(*(F0F(F-F(F*F(F(" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#>%$M11G7$,$*&,&*(\"\"#\"\"\")%\"aGF*F+%\"uGF+!\"\"*$, (*(\"\"%F+F,F+)F.F*F+F/*&F,F+)%\"LGF*F+F+*$F6F+F+#F+F*F+F+,&*$F,F+F+F+ F+F/F/*(F-F+,&*&F*F+F.F+F+F0F+F+F:F/" }}{PARA 12 "" 1 "" {XPPMATH 20 " 6#>%#M1G7$*(,2**\"\"#\"\"\")%\"aG\"\"%F*%\"uGF*)%\"LGF)F*!\"\"*(F)F*F. F*F/F*F**(,(*(F-F*)F,F)F*)F.F)F*F1*&F6F*F/F*F**$F/F*F*#F*F)F/F*F6F*F** &F4F:F/F*F***F)F*F+F*F7F*F4F:F***\"\"'F*F6F*F7F*F4F:F1*(\"#7F*F+F*)F. \"\"$F*F**(F-F*F6F*FAF*F1F*F0!\"#,&*$F6F*F*F*F*FD,$**F,F*,2**F)F*F+F*F .F*F/F*F1*(F)F*F.F*F/F*F*F3F*F;F***F>F*F6F*F7F*F4F:F1*(F)F*F7F*F4F:F** (F@F*F6F*FAF*F1*(F-F*F+F*FAF*F*F*F0FDFEFDF1" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%maxiG,$**\"\"#!\"\",&*$)%\"aGF'\"\"\"F-F-F-#F-F'%\"L GF-F,F(F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#aaG$\"+Dc8UT!#5" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%&maxifG$!+kHc18!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&interG;$\"+kHc18!\"*$!+kHc18F(" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#MfG7$,**&$\"+jN@99!\"*\"\"\"%\"uGF+F+*&$\"+5R`N &)!#5F+,&*&$\"+;]\"H'oF0F+)F,\"\"#F+!\"\"$\"+vGdr6F*F+#F+F6F+*($\"+?y1 rqF0F+F5F+F1F:F7*&$\"+uoSECF0F+)F,\"\"$F+F7,**&$\"+#Qky&eF0F+F,F+F7*&$ \"+4R`NNF0F+F1F:F7*($\"+!>K*GHF0F+F5F+F1F:F7*&$\"+)Qky&eF0F+FAF+F+" }} {PARA 13 "" 1 "" {GLPLOT2D 496 496 496 {PLOTDATA 2 "6*-%'CURVESG6%7S7$ $!\"#\"\"!$!3U+++]7F%G)!#=7$$!3MLLL$Q6G\">!#<$!3)=`5['***F-$!3Dp[) \\2h09%F-7$$!3E++++0\"*H\"*F-$!3mc6^`Ft\"y$F-7$$!35++++83&H)F-$!3pJ,]w ^$fV$F-7$$!3\\LLL3k(p`(F-$!3'\\?u&[y\">7$F-7$$!3Anmmmj^NmF-$!3[cSEt3_[ FF-7$$!3)zmmmYh=(eF-$!3gvWhcY?KCF-7$$!3+,++v#\\N)\\F-$!3mU?4*p`U1#F-7$ $!3commmCC(>%F-$!3R)G%zaZbQ7$$ !3komm;Wn(o)Fgr$!3g5w'*pDb)f$Fgr7$$!3IqLLL$eV(>!#?$!3!*yd,*)*f!y\")!#@ 7$$\"3)Qjmm\"f`@')Fgr$\"3i*=ki5d6d$Fgr7$$\"3%z****\\nZ)H;F-$\"3594%z6] 5v'Fgr7$$\"3ckmm;$y*eCF-$\"3B_nlo@a=5F-7$$\"3f)******R^bJ$F-$\"31ie/dj Mt8F-7$$\"3'e*****\\5a`TF-$\"35*[5`.`/s\"F-7$$\"3'o****\\7RV'\\F-$\"3i \"QCWf'Hc?F-7$$\"3Y'*****\\@fkeF-$\"3;L512O>HCF-7$$\"3_ILLL&4Nn'F-$\"3 a6(z\"e\"eUw#F-7$$\"3A*******\\,s`(F-$\"3gV`f%36?7$F-7$$\"3%[mm;zM)>$) F-$\"3q%pn%3%)=YMF-7$$\"3M*******pfa<*F-$\"3D\"=7*\\)*f+QF-7$$\"39HLLe g`!)**F-$\"3[c>Q'RtS8%F-7$$\"3w****\\#G2A3\"F1$\"3K)ox%Q$\\E[%F-7$$\"3 ;LLL$)G[k6F1$\"3-=xvNgWB[F-7$$\"3#)****\\7yh]7F1$\"3'*>eT%fG-=&F-7$$\" 3xmmm')fdL8F1$\"3\"e_;Ig_Q_&F-7$$\"3bmmm,FT=9F1$\"3i'*f_#yd_(eF-7$$\"3 FLL$e#pa-:F1$\"3f#[G(\\JvBiF-7$$\"3!*******Rv&)z:F1$\"32i)e))>%)Ra'F-7 $$\"3ILLLGUYo;F1$\"3sMw@>^+6pF-7$$\"3_mmm1^rZS]F*e(F-7$$\"34++]2%)38>F1$\"3hn-[Y;FCzF-7$$\"\"#F*$ \"3U+++]7F%G)F--%'COLOURG6&%$RGBGF*F*F*-%*THICKNESSG6#\"\"\"-F$6%7S7$F (Fjz7$F/$\"3)=`5[7$F-7$Fep$\"3[cSEt3_[FF-7$Fjp$\" 3gvWhcY?KCF-7$F_q$\"3mU?4*p`U1#F-7$Fdq$\"3R)G%zaZbQHCF-7$Fhu$!3a6(z\"e\"eUw#F-7$F]v$!3gV`f%36? 7$F-7$Fbv$!3q%pn%3%)=YMF-7$Fgv$!3D\"=7*\\)*f+QF-7$F\\w$!3[c>Q'RtS8%F-7 $Faw$!3K)ox%Q$\\E[%F-7$Ffw$!3-=xvNgWB[F-7$F[x$!3'*>eT%fG-=&F-7$F`x$!3 \"e_;Ig_Q_&F-7$Fex$!3i'*f_#yd_(eF-7$Fjx$!3f#[G(\\JvBiF-7$F_y$!32i)e))> %)Ra'F-7$Fdy$!3sMw@>^+6pF-7$Fiy$!3duYn0IFRsF-7$F^z$!3ueH>S]F*e(F-7$Fcz $!3hn-[Y;FCzF-7$FhzF+F\\[lF`[l-F$6%7]o7$$!3XIjd&GplI\"F1$!3LP)[Jf8@T&F -7$$!3q'om!R?5c8F1$!3*)\\`]83$eT'F-7$$!3%R$fAgqno8F1$!3Q3mpB'*)Gh'F-7$ $!3-t.493qr8F1$!3AIyw\"))\\el'F-7$$!3Yp:7X!eKP\"F1$!3-T#fnf@pn'F-7$$!3 3hVzx'=OP\"F1$!3%yZD'**Gi\"o'F-7$$!3=kIL9c'HP\"F1$!3UO+H%*odtmF-7$$!3% e65qM8WO\"F1$!3ea&o`*=\"pd'F-7$$!3Gw')\\TfJ[8F1$!3vQc4ou#GT'F-7$$!35#R n7\"F1$!3Txpb*3]V\"[F-7$$!3>/s]B%)zL5F1$!3&4Q0i],GK%F-7$$!3t$y=h$4 .,$*F-$!35&H'eKjt_QF-7$$!3?^a?$Gv&F-$!3'Qi(y*=D!>FF-7$$!3h:a=vE=UYF-$!39r 5ud>6*[#F-7$$!3!f7?I39XQ$F-$!3SusUl%*\\\"H#F-7$$!3/x_8V&*eA@F-$!3o094# f+t:#F-7$$!3WZ4a02uf\"*Fgr$!3E_\">N`\"3(3#F-7$$\"3ubhJluD`;Fgr$!3a.Puv \"*er?F-7$$\"3C'H&eKI)fU\"F-$!3=Q@wGS\"*4@F-7$$\"3w\"Hxh:GrY#F-$!3!Qk$ [*)*3x=#F-7$$\"3DIKUSbETOF-$!3'R(HW\"\\ulK#F-7$$\"350S8P\"3Fk%F-$!3;ZB &pD3#*[#F-7$$\"3G(>gUnPdp&F-$!3ezZ\\Cw31FF-7$$\"3!)\\=_\"f4*\\mF-$!3#f rB>H%\\XHF-7$$\"3a=K%zoT5f(F-$!39Qt]e&)RCKF-7$$\"3IQrGp=D.%)F-$!38*HBk NK?]$F-7$$\"3BB%HnSP0A*F-$!3\\OPH1AG>QF-7$$\"3GH$>UG/-+\"F1$!3w%4AR$)4 A;%F-7$$\"3]7dTSSWi5F1$!3Y4^#=2uZC)oTkF-7$ $\"3!4S))GXKUO\"F1$!3w%)>!z(\\'\\d'F-7$$\"3qV#GOW7?P\"F1$!3q(*)>-lh@m' F-7$$\"3a@BKi*QMP\"F1$!3)\\XYI1y$zmF-7$$\"3+4X0qf[t8F1$!3k^*[9k1*zmF-7 $$\"3)p>Vl51@P\"F1$!37$zjfs@9m'F-7$$\"39&QILp=$p8F1$!3ZwajOm=AmF-7$$\" 3Kj?*4]P+O\"F1$!3W?28`bD!['F-7$$\"3+COK\"4\"RX8F1$!3#[)35tX3HiF-7$$\"3 (zp/Ts@sK\"F1$!3sv')p%Q4^(eF-7$$\"3yI'eu.CaI\"F1$!3Uo;yO'[VQ&F-7$$\"3% \\(=3g*Q5@\"F1$!3$Rn&=u*oW7\"F-7$$\"3jFoXT cU27F1$!3!)[[6 1Y@\"F1$\"3?QVeJ%GWb\"F-7$$\"37x#HUkh=A\"F1$\"3kIit5!*\\t@F-7$$\"3EzN; W\\BL7F1$\"3!ftPq6fx(GF-7$$\"3e@Q2].FT7F1$\"3U*)yVF?lyKF-7$$\"3;YSUK;$ =D\"F1$\"3KMxn\\%[Ht$F-7$$\"3#[N^w#z$pE\"F1$\"3%\\4\")yBBiG%F-7$$\"34U ;EWmb18F1$\"3)3j9[S3=T&F--F][l6&F_[l$\"*++++\"!\")$F*F*Fcim-Fa[l6#Fiz- F$6%7]o7$$\"3XIjd&GplI\"F1$\"3LP)[Jf8@T&F-7$$\"3q'om!R?5c8F1$\"3*)\\`] 83$eT'F-7$$\"3%R$fAgqno8F1$\"3Q3mpB'*)Gh'F-7$$\"3-t.493qr8F1$\"3AIyw\" ))\\el'F-7$$\"3Yp:7X!eKP\"F1$\"3-T#fnf@pn'F-7$$\"33hVzx'=OP\"F1$\"3%yZ D'**Gi\"o'F-7$$\"3=kIL9c'HP\"F1$\"3UO+H%*odtmF-7$$\"3%e65qM8WO\"F1$\"3 ea&o`*=\"pd'F-7$$\"3Gw')\\TfJ[8F1$\"3vQc4ou#GT'F-7$$\"35#Rn7\" F1$\"3Txpb*3]V\"[F-7$$\"3>/s]B%)zL5F1$\"3&4Q0i],GK%F-7$$\"3t$y=h$4.,$* F-$\"35&H'eKjt_QF-7$$\"3?^a?$Gv&F-$\"3'Qi(y*=D!>FF-7$$\"3h:a=vE=UYF-$ \"39r5ud>6*[#F-7$$\"3!f7?I39XQ$F-$\"3SusUl%*\\\"H#F-7$$\"3/x_8V&*eA@F- $\"3o094#f+t:#F-7$$\"3WZ4a02uf\"*Fgr$\"3E_\">N`\"3(3#F-7$$!3ubhJluD`;F gr$\"3a.Puv\"*er?F-7$$!3C'H&eKI)fU\"F-$\"3=Q@wGS\"*4@F-7$$!3w\"Hxh:GrY #F-$\"3!Qk$[*)*3x=#F-7$$!3DIKUSbETOF-$\"3'R(HW\"\\ulK#F-7$$!350S8P\"3F k%F-$\"3;ZB&pD3#*[#F-7$$!3G(>gUnPdp&F-$\"3ezZ\\Cw31FF-7$$!3!)\\=_\"f4* \\mF-$\"3#frB>H%\\XHF-7$$!3a=K%zoT5f(F-$\"39Qt]e&)RCKF-7$$!3IQrGp=D.%) F-$\"38*HBkNK?]$F-7$$!3BB%HnSP0A*F-$\"3\\OPH1AG>QF-7$$!3GH$>UG/-+\"F1$ \"3w%4AR$)4A;%F-7$$!3]7dTSSWi5F1$\"3Y4^#=2 uZC)oTkF-7$$!3!4S))GXKUO\"F1$\"3w%)>!z(\\'\\d'F-7$$!3qV#GOW7?P\"F1$\"3 q(*)>-lh@m'F-7$$!3a@BKi*QMP\"F1$\"3)\\XYI1y$zmF-7$$!3+4X0qf[t8F1$\"3k^ *[9k1*zmF-7$$!3)p>Vl51@P\"F1$\"37$zjfs@9m'F-7$$!39&QILp=$p8F1$\"3ZwajO m=AmF-7$$!3Kj?*4]P+O\"F1$\"3W?28`bD!['F-7$$!3+COK\"4\"RX8F1$\"3#[)35tX 3HiF-7$$!3(zp/Ts@sK\"F1$\"3sv')p%Q4^(eF-7$$!3yI'eu.CaI\"F1$\"3Uo;yO'[V Q&F-7$$!3%\\(=3g*Q5@\"F1$\"3$Rn&=u*oW7\"F- 7$$!3jFoXTcU27F1$\"3!)[[61Y@\"F1$!3?QVeJ%GWb\"F-7$$!37x#HUkh=A\"F1$!3kIit5!*\\t@F-7$$!3 EzN;W\\BL7F1$!3!ftPq6fx(GF-7$$!3e@Q2].FT7F1$!3U*)yVF?lyKF-7$$!3;YSUK;$ =D\"F1$!3KMxn\\%[Ht$F-7$$!3#[N^w#z$pE\"F1$!3%\\4\")yBBiG%F-7$$!34U;EWm b18F1$!3)3j9[S3=T&F-F^imFdim-%(SCALINGG6#%,CONSTRAINEDG-%*AXESSTYLEG6# %%NONEG-%+AXESLABELSG6$Q!6\"Fi^o-%%VIEWG6$%(DEFAULTGF^_o" 1 2 0 1 10 0 2 9 1 1 1 1.000000 45.000000 45.000000 0 0 "Curve 1" "Curve 2" "Curv e 3" "Curve 4" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}} {MARK "9 1 0" 2 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }