{VERSION 5 0 "IBM INTEL NT" "5.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 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Text Output" -1 2 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 0 0 0 0 0 1 3 0 3 0 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Warning" 2 7 1 {CSTYLE "" -1 -1 " " 0 1 0 0 255 1 0 0 0 0 0 0 1 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 } {PSTYLE "Maple Output" 0 11 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 3 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "" 11 12 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Maple Plot" 0 13 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "f:=-x+10-4*x*y/(1+x^ 2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fG,(%\"xG!\"\"\"#5\"\"\"** \"\"%F)F&F)%\"yGF),&F)F)*$)F&\"\"#F)F)F'F'" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 21 "g:=2*x-2*x*y/(1+x^2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"gG,&%\"xG\"\"#**F'\"\"\"F&F)%\"yGF),&F)F)*$)F&F'F)F)!\"\"F. " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 73 "J:=subs(\{x=2,y=5\},mat rix([[diff(f,x),diff(f,y)],[diff(g,x),diff(g,y)]]));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"JG-%'matrixG6#7$7$#\"\"(\"\"&#!\")F,7$#\"#;F,#! \"%F," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "with(linalg);" }} {PARA 7 "" 1 "" {TEXT -1 80 "Warning, the protected names norm and tra ce have been redefined and unprotected\n" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#7^r%.BlockDiagonalG%,GramSchmidtG%,JordanBlockG%)LUdecompG%)QRde compG%*WronskianG%'addcolG%'addrowG%$adjG%(adjointG%&angleG%(augmentG% (backsubG%%bandG%&basisG%'bezoutG%,blockmatrixG%(charmatG%)charpolyG%) choleskyG%$colG%'coldimG%)colspaceG%(colspanG%*companionG%'concatG%%co ndG%)copyintoG%*crossprodG%%curlG%)definiteG%(delcolsG%(delrowsG%$detG %%diagG%(divergeG%(dotprodG%*eigenvalsG%,eigenvaluesG%-eigenvectorsG%+ eigenvectsG%,entermatrixG%&equalG%,exponentialG%'extendG%,ffgausselimG %*fibonacciG%+forwardsubG%*frobeniusG%*gausselimG%*gaussjordG%(geneqns G%*genmatrixG%%gradG%)hadamardG%(hermiteG%(hessianG%(hilbertG%+htransp oseG%)ihermiteG%*indexfuncG%*innerprodG%)intbasisG%(inverseG%'ismithG% *issimilarG%'iszeroG%)jacobianG%'jordanG%'kernelG%*laplacianG%*leastsq rsG%)linsolveG%'mataddG%'matrixG%&minorG%(minpolyG%'mulcolG%'mulrowG%) multiplyG%%normG%*normalizeG%*nullspaceG%'orthogG%*permanentG%&pivotG% *potentialG%+randmatrixG%+randvectorG%%rankG%(ratformG%$rowG%'rowdimG% )rowspaceG%(rowspanG%%rrefG%*scalarmulG%-singularvalsG%&smithG%,stackm atrixG%*submatrixG%*subvectorG%)sumbasisG%(swapcolG%(swaprowG%*sylvest erG%)toeplitzG%&traceG%*transposeG%,vandermondeG%*vecpotentG%(vectdimG %'vectorG%*wronskianG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "ei genvalues(J);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$,&#\"\"$\"#5\"\"\"*&^ ##F'F&F'-%%sqrtG6#\"$\"RF'F',&F$F'*&^##!\"\"F&F'F+F'F'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "nx:=solve(f=0,y);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#nxG,$*(,&%\"xG\"\"\"\"#5!\"\"F),&F)F)*$)F(\"\"#F) F)F)F(F+#F+\"\"%" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "ny:=sol ve(g=0,y);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#nyG,&\"\"\"F&*$)%\"xG \"\"#F&F&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "plot(\{nx,ny\} ,x=.1..4);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6&-% 'CURVESG6$7[o7$$\"3/+++++++5!#=$\"3))*********\\(*\\#!#;7$$\"3-]7Gj08` 5F*$\"3#ee9JpD\\P#F-7$$\"3(**\\il7hi5\"F*$\"3AOJ)3&[@iAF-7$$\"33]P%)*o \"Rf6F*$\"37'[.c$>&*f@F-7$$\"3.+]7`A_77F*$\"3+7P9LLwm?F-7$$\"34+vozLy= 8F*$\"3C#3l8S@K!>F-7$$\"3,++D1X/D9F*$\"3I@f`(f\\Ww\"F-7$$\"3@+D\"Gj08` \"F*$\"3-kK,j,HX;F-7$$\"38+]PfncP;F*$\"3%Giu'zS#>a\"F-7$$\"3/+v$f)y#Qu \"F*$\"3K<*4a=j9X\"F-7$$\"3C++]7!*3]=F*$\"3mMfO_Gor8F-7$$\"38]Pf)[.].# F*$\"3+aW!***)QLD\"F-7$$\"3-+vokz\"*>AF*$\"3+*3,9oLa:\"F-7$$\"3\"*\\7y SC$[S#F*$\"3cZq2u%[K2\"F-7$$\"3!)**\\(o\"pu*e#F*$\"3-R,4qAT.5F-7$$\"3x *\\7GDec+$F*$\"3GWqDi^Z'z)!#<7$$\"3s***\\()ep:U$F*$\"3qlY8cFr#)yFcp7$$ \"3#******\\&yBSQF*$\"3#p$G2CV?$=(Fcp7$$\"37++D@h!*eUF*$\"33&[DUtK%RmF cp7$$\"3i**\\PRHE#4&F*$\"37h4q%eYw'eFcp7$$\"3m**\\(oQ\"*['eF*$\"3)Qm;Q +%)GR&Fcp7$$\"3-+](=R.\\m'F*$\"3%eT%Q4c;c]Fcp7$$\"3')**\\(=&pF#\\(F*$ \"3#oM;0/.&>[Fcp7$$\"3*)**\\P9r*pJ)F*$\"3Ms\\Vm2@iYFcp7$$\"3i++]sJKl\" *F*$\"3'**)=7Ca**eXFcp7$$\"3x***\\iAHD\"**F*$\"3r&\\WrPZX]%Fcp7$$\"31+ +vE1Pv5Fcp$\"3_Op!Q&45uWFcp7$$\"3/++DEP$)f6Fcp$\"3]dWxE@woWFcp7$$\"3G+ +Dt&H7C\"Fcp$\"3?IvLcI/#[%Fcp7$$\"38+v=+[9:8Fcp$\"3F%)o&R!>R1XFcp7$$\" 3?++Dar..9Fcp$\"3/#4F>K8ta%Fcp7$$\"3;+++2N\\x9Fcp$\"3YN#**[\"=/!f%Fcp7 $$\"35+voXR5k:Fcp$\"3Q0N))>Q,ZYFcp7$$\"32++]f)o2k\"Fcp$\"39(*eDbuc-ZFc p7$$\"3?+vo?C)[s\"Fcp$\"3!Q)R'[Ovxw%Fcp7$$\"3D+D1A%y\\!=Fcp$\"3v>?5)Q< I$[Fcp7$$\"3C+](o>]&))=Fcp$\"3K&R#y.o[.\\Fcp7$$\"3C+vVu^Hl>Fcp$\"3OA@n +_rp\\Fcp7$$\"3#***\\i+]2[?Fcp$\"3UtrHAJ>U]Fcp7$$\"3C+v=v*fS8#Fcp$\"3k YT;BH2=^Fcp7$$\"3***\\7$[,\"*3AFcp$\"35ruh6UB%=&Fcp7$$\"37+](eQ](*G#Fc p$\"3#4VCY#)eaD&Fcp7$$\"3)*****\\hiEtBFcp$\"3j4#4I-o%G`Fcp7$$\"3))**\\ P_-(\\X#Fcp$\"3a?8Cu\"[!*R&Fcp7$$\"3;+vokI-MDFcp$\"3+PW/PHJmaFcp7$$\"3 K+]iMxz@EFcp$\"3epmI(o#eRbFcp7$$\"3!*****\\zrm+FFcp$\"3SGy.GV'Rg&Fcp7$ $\"3Q++DYr([y#Fcp$\"3mbN5aL,rcFcp7$$\"3!**\\(=#*Q=hGFcp$\"3K3R:&fI,t&F cp7$$\"3J++v?tgWHFcp$\"3ea#pI()\\Gz&Fcp7$$\"3u*\\(olA5BIFcp$\"3'>_/Z\" R$*\\eFcp7$$\"3X+vV+@:0JFcp$\"3'eKQ%*R,v!fFcp7$$\"3))***\\7\"3P&=$Fcp$ \"3aA_,4#=;'fFcp7$$\"3++v=nBNpKFcp$\"3)eo)=L@*e,'Fcp7$$\"3Q+++(eO-N$Fc p$\"3m#p**p7'ylgFcp7$$\"3.+]7%Q_HV$Fcp$\"3i\\'GWeEV6'Fcp7$$\"3B+vo_K) \\^$Fcp$\"3ke)>rDA*fhFcp7$$\"3a++],6O!f$Fcp$\"3KX3cN$Q&*>'Fcp7$$\"3Y+] iAEvwOFcp$\"3Yx#)[L>?UiFcp7$$\"3E+++HA-aPFcp$\"3GHvU=s$yF'Fcp7$$\"34+v oXxSOQFcp$\"3?hMrTX;8jFcp7$$\"3A+DJ(>h_\"RFcp$\"3x#yCfViVM'Fcp7$$\"\"% \"\"!$\"3+++++++vjFcp-%'COLOURG6&%$RGBG$\"#5!\"\"$F]_lF]_lFg_l-F$6$7S7 $F($\"3,++++++55Fcp7$Ffn$\"3=KFcp7$Fgs$\"3o (ow[)>Uc@Fcp7$F\\t$\"3-gpasU@XBFcp7$Fat$\"3yx.^`3lSDFcp7$Fft$\"3X>-YXe gHFFcp7$F[u$\"3))Qf?cK^oHFcp7$F`u$\"3IfrAjq)H=$Fcp7$Feu$\"3C1_\"H:@kW$ Fcp7$Fju$\"3-J\\I]C7#p$Fcp7$F_v$\"3Aqn>l$>_(RFcp7$Fdv$\"37L76/r%zD%Fcp 7$Fiv$\"3;-m6Y=imXFcp7$F^w$\"3#\\KnE7&Qi[Fcp7$Fcw$\"3C$4&=37h%>&Fcp7$F hw$\"3#QF(px>@abFcp7$F]x$\"3G]zJVSGzeFcp7$Fbx$\"3b6ZhHo&HC'Fcp7$Fgx$\" 3*f=uzu#RKmFcp7$F\\y$\"3kqh/S*yo-(Fcp7$Fay$\"3&4BoB*GF@uFcp7$Ffy$\"3A$ y%GhL#Q(yFcp7$F[z$\"3![[GW@.OH)Fcp7$F`z$\"3gYbq>2ab()Fcp7$Fez$\"3/6K\" \\Etj=*Fcp7$Fjz$\"3c%\\9MF72n*Fcp7$F_[l$\"3S*[!)3t9R,\"F-7$Fd[l$\"31U^ ocp>k5F-7$Fi[l$\"3H[j^?(eY6\"F-7$F^\\l$\"3/^M3!\\m)o6F-7$Fc\\l$\"3)zz%)4&=X\"F-7$F\\^l$\"3(Hh#e*Go#4:F-7$Fa^l$\"3c /r6RC!=d\"F-7$Ff^l$\"3Z\"4=V-FHj\"F-7$F[_l$\"# " 0 "" {MPLTEXT 1 0 9 "?jacobian" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "jacobian([f,g],[x,y]);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#-%'matrixG6#7$7$,(!\"\"\"\"\"*(\"\"%F* %\"yGF*,&F*F**$)%\"xG\"\"#F*F*F)F)**\"\")F*F1F2F-F*F.!\"#F*,$*&F1F*F.F )!\"%7$,(F2F**(F2F*F-F*F.F)F)**F,F*F1F2F-F*F.F5F*,$F7F5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "10 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }