{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 "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 Plot" -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 8 "restart:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 63 "Vunite:=U->[U[1]/sqrt(U[1]^2+U[2]^2 ),U[2]/sqrt(U[1]^2+U[2]^2)]:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 115 "ptcour:=(u,pt1,pt2,dir1,dir2,U)->\nexpand(pt1+ (u)*(pt2-pt1) +U *(sqrt(u*(1-u)))*Vunite(expand(dir1+u*(dir2-dir1)))):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 83 "pt1:=[x0,y0]:pt2:=[x1,y1]:dir1:=[1, a]:dir2:=[1,b]:M:=ptcour(u,pt1,pt2,dir1,dir2,U);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%\"MG7$,**(,0*&)% \"aG\"\"#\"\"\")%\"uGF,F-F-**F,F-F+F-%\"bGF-F.F-!\"\"*&)F1F,F-F.F-F-*( F,F-F*F-F/F-F2**F,F-F+F-F1F-F/F-F-*$F*F-F-F-F-#F2F,%\"UGF-,&*$F.F-F2F/ F-#F-F,F-*&%#x0GF-F/F-F2*&%#x1GF-F/F-F-F>F-,.*,F(F8F+F-F/F-F9F-F:F " 0 "" {MPLTEXT 1 0 24 "M1:=simplify(dif f(M,u)):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "limit(M1[2]/M1[ 1],u=1);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%\"bG" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 35 "x0,y0,x1,y1,a,b,U:=0,0,1,0,1,0,1:M;" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#7$,&*&,(*$)%\"uG\"\"#\"\"\"F+*&F*F+F)F +!\"\"F*F+#F-F*,&*$F(F+F-F)F+#F+F*F+F)F+,&*(F&F.F)F+F/F1F-F%F+" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 "plot([[op(M),u=0..1]],scalin g=constrained);" }}{PARA 13 "" 1 "" {GLPLOT2D 404 336 336 {PLOTDATA 2 "6&-%'CURVESG6$X0%)anythingG6\"6\"[gl'\"%!!!#cdl\"gw\"#!!!!00000000000 000003F9B98DD018C30C13FA3E886CD08BD1A3FA8C0C6537136C23FACF161C60660F93 FB1A7A5DC42AB643FB4774E9BC79C2E3FB9FC672A7A13B53FBEDB46B6890F213FC1A2F 07B6D09123FC38C229A1911223FC56BB8738B81B13FC744C1871532E53FC9094A1700F 7393FCACA4320BEB79C3FCC49D8B2A37CE33FCDEE1DF35300C03FCF8946A4433E603FD 0863275DD3F7F3FD1327C49579A2D3FD1FB7304C73F403FD2A2A9212ECA803FD361F77 CC580383FD408A71C5B79C03FD4BCE2000A2A923FD5661A813A08A63FD6145671B3761 C3FD6B25F3E5FFE393FD75AD8C30B32363FD807C8D7731F563FD89CB5A18F201B3FD93 BF234C71C103FD9DEC8BECF098A3FDA7C8637745AD23FDB13BCBD73F20F3FDBBA1451D 994843FDC4E34C94CF2A83FDCEB04CD2ACD463FDD77F52EC823DD3FDE10D39BDCC6163 FDE9F8B01F5EDBA3FDF3398E33227903FDFC3449A1B54243FE02C48A6261D993FE073A 8815AF2DE3FE0BC22076E4D703FE10381485B954E3FE144A8566A3BA13FE18ED55C0C8 C2B3FE1D0BCC8D517543FE2168E850DFA6A3FE258F523928E143FE2A23580C0A8403FE 2E13D5D5217413FE328568DB9210B3FE368BBBB950E9E3FE3AEBCD82EED883FE3EAC7A E5754493FE42EC2B73C192C3FE47006B0373FA83FE4B0DC3D3D43683FE4F112D064322 A3FE52E67F2E28F333FE57051A719EF3F3FE5AEC3F11964963FE5F018C55183F63FE62 AE4ED74664E3FE66B7FDE2F9B223FE6A902CABECC303FE6E603B69F845A3FE7255A4DA D6DFA3FE75F58DD4423143FE79A66E9D5DE6E3FE7DB3534A51BAC3FE815865E3DC5D63 FE850CFF64836FF3FE88CBDAAF3607E3FE8C3808DD0AEC23FE8FD88926382A83FE936C 60E5BACA03FE9739E06FEA4363FE9A8FA512D572E3FE9E6287CD261053FEA1D0333BD7 3AB3FEA52F46655C9F83FEA8C96C4EA84133FEAC611880B43A63FEAFA070F34F3863FE B30D9E56A88B53FEB660002DA2A723FEB9F37C22277563FEBD0649ABCCCAF3FEC087CF 8833A7B3FEC3CD8131819013FEC70552762D8943FECA37FFB808F503FECD74FD677585 03FED0DD0AA6FD5043FED3F68FAE8FB2D3FED700233F6825B3FEDA3904537F67E3FEDD 6986F285E283FEE040C303EBE223FEE397472FD6AEE3FEE65C7757809F03FEE993254D A134C3FEEC9D6CE0134AA3FEEF4E9AB1EFF6E3FEF24F24F363EC33FEF54DC151794483 FEF841A9AAC418E3FEFAF82349D73033FEFDC0BB6FC036C3FF004D579D0BF993FF01B5 90C5BAA283FF032454BD9A2E53FF04642EA1FB2163FF05C8A42DD82653FF072AAB9568 DB83FF087C1CAF4D5943FF09AB56355CB1D3FF0B0FE3648C1683FF0C3A7D1C04E303FF 0D91CFCAFA1A23FF0EBE108003E2B3FF10038159C688D3FF11357BD6C62D43FF12709E 28A40B73FF138E4228B48BC3FF14BE497F4FE633FF15F58E9E206483FF1700B6E0B2C9 03FF181D39BBC4ABE3FF193EB55E234BD3FF1A557BC168DFA3FF1B5EFD7B603CC3FF1C 80DC0C7C7023FF1D80D5C0546583FF1E8D642D3EA163FF1F7C7284FEB6B3FF207D0F30 E8E7A3FF2169ED727A1343FF225CB40050A8E3FF23453A5A372EC3FF24337648CB7B83 FF2513CE36BFD0A3FF25F3F77481A753FF26CCEE599EB713FF278F88CF092A43FF2868 DDB360AEE3FF29260019ABF0C3FF29EA19B9A18903FF2AA053FD08FD23FF2B6449BDDF 2483FF2C087314E63FE3FF2CBC7017659E43FF2D5A7EB669FCD3FF2E00B6E77C6BC3FF 2E8A6B26920A23FF2F20A8F85A8E63FF2FAAFAD14FDC53FF302E5F68511733FF30AA53 50B633C3FF311AB564CB84E3FF318CA18A603013FF31F1B39F759853FF3253F1BDD788 A3FF32A57D4F0A3D33FF32F734F30C31A3FF333CF4B48C5D93FF3379F6FD8C5323FF33 B03F9C6238F3FF33D96C81FFD743FF33FA847E496CF3FF3413FDEEE03653FF3420A59D 44D9E3FF3422EED06E52E3FF3419BC3CD2D903FF340694AA63C253FF33E65AA660AE83 FF33B9BE92D71D73FF337B5C0C2BE083FF333705C49F3163FF32D7C478A2B023FF3271 C70BCFD503FF31FCE5498C5DE3FF316C3CBDEF28C3FF30C5AEA51A7F93FF301A0E0298 A5F3FF2F4CFCEA128E23FF2E6C1680720A73FF2D59B3CD93DCA3FF2C4FB07D018933FF 2AF937FBFEBA83FF298E35E9F87F63FF27F92BD35A6513FF262E5057156533FF2417B1 A7985993FF2184CA98038AB3FF1EBB3BAFD5C573FF1B6BCDA6360A03FF16EEFBD1617A 73FF1090B4C1B6C7C3FF000000000000000000000000000003F9A3777BD2712AC3FA28 378E14CF4023FA6A4FB5FE658BF3FAA1CECB6CE67BE3FAF35A13722447F3FB1C5C3A76 D25483FB5D1F2BABC72F73FB92DC4E578D8EC3FBC109E9728DBBA3FBE729B426952B93 FC057C08E56B1DD3FC166A9AF9097343FC25F78011C60843FC34CADDA6A54973FC40FF D3D015F2A3FC4DE6FEBE2A1443FC5A0FDA8277B853FC651A3F19ECA593FC6E9AD4977B FEB3FC794F78548EB133FC81E9F4570C1633FC8B6CCC881E0C13FC936DA5A5F23443FC 9BCA2E5C1C0853FCA35E599D3052A3FCAAE6A40C13C8B3FCB17FA3F1C427B3FCB84A34 34933113FCBF011B2E933EA3FCC4949E52824C23FCCA559B9127C9E3FCCFFF77E21411 93FCD54610B31C5973FCDA237927316343FCDF463E2E187E83FCE3A8BAD3970A23FCE8 1BD7506BB553FCEBF0C7B008AC73FCEFEB2FF98C03A3FCF3776E42E93583FCF6FA8036 D95E43FCFA392D8BA90FE3FCFD6D074EA4BD03FD0029E1E90FDDD3FD018E7D144DF0D3 FD02D99318817003FD03F675DDAFB1D3FD0526B5A03DBF03FD062321EA021863FD071C 3A59B05F63FD07F7ACBD5FDC43FD08D60FAEDFA143FD0984E6AE738923FD0A37CE4719 9B33FD0AC91A30A45CC3FD0B550386172B43FD0BBE0C011D8C73FD0C244882BDD083FD 0C75C2D1D79CE3FD0CB684457EAD63FD0CE6BD35D7E7F3FD0D05FE946526C3FD0D176F 8D898063FD0D188008D5D713FD0D097ACC03DEF3FD0CEDD2C3EAB4C3FD0CBFF36EEBC2 C3FD0C852A4327E353FD0C3C42AE922A83FD0BE11F75DD46A3FD0B7FD34CFA6813FD0B 0F16F9E9AE43FD0A837201628EF3FD09F7777BF33AA3FD095B2FE40417E3FD08AED3B0 CB5EA3FD08049BFC7D5AE3FD0742E578143943FD06764E80827723FD058E05D7B39933 FD04B5A88ED9B2E3FD03AEEFCF84DB23FD02B5FA345FAE63FD01B4B4950824E3FD0094 1281430953FCFECBE40E6D6683FCFC90EF0CB3AB83FCFA1CCE49476F43FCF7A273346B 69B3FCF4DB4A0B22A813FCF260762D377543FCEF715A17547E73FCEC9A1FE6D1F523FC E9B60232C2F833FCE6BDBCC4BA0443FCE3A26D686FAAE3FCE041CF68DA4C13FCDD15CA 74BFF1B3FCD9E26D486BDF63FCD663465F8D9583FCD2D287B5DA0543FCCF8EEADA1048 73FCCB9D5A52BF4443FCC8406A56298A23FCC43F0E8220D9D3FCC05A42236FBAD3FCBC D1792B4C7053FCB8C7973365C943FCB4A5AB3B93A013FCB077F88DE8C5E3FCAC898611 617F33FCA868C7275D4C63FCA414886FD75493FC9FB49CAB94FF43FC9B251A447BA4A3 FC9713FBDCF09EA3FC9271EBEDF52D43FC8DBC6437758DE3FC892520041DF823FC84EE A57EF495A3FC7FDEAA92AB60E3FC7B898E0B7D1343FC7672C3864D2D63FC71E68A50C0 CA03FC6CDDA00DEE8943FC68075741B3F283FC62F04E4476D163FC5E3A1DDC48DB23FC 591B1F346C98C3FC53BECF6138D783FC4F0BC564F6C783FC49EFF88B5C9B43FC449FFF A9EFAB23FC3F652AEE8DC323FC3A4E4318BCD683FC349F5E17F9BA43FC2F7D105A3184 C3FC29FAD7EBAF3AC3FC24F727C3A74923FC1F75CFF479C983FC1A42725F0CF043FC14 CDB6B1E100E3FC0F7389C7956463FC09D4A475202BC3FC0466F0B9658003FBFDAC90AA B52243FBF29CC633ED05C3FBE86E1A7ACC7083FBDCBE2709E067C3FBD246F9C34DCA03 FBC71C130477F343FBBC6A5C4B5A8503FBB089F8567A8343FBA641AE73E01883FB9A97 9851D8AEC3FB8FF887FFCEB383FB845E11EC2C6403FB7A5F221F839D83FB6F0275BFE6 65C3FB640F9F92DB9183FB5926673086E0C3FB4E504F792B0E43FB43F0A5D20EADC3FB 38C554FB514103FB2E2C84A58ED4C3FB2313B2FF42AA43FB1915DA38733143FB0E1B7F 60F43483FB03A942B0F21203FAF2A005D8BA5903FADD2C09F2118503FAC992A27A0EE4 83FAB5AB7F10DB7B03FA9FE8296D689B83FA8C680FD0A61303FA78AD4C403EC603FA64 D8C86EB39503FA52D6E23B225783FA3FE3B6AEB37D83FA2D5914673A3183FA19D26A34 B50B83FA08DE9F7F246C83F9EB4E428AC74B03F9C949727ED4C103F9A84814643AB603 F9858E5B7F628903F963888DBE6A9703F9455A7C01ED1A03F92628AE35600403F9089D 2EC6629C83F8D34CFAE98C5D03F89F9CB54C3A7103F8668F62BB82F003F83356B69F35 2203F803160620632703F7AAE846117F7403F753C7156822EE03F6FD4A2625ABA803F6 6FBEC7C9A29803F5E720BA48FCF403F505B73D199F0C03F362D71BA03AD00000000000 0000000-%'COLOURG6'%$RGBG$\")C)eq%!\")$\"\"!F2$\")h>!\\&!\"*-%+_ATTRIB UTEG6#/Q'sourceF)Q,mathdefaultF)-%+AXESLABELSG6$Q!F)F?-%(SCALINGG6#%,C ONSTRAINEDG-%%VIEWG6$%(DEFAULTGFG" 1 2 0 1 10 0 2 9 1 4 1 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "eq:=\{op(M-[x,y])\};eliminate(eq,\{u\})[2];" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#eqG<$,(%\"xG!\"\"*&,(*$)%\"uG\"\"#\"\"\"F /*&F.F/F-F/F(F.F/#F(F.,&*$F,F/F(F-F/#F/F.F/F-F/,(%\"yGF(*(F*F1F-F/F2F4 F(F)F/" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#<#,(*&-%'RootOfG6#,,*$)%#_ZG \"\"%\"\"\"F.*&\"\"$F.)F,F0F.!\"\"*&,&*$)%\"yG\"\"#F.F.F0F.F.)F,F8F.F. *&,&*&F8F.F6F.F2F.F2F.F,F.F.*&F8F.F6F.F.F.,(*$)F&F8F.F.*&F8F.F&F.F2F8F .#F.F8F.*&%\"xGF.F>FBF2*$,&F?F2F&F.FBF." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "1/(u^2-2*u+2)^(1/2)*c" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 86 "eq:=\{op(subs((-u^2+u)^(1/2)=c,(u^2-2*u+2)=d,M-[x,y]) ),c^2=u*(1-u)\};subs(d^(1/2)=e,eq);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6 #>%#eqG<%,(%\"xG!\"\"*&%\"dG#F(\"\"#%\"cG\"\"\"F.%\"uGF.,*%\"yGF(*(F*F +F/F.F-F.F(F)F.F/F./*$)F-F,F.*&F/F.,&F.F.F/F(F." }}{PARA 11 "" 1 "" {XPPMATH 20 "6#<%,(%\"xG!\"\"*&%\"dG#F&\"\"#%\"cG\"\"\"F,%\"uGF,,*%\"y GF&*(F(F)F-F,F+F,F&F'F,F-F,/*$)F+F*F,*&F-F,,&F,F,F-F&F," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 80 "eq:=\{-x+1/d*u*c+1/d*c+u, -y-3/d*u* c+2/d*c+2*u, c^2 = u*(1-u),d^2=10*u^2-10*u+5\};" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#eqG<&,*%\"xG!\"\"*(%\"dGF(%\"uG\"\"\"%\"cGF,F,*&F*F( F-F,F,F+F,,*%\"yGF(**\"\"$F,F*F(F+F,F-F,F(*(\"\"#F,F*F(F-F,F,*&F4F,F+F ,F,/*$)F-F4F,*&F+F,,&F,F,F+F(F,/*$)F*F4F,,(*&\"#5F,)F+F4F,F,*&F@F,F+F, F(\"\"&F," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "eliminate(eq, \{u,c,d\})[2];" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#<#,do*&\"$]#\"\"\"% \"xGF'F'*&\"$D\"F'%\"yGF'!\"\"*(\"$T%F')F(\"\"&F'-%'RootOfG6#,0*&F0F') %#_ZG\"\"#F'F'*&,.*&\"#=F')F(F8F'F,*(\"#7F'F(F'F+F'F,*&F8F')F+F8F'F,*& \"#qF'F(F'F'*&\"#5F'F+F'F,\"#]F,F'F7F'F'*&FFF'F=F'F'*&FFF'FAF'F'*&\"$] \"F'F(F'F,*&FFF'F+F'F,F*F'F'F'*(\"%a9F')F(\"\"%F'F1F'F,*(\"#6F')F+FOF' F1F'F'*(\"$X#F')F(\"\"$F'F1F'F,*(\"#lF')F+FVF'F1F'F'*(\"%];F'F=F'F1F'F '*(\"$D#F'FAF'F1F'F'**\"$I\"F'F=F'F+F'F1F'F'**\"#cF'FUF'FAF'F1F'F,**\" $!HF'F(F'FAF'F1F'F,**\"$r&F'F=F'FAF'F1F'F,**\"#(*F'F(F'FYF'F1F'F'**F?F 'FNF'F+F'F1F'F,**\"%$R\"F'FUF'F+F'F1F'F'**\"%v7F'F(F'F+F'F1F'F,**FQF'F (F'FRF'F1F'F'**\"#KF'F=F'FYF'F1F'F'*&\"%+5F'F/F'F,*&F&F'FRF'F,*(F[pF'F NF'F+F'F'*(\"%]7F'FUF'FAF'F,*(F[pF'F=F'FYF'F'*(F&F'F(F'FRF'F,*(F_pF'F( F'FYF'F'*(F[pF'FUF'F+F'F,*(\"%+:F'F=F'FAF'F,*&\"%+?F'FNF'F'*&\"$]%F'FU F'F'*&F&F'FYF'F'*&\"%+BF'F=F'F,*(\"$D%F'F=F'F+F'F'*(\"$D)F'F(F'FAF'F,* (F\\qF'F(F'F+F'F'*&\"$v&F'FAF'F," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 13 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "9 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }