{VERSION 3 0 "IBM INTEL NT" "3.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 }{CSTYLE "" -1 256 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 257 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 258 "" 0 1 2 0 122 0 0 1 0 0 0 0 0 0 0 }{CSTYLE "" -1 259 "" 0 1 124 71 196 0 0 1 0 0 0 0 0 0 0 }{CSTYLE "" -1 260 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 261 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 262 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 263 "" 0 1 113 0 5 0 1 0 0 0 0 0 0 0 0 }{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 -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 }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 -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 }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 } 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 }3 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "" 0 256 1 {CSTYLE "" -1 -1 "" 0 1 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 }{PSTYLE "" 0 257 1 {CSTYLE "" -1 -1 "" 0 1 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 }{PSTYLE "" 0 258 1 {CSTYLE "" -1 -1 "" 0 1 0 0 22 0 0 1 0 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "" 0 259 1 {CSTYLE "" -1 -1 "" 0 1 4 0 50 0 0 0 0 0 0 0 0 0 0 }3 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "" 0 260 1 {CSTYLE "" -1 -1 "" 0 1 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 }{PSTYLE "" 0 261 1 {CSTYLE "" -1 -1 "" 0 1 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 }{PSTYLE "" 0 262 1 {CSTYLE "" -1 -1 "" 0 1 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 }{PSTYLE "" 0 263 1 {CSTYLE "" -1 -1 "" 0 1 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 } {PSTYLE "" 0 264 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 } 0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }} {SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT -1 34 " Global Stability Worked E xample 4" }{MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 76 "Investigate the long term \+ behaviour of the pedator-prey system modelled by " }}{PARA 256 "" 0 " " {OLE 1 4170 1 "[xm]Br=WfoRrB:::wk;nyyI;G:;:j::>:B>N:F:nyyyyy]::yyyyy y::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: ::fyyyyya:nYf::G:jy;:::::::::::::::::::::::::::::::::::::::::::::::::: :::::::::::::::::::::::::::::JcvGYMt>^:fBWMtNHm=;:::::::n:;JZC:bKB::>t_Ac@HdJoq;V:>Z@Z:j:vCSmlJ::::::::::OJ;@jyyyyyy;jysy;Z::: ::::^<>:F::]KRnC=MtFGgml>:;::::::JGN:ry:>:<::::::=J:^N>:F:AlqfG[maNFO= ;::::::::_J;vyyuy:>:<::::::AZ:^E>:nYN:J :[B::a:c:e:gJ:v==BF\\RRbF_rZke>AVX@JSHrvTJ;::?>>kjJSD J>QMCHRvJ;TrOZ<\\lNR<:TNC>:UTRcETcTX[US;SK]U W=EWMuUWm>j\\@A:::cYH_WV>Z::::::::jysyA:CB:F:;jysy?:;:cd=:EJ:F[Z:^:n_;>=E:]c:=:E:Qb:B:E:Sb:; D;pJAB:Gc;YJCvYxY:JZyyayYZmjALj?JMJ@fc[;>:;q@[;; B:::::::JFNZ;J:N:;B:yayA:;B::::::f:=;jysy :>:<::::::wqy[:::::::::::::vYxI:;Z::::::::::::::::::::yay=J:B::::::::j BjwEJ:uI;B:>l;>Z:b:DJ::[Y:F;;JS Fd;>]>F:;B:WC:;m>JSj\\Yj:JQjB>:qAB:>l;ZC>;B:qQ:[:JBA:X;j>>:_kBIJLLj:B:W;M:_;uh<=:W;e:qA B:>l;F:;J:D:`@::]J:C:[q:F;;JSFDSl:B:kMN=j>JSJ>Pj:JvJ?B:_;]e:k=F;N@f\\FF:FI><C:U k:^:>X;j>>:_c<]Lh@j:UM:_;_f:=J:f_:>UJSj:Tj:>:QKf;_kB?g;F:fA:_;w f:=:U;JSjF`j:jOjDjw;<:[V:B:D:c\\_;:JX=j>>:_kbNg=F:;B:[KZ=j>JS JaLj:jR`:>RU:_;_E;C:[ CFPMZ?R;@M:_;Yc<=B::[Z:VY[j=J:^qX;j;:::::::::::::::::5:" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 30 "To find the equilibrium p oints" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart:" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "with(linalg):" }}{PARA 7 "" 1 "" {TEXT -1 32 "Warning, new definition for norm" }}{PARA 7 "" 1 "" {TEXT -1 33 "Warning, new definition for trace" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 20 "f:=-0.1*x+0.002*x*y;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }{TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "g:=-0.0025*x*y+0.2*y;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "solve(\{f=0,g=0\},\{x,y\});" }}{PARA 11 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 45 "the equilibrium p oints are (0,0) and (80,50)." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}} {EXCHG {PARA 258 "" 0 "" {TEXT -1 56 "To classify the equilibrium poin ts of the linearisations" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 " " }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 30 "First find the Jacobian matri x" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "v:=[f,g];" }}{PARA 11 " " 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "J:=j acobian(v,[x,y]);" }}{PARA 11 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 18 "At the point (0,0)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "J00:=subs(\{x=0,y=0\},evalm(J));" }}{PARA 11 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 263 "" 0 "" {OLE 1 3594 1 "[xm]Br=WfoRrB :::wk;nyyI;G:;:j::>:B>N:F:nyyyyy]::yyyyyy::::::::::::::::::::::::::::: ::::::::::::::::::::::::::::::::::::::::::fyyyyya:nYf::wyyyqy;:::::::: :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: ::NDYmq^H;C:ELq^H_mvJ::::::::gjR<:T><::[XsKd[]DNwW:A:; d:>Z:j:vCSmlJ::::::::::OJ;@jyyyyyI:;Z:::::::^<>:F::]KRnC=MtFGgml>:;::: :::JGN:C:yay=;Z::::::j:>:C<;:=j[vGUMrvC?MoJ::::::::JCNZ;F:N:vYxY:B:::: ::V:;nYvY:::::::::::::::::::::::::::::::::::::::::: :::::::::::::::::::::::::::::::::::::=Z:yayQ:>:fa;JTD:O_:F:MZ=fD>:W:;j<>:Mb:> Z:^:NZ;jZ:^:n_;>=E:]c:=Z:f:V[DOJ::?ja^G>D_mlVH[KRJ:<:::::::>=?jysy:>:;B ::::::f::<::::::::::: ::::::::vYxI:;Z::::::::J?vyyuy=:;j;<:;:::::::::::::::::::::::::::::::: ::::::::::::::::::::::::::::::::::::::::::::::::::::5:" }{OLE 1 4106 1 "[xm]Br=WfoRrB:::wk;nyyI;G:;:j::>:B>N:F:nyyyyy]::yyyyyy::::::::::::: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::fyyyyya:nYf: :G:jy;:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: :::::::::::::::JcvGYMt>^:fBWMtNHm=;:::::::n:;JZC:bKB::>h fOc@HdJoq;V:>r>Z:j:vCSmlJ::::::::::OJ;@jyyyyyy;jysy;Z:::::::^<>:F::]KR nC=MtFGgml>:;::::::JGN:ry:>:<::::::=J:^J>:F:AlqfG[maNFO=;::::::::_J;vy yuy:>:<::::::AZ:^E>:nYN:JZ:>;N;;Jyk?J@>:UJ:n;v;;JBkj>Z[c:D=ATRWuRE EUv:IJ:>:::::FZ:nyyYZDjysyQj;J:>R;B:bK_J:Z::::::::jysyA:CB:F:;jysy?:;:mS>Vir:wU:NZ:f<>: EJ:F[FEJ:J;D_mlVH[KRJ:<::::: ::>=?R:>:?J:=;jysy:>:<: :::::wyyyA<::::::::::::jysy:>:<:::::::::::::::::::vYxI:;Z:::::::::eZ:V y<>jx]:JBAj:J:DZJ^dcgg_WhZnc_whZNdigg[oG[f:CB:f_;jA>:_c<;V:ck>Z:N@fw=F:ROoof:UK:^:>X=j>>:_kFAJ\\Hj:>Z:NFwm>JSNm;N a@F:;jmnI[Z:VY;>;B:>l;ZX;j>>:_c<;N@Xj:B:ukcG;N@ njEF:fA:_;sG==:UC:apDjw;<:[V:B:D:c\\_;:>LjP@J:^:>X=j>>:_;;y;=Z:n_:>FM: _;kG<=:SKj<:N@vkGF:n?N;n^@J?vyyuy=:;JBB:qQBv:>:sg:>Z:F:?bBaTXaEWEUUtP< jPF:C:[Y:;j; " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 173 "The equilibrium point of th e linearisation of the point (0,0) is a saddle and by the linearisatio n theorem the point (0,0) shows similar behaviour and is a nonlinear s addle." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 20 "At the point (80,50)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "J8050:=subs(\{x=80,y=50\},evalm(J));" }}{PARA 11 " " 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 262 "" 0 "" {OLE 1 4106 1 "[xm]Br =WfoRrB:::wk;nyyI;G:;:j::>:B>N:F:nyyyyy]::yyyyyy:::::::::::::::::::::: :::::::::::::::::::::::::::::::::::::::::::::::::fyyyyya:nYf::G:jy;::: :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: ::::::JcvGYMt>^:fBWMtNHm=;:::::::n:;JZC:bKB::>hfOc@HdJoq ;V:>Z?B:<:=ja^GE=;:::::::::N;?R:yyyyyyA:yayA:<::::::JDJ:j::F@[KaFFcmnn HEM:>:::::::oJ;Zy=J:B::::::F:;JLK:j:VBYmp>HYLkNG>::::::::NJ?>:wAQ:S:UJ:n;v;;JBAfV_rZ=e>AvR_rZEu:=J:@JCHR_DJ>]M; \\RRDJ>QM;\\RRKB::Z@h_JZH:=j>r:;W:;B:?B:e:;j< j>D:Z:NZ;F:E:=b:yyyyI:E:M:j>>^Pn;; JMTjAN;;B:;xy;xy;Y?;D;QZ:n>^;UTR:;Jrg:J;D_mlVH[KRJ:<: ::::::>=?R:>:?J:g=Z:J;vCJbNHVH>@>Z::::::::kJ:vYxI:; Z::::::JywYB:::::::::::::yay=J:B:::::::::::::::::::jysy:>:<::::::::f<< jwEJ:uI<:[V:=:;b:j;^@Ejdl;>:^:;JVRU:_;Id=C:k;>RJ?B:_;QE??:[cF;H:;PBB:qQ:pI<:[V:B:DZ:nb_og]gfmCACJ:f ?;JJSNm;noAF:vFw=N@mNfmj:Jk:N@oN[@k:>:I=[Z:VY; >;B:>l;ZaTXDpql`V^:f?=JJ;F<=Z:fAap>>:_;cb>=J:fA:_;Ot >=:UC:apDjw;<:[V:B:D:c\\_;:^CC:US:;JgDF:FM:_;uB?=J:n_:> FO:G;OjyyiyI:>:[Z:VY[j=>:;JXE:;B:=J;Dlc`qsLqlp`h_:f_;F:C:[Q:VZ:>Z:>::: ::::::::::::::::::::::::::::::::::::::::::::::3:" }{TEXT -1 0 "" }}} {EXCHG {PARA 0 "" 0 "" {TEXT -1 231 "Therefore the equilibrium point o f the linearisation at the point (80,50) is a centre and the linearisa tion theorem fails so further analysis is necessary to determine the s tability of the equilibrium point of the nonlinear system." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 74 "This further anal ysis can be achieved by looking for a conserved quantity." }}{PARA 0 " " 0 "" {TEXT -1 0 "" }}{PARA 264 "" 0 "" {TEXT -1 29 "To find a conse rved quantity" }{TEXT 263 1 " " }}{PARA 0 "" 0 "" {TEXT -1 53 "First f ind a differential equation by dividing g by f" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 65 "deq:=diff(y (x),x)=((-.0025*x*y(x)+0.2*y(x))/(-.1*x+.002*x*y(x)));" }}{PARA 11 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 45 "Use dsolve t o find a solution of the equation" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "soln:=dsolve(deq,y(x));" }} {PARA 12 "" 0 "" {TEXT -1 0 "" }}{PARA 11 "" 1 "" {TEXT -1 0 "" }}} {EXCHG {PARA 0 "" 0 "" {TEXT -1 144 "You now need to solve for _C1 as \+ this is the value of the first integral. LambertW is a special functi on which will disappear when you do this." }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 20 "cq:=solve(soln,_C1);" }}{PARA 11 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "cq1:=subs(y(x)=y,cq) ;" }}{PARA 11 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 85 "Since the log function only exi sts for positive values the LHS of the first integral " }{TEXT 256 5 " soln1" }{TEXT -1 106 " is not a conserved quantity. It is necessary to convert it to an expression containing exponential terms." }}{PARA 0 "" 0 "" {TEXT -1 6 "Since " }{TEXT 260 3 "cq1" }{TEXT -1 45 " is a co nstant we can take exponentials and " }{TEXT 261 3 "exp" }{TEXT -1 1 " (" }{TEXT 262 3 "cq1" }{TEXT -1 26 ") will also be a constant." }} {PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "cq2:=expand(simplify(exp(cq1)));" }{TEXT -1 0 "" }}{PARA 11 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 11 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 261 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 17 "Thus th e function" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 257 "" 0 "" {OLE 1 4618 1 "[xm]Br=WfoRrB:::wk;nyyI;G:;:j::>:B>N:F:nyyyyy]::yyyyyy:::::: :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::fyyyy ya:nYf::G:I:wAyA:::::::::::::::::::::::::::::::::::::::::::::::::::::: :::::::::::::::::::::::::NDYmq^H;C:ELq^H_mvJ::::::::gj R<:T><::[rvQd[]DNwW:A:;f;B:F:YLpfF>:::::::::J?NZ;vyyyyyY:vYxY:B::::::: c:;:=:jR>@Wlj^HMMufF;J:::::::N=?:xI:;Z::::::j:>:C@;:=j[vGUMrvC?MoJ:::: ::::JCN:yyyxI:;Z::::::j;B:s<;:wA?Z:F;^:nYn:v:>:QJ:N;;JyK@j@>:W:YJ:> \\:B:]:_J:V<^AVKAR:AFXAr=V[KFZ<>kjNZklJ?Dk;aq;x::ZkJ?RSAr=: GVE?B\\[;>@KFFN`LVjs?Z:N;:j:nyyYZDjysyQj;J:>R<:TNC>Z:fc[_hb_ds?h_?^?Gh oGfnGgioGMZ:fbk;::JtaMSAA;B::::::::vYxy;J<<:=B:vYxY;J:JIL;wf:;J;M:=j>r :=d:N:e:;j<>:Mb:>Z:^::E:Qb:;Z:f:^ [<>f<>bLn;n^@v;_jysy;B:K:;xycwyDKDDj?JMJ@fc[;>:;E:EZ:F;NZ:vCS=[LsfFaMR >@>Z::::::::kJ;@:;J;>Z:vYxY:>Z::::::jD_=a=[;;B:::::::JF>: yay=J:B::::::nYyA<::::::::::::jysy:>:<:::::::::::::::::::vYxI:;Z:::::: :::eZ:Vy<>jx]:JBAj:J:DZJ^dcgg_WhZnc_whZNdigg[oGEO==_c:KVG_rZkE:>ZcogZVbnf_QgbmZ::::::cWy=T:cWy=L:>Z:::::::::j\\ IOo>JSjbHj:jvNOJSJLTj:>:k=JSJW\\j:jv:N@F[DF:fFO?N@fuGF:fF fl;:;b::::]M>:_KtWfGF:=J:>IAmDjw?JB: >l;>:X=j>>:_KJAjNEj:>Z:^?;mDjw?>B:>l;Z:b:^D::FHjPF:C:[ Q:F;;JS^Xqt;=J:yj:JQJBB:qQ:pI<:[V:B:DZ: nb_og]gfmC?C:UK:^:>X=j>>:_kVAJc@j:>Z:NFwm>JSNQSB;=J:vFwMBB:qQ:[:JBA:DZ aTXDpql`N^:f?=JNwH;=Z:fAaPBB:qQJZ:JBA:DZjq:f?;JX;j>>:_;M i;=Z:>@[m>JSjDYj:Z:>HZDjy]j:JR:N@fmCF:F`:>HJSJ[hj:JRJ@h:>H[=OB:X=j;:B>N:F:nyyyyy]::yyy yyy::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: ::::fyyyyya:nYf::wyyyqy;:::::::::::::::::::::::::::::::::::::::::::::: ::::::::::::::::::::::::::::::::::NDYmq^H;C:ELq^H_mvJ::::::::gjR<:T><::[rvQd[]DNwW:A:;v:B:F:YLpfF>:::::::::J?NZ;vyyyyyY:vYxY :B:::::::c:;:=:jR>@Wlj^HMMufF;J:::::::N=?:xI:;Z::::::j:>:C=;:=j[vGUMrv C?MoJ::::::::JCN:yyyxI:;Z::::::j;B:s<;:wA?Z::C:J=j=B:KJ:F;N;;j?>:S:UJ: nYvY:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: :::::::::j:b:d:p^H[::::::::::j::;`:Z@O< ;j`@Pt\\Pd`QrPPJPnrPqjLqnxPqF;fbk;::JtaMSAA;B::::::::vYxy;J<<:=J:vYxY; J:JXP:qe:^w;j:F;HJuK;f<D:;B:C:?R:=jZ:^:n_;>=E:]c :=Z:f:V[b<>r>n;;JMTjAN;;JZyYZyY:MZ^;UTR:;Jj@[;;B:::::::JFNZ;J:N:;B:yayA:;B::::::f:=;jysy:>:<::::::wqy[:::::::::::::vYxI:;Z:::::::::::::::: ::::yay=J:B::::::::jDB:qi:;fyB:>l;F:>ZcTTUUSaEBWTSiEB_tUUURWMPYS<>: US:F[:>Z:N`D>j;^C=J:IKG:M:_;]t:=:mMNgZ:^?;E:[Z:VY;RyB:>l;Z:b:IM:_KGAJ@Lj:>:IMvN;X;j;::::::::::::::::::::::::::::::::::::: ZG^KB:<::5:" }{TEXT -1 1 "." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 122 "If the equilibrium point (80,50) is a maximum \+ or minimum of E(x,y) then it will be surrounded by closed curves of E (x,y)." }}{PARA 0 "" 0 "" {TEXT -1 139 "Likewise the equilibrium point of the nonlinear system will be surrounded by closed curves and must \+ be a neutrally stable nonlinear centre." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT 258 58 "To prove the point (80,50) is a sta tionary point of E(x,y)" }}{PARA 0 "" 0 "" {TEXT -1 52 ".It is necessa ry to prove that at the point (80,50) " }}{PARA 259 "" 0 "" {OLE 1 3642 1 "[xm]Br=WfoRrB:::wk;nyyI;G:;:j::>:B>N:F:nyyyyy]::yyyyyy:::::::: :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::fyyyyya :nYf::wyyyqy;::::::::::::::::::::::::::::::::::::::::::::::::::::::::: :::::::::::::::::::::::NDYmq^H;C:ELq^H_mvJ::::::::gjR< :T><::[rvQd[]DNwW:A:;B;B:F:YLpfF>:::::::::J?NZ;vyyyyyY:vYxY:B:::::::c: ;:=:jR>@Wlj^HMMufF;J:::::::N=?:xI:;Z::::::j:>:[]::=j[vGUMrvC?MoJ:::::: ::JCN:yyyxI:;Z::::::j;B:s<;:wA?Z::C:J=j=B:K:M:OJ:V;;J@j@>:W:YJ:nYvY::: :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: :F:DZ:B::::::::::^G;J<@Z=fZDFZ=n;;R:?b[gg>AVK@J;ZrK;TrXHJA:RK:`A?Z<>kj Jb;B::::::V:^^YwF>:::=B:wyyAb:;`:Z@O<;j`@Pt\\Pd`QrPPJPnr PqjLqnxPqF;Z::::::::jysyA:CB:F:;jysy?:;:qS<^k>J>E:=j>r :CT:D:;B:CZ:NZ;F:E:=b:yyyyI:E:M:;:;q>@[C:>Z::::::::kJ;@:;J;>Z:vYxY:>Z::::::jD_=a=[;;B: ::::::JF>:yay=J:B::::::nYyA<::::::::::::jysy:>:<:::::::::::::::::::vYx I:;Z::::::::JBBEZ:V\\s?f:F[<;B:qi:;fy>Z:JBA:DZaTXUeRYEUHL<:_k>Ij:G:n P:_KjDjGEj:>:uKf=j>JSVGSy:=J:nP:_k>o\\>F:nP:_Kj>`@F:;jXjDjw;<:[V:=J:>Z <>:cTTPpsx;F:MJ:N@QmE@j:>:ED:[q>JSFK=T:=:kMN= j>JSVGSG;=:EFwt;=J:> @;H:OJ::sg:B:=J;Dlc`qsLqlp`h_:f??J " 0 "" {MPLTEXT 1 0 41 "E:=x^0.2*y^ .1*exp(-.002*y)*exp(-.0025*x);" }}{PARA 11 "" 0 "" {TEXT -1 0 "" }} {PARA 11 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "P:=diff(E,x);" }}{PARA 12 "" 0 "" {TEXT -1 0 "" }}{PARA 11 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "Q:=diff( E,y);" }}{PARA 12 "" 0 "" {TEXT -1 0 "" }}{PARA 11 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 47 "To evaluate the derivatives \+ at the pont (80,50)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "R:=s ubs(\{x=80,y=50\},\{P,Q\});" }}{PARA 11 "" 1 "" {TEXT -1 0 "" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "S:=simplify(R);" }}{PARA 11 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 12 "" 1 "" {TEXT -1 30 "therefor e at the point (80,50)" }}{PARA 260 "" 0 "" {OLE 1 3642 1 "[xm]Br=WfoR rB:::wk;nyyI;G:;:j::>:B>N:F:nyyyyy]::yyyyyy::::::::::::::::::::::::::: ::::::::::::::::::::::::::::::::::::::::::::fyyyyya:nYf::wyyyqy;:::::: :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: ::::NDYmq^H;C:ELq^H_mvJ::::::::gjR<:T><::[WXUd[]DNwW:A :;B;B:F:YLpfF>:::::::::J?NZ;vyyyyyY:vYxY:B:::::::c:;:=:jR>@Wlj^HMMufF; J:::::::N=?:xI:;Z::::::j:>:C=;:=j[vGUMrvC?MoJ::::::::JCN:yyyxI:;Z::::: :j;B:s<;:wA?Z::C:J=j=B:K:M:OJ:V;;J@j@>:W:YJ:nYvY:::::::::::::::::::::: ::::::::::::::::::::::::::::::::::::::::::::::::::::F:DZ:B::::::::::>F AVK@J;ZrK;TrXHJA:RK:`A?Z<>kjJb;B:::::::::: FZ:nyyYZDjysyQj;J:>R<:TNC>:UTRcETcTX[US;SK]UW=EWMuUWm>B:ETV:::^xsNpkK: <::::::::yayY:^Z:j:>:yayQ:>:VaCJ@M:Kf:F:MZ=^b;B:AB:e:;j<>:Mb:>Z:^:B: ;xyewy;CVMB:@[C:>Z::::::::kJ;@:;J;> Z:vYxY:>Z::::::jD_=a=[;;B:::::::JF>:yay=J:B::::::nYyA<::: :::::::::jysy:>:<:::::::::::::::::::vYxI:;Z::::::::JBBEZ:V\\s?f:F[<;B:qi:;fy>Z:JBA:DZaTXUeRY EUHL<:_k>Ij:G:nP:_KjDjGEj:>:uKf=j>JSVGSy:=J:nP :_k>o\\>F:nP:_Kj>`@F:;jXjDjw;<:[V:=J:>Z<>:cTTPpsx;F:MJ:N@QmE@j:>:ED:[q>JSFK=T:=:kMN=j>JSVGSG;=:EFwt;=:[KZ=J?>Z:n>N;yyyxy:J:><X=j;:::::::::::::3:" }}{PARA 0 "" 0 " " {TEXT -1 55 "Thus the point (80,50) is a stationary point for E(x,y) " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 84 "The type of stationary point is determined by the ei genvalues of the Hessian matrix." }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 54 "To find the hessian matrix use the \"hessian\" command ." }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "H:=hessian(E,[x,y]);" }} {PARA 12 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 20 " At the point (80,50)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "H1: =subs(\{x=80,y=50\},evalm(H));" }}{PARA 11 "" 1 "" {TEXT -1 0 "" }}} {EXCHG {PARA 0 "" 0 "" {TEXT -1 26 "Find the eigenvalues of H1" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "Eigenvalues:=eigenvals(H1); " }}{PARA 11 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 130 "Since these are both negative the equilibrium point is a maximum \+ and the point (80,50) is a nonlinear centre and neutrally stsble." }} {PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 1 " \+ " }{TEXT 259 26 "To draw the phase portrait" }{MPLTEXT 1 0 0 "" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "with(DEtools):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "A:=diff(x(t),t)=-.1*x+.002*x*y;" }} {PARA 11 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "B:=diff(y(t),t)=-.0025*x*y+.2*y;" }}{PARA 11 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 95 "DEplot(\{A,B\},\{x(t), y(t)\},-50..5,[[0,100,30],[0,80,100],[0,80,40],[0,10,50]],x=0..150,y=0 ..100);" }}{PARA 13 "" 1 "" {TEXT -1 0 "" }}}}{MARK "54 1 0" 0 } {VIEWOPTS 1 1 0 1 1 1803 }