{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 }
{CSTYLE "" -1 256 "" 0 1 0 0 0 0 1 0 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 0 }{CSTYLE "" -1 258 "" 0 1 0 0 
0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 259 "" 1 14 0 0 0 0 0 2 0 0 0 
0 0 0 0 0 }{CSTYLE "" -1 260 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 261 "" 1 12 0 0 0 0 0 2 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 0 }{CSTYLE "" -1 263 "" 1 12 0 0 
0 0 0 2 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 264 "" 1 12 0 0 0 0 0 2 0 0 0 
0 0 0 0 0 }{CSTYLE "" -1 265 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 266 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 
267 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 268 "" 0 1 0 0 
0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 269 "" 0 1 0 0 0 0 1 0 0 0 0 0 
0 0 0 0 }{CSTYLE "" -1 270 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 271 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 
272 "" 1 12 0 0 0 0 0 2 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 273 "" 0 1 0 0 
0 0 0 1 0 0 0 0 0 0 0 0 }{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Tim
es" 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 "Heading 1" -1 3 1 {CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 1 
2 2 2 2 1 1 1 1 }1 1 0 0 8 4 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 "Error" 7 8 1 {CSTYLE "" -1 -1 "" 0 
1 255 0 255 1 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 "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 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 "" {TEXT -1 58 "\324\340\351\353: \"..PS_
\314\303\322\323\\\313\340\341\356\360\340\362\356\360\355\373\345 \+
\360\340\341\356\362\373 \357\356 \367\350\361\353\345\355\355\373\354
 \354\345\362\356\344\340\354\\" }}{PARA 0 "" 0 "" {TEXT -1 47 "\320
\345\370\304\323_\302_Maple_\323\357\360\340\346\3551.mws\" 21.03.14. \+
\322\350\362\356\342 \312.\302." }}{PARA 0 "" 0 "" {TEXT -1 40 "\310
\347\354\345\355\345\355\350\377 (\344\356\357\356\353\355\345\355\350
\377) \342\355\345\361\345\355\373 01.10.16." }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 20 "restart;with(plots):" }}{PARA 7 "" 1 "" {TEXT 
-1 50 "Warning, the name changecoords has been redefined\n" }}}{EXCHG 
{PARA 0 "" 0 "" {TEXT -1 80 "\302\342\356\344\377 \342 dsolve \356\357
\366\350\376 numeric \357\356\353\363\367\350\354 \367\350\361\353\345
\355\355\356\345 \360\345\370\345\355\350\345 \304\323 \344\353\377 \+
\361\353\345\344\363\376\371\350\365 \364\363\355\352\366\350\351," }}
{PARA 0 "" 0 "" {TEXT -1 73 "\352\356\362\356\360\373\345 \354\356\346
\355\356 \354\345\355\377\362\374 \342 \350\355\362\345\360\340\352
\362\350\342\355\356\354 \360\345\346\350\354\345, \342\373\341\350
\360\340\377 \350\365 \350\347 \341\340\355\352\340 \344\340\355\355
\373\365: " }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 47 "t/y(t), (1-t^2)/y(t
)^2, (y(t)^2+1)/sqrt(1-t^2)," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 33 "f:=t->-t*sin(t)/(y(t)*cos(y(t)));" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#>%\"fGf*6#%\"tG6\"6$%)operatorG%&arrowGF(,$**9$\"\"\"-%$sinG6#F.
F/-%\"yGF2!\"\"-%$cosG6#F3F5F5F(F(F(" }}}{EXCHG {PARA 0 "" 0 "" {TEXT 
-1 47 "\307\340\344\340\344\350\354 \357\340\360\340\354\345\362\360
\373 \355\340\367\340\353\374\355\373\365 \363\361\353\356\342\350\351
 \342 \362\356\367\352\345 t0:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 14 "t0:=0: y0:=1: " }}}{SECT 0 {PARA 3 "" 0 "" {TEXT 259 28 "\317
\356\377\361\355\345\355\350\345 \360\340\341\356\362\373 \356\357\345
\360\340\362\356\360\340 D" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
52 "convert(D(y)(t0),diff); convert(D[1$2](y)(t0),diff);" }}{PARA 11 "
" 1 "" {XPPMATH 20 "6#-%%evalG6$-%%diffG6$-%\"yG6#%#t1GF,<#/F,\"\"!" }
}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%%evalG6$-%%diffG6$-%\"yG6#%#t1G-%\"
$G6$F,\"\"#<#/F,\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "yy
:=t->sin(t):D[1$2](yy)(1); " }{TEXT -1 13 "- \375\362\356 \357\360\350
\354\345\360." }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$-%$sinG6#\"\"\"!\"
\"" }}}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT 
-1 64 "\322\345\357\345\360\374 \347\340\357\350\370\345\354 \361\340
\354\350 \355\340\367\340\353\374\355\373\345 \363\361\353\356\342\350
\377 \342 \362\356\367\352\345 t0 \357\356\344 \350\354\345\355\345
\354 yt0:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "yt0:=y(t0)=y0;
" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$yt0G/-%\"yG6#\"\"!\"\"\"" }}}
{EXCHG {PARA 0 "" 0 "" {TEXT -1 19 "\307\340\357\350\370\345\354 \360
\345\370\340\345\354\356\345 \304\323" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 24 "de:=diff(y(t),t$1)=f(t);" }{TEXT -1 1 " " }}{PARA 11 
"" 1 "" {XPPMATH 20 "6#>%#deG/-%%diffG6$-%\"yG6#%\"tGF,,$**F,\"\"\"-%$
sinGF+F/F)!\"\"-%$cosG6#F)F2F2" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 56 
"\321\356\361\362\340\342\350\354 \347\340\344\340\355\350\345 \355
\340 \360\345\370\345\355\350\345 \344\350\364\364\345\360\345\355\366
\350\340\353\374\355\356\343\356 \363\360\340\342\355\345\355\350\377.
" }}{PARA 0 "" 0 "" {TEXT 271 1 "1" }{TEXT -1 24 ". \300\355\340\353
\350\362\350\367\345\361\352\356\345 \360\345\370\345\355\350\345:" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "dsolve(\{de,yt0\},y(t));   \+
" }{TEXT -1 21 "- \356\357\345\360\340\362\356\360 \360\345\370\345
\355\350\377 \304\323" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/-%\"yG6#%\"t
G-%'RootOfG6#,.-%$sinGF&\"\"\"*&F'F.-%$cosGF&F.!\"\"-F16#%#_ZGF.*&F5F.
-F-F4F.F.-F16#F.F2-F-F9F2" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 42 "\302
 Wolfram Alpha \375\362\356 \360\345\370\345\355\350\345 \342\373\343
\353\377\344\350\362 \362\340\352: " }{OLE 1 4617 1 "[xm]Br=WfoRrB:::w
k;nyyI;G:;:j::>:B>N:F:nyyyyy]::yyyyyy:::::::::::::::::::::::::::::::::
::::::::::::::::::::::::::::::::::::::fyyyyya:nYf::G:I:wAyA:::::::::::
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::ND
Ymq^H;C:ELq^H_mvJ::::::::gj<vyyuyJ<j;tV;B:;JZC:bKB::>vic\\UWL_X:A:;v;B
:F:YLpfF>:::::::::J?NZ;vyyyyyY:vYxY:B:::::::c:;:ElrfH=MtFGYMq>>Wlj:gml
J::::::>>?jyyiy=J:B::::::F:;JKA:<:=j[vGUMrvC?MoJ::::::::JCN:ry:>:<::::
::EJ:FG;J:JyyI?Z:VZ:>:C:YJ:n:nY>;F;N;;j?J@j@>:WJ:F<>\\:B:q:_J:V<^<f<n<
;jEB:k:m:o:s:wAu:jy;::::::::::::::::::::::::::::::::::::::::::::::::::
::::::::::::::F:DZ:B::::::::::^=N:_tjGV:<JDg>TVdJ:^;Ek<@Z@>[>WdG_dpB:a
rOMeU=DUSeJ=uVMuRAtUCUS[TRIUSamBPJd`ppPps<LaPpu<Lcxpp@PqF\\=Vdsgg\\wgf
S>ErJYUW_UTEeV;cMEM:@K<pNd<l\\\\QtDqjN<KRBYSKYFKYSJ[Dw[r=ItQ=DN_yAwRJ[
Dwer==D:cYKcYCcy]?tQ=\\JrJyTJvk?_xdveB_xIHb:B><NtyrZxQ^LYBxjZdliLniPNt
yo\\RJYB==j:FZ<NZ<NZ:N:=r:=B:Aj:^:dj:<J;Vj=s:h;QR:DZBH@;R:=J?DJ<TRCDlP
DJ;DrsF:wyyAb<vYxy;tV;J:>r:B:bKgZ:fc[_hb_ds?h_?^pn_j>^?GhoGfnGgioGSZ::
RSPN]v;fbk;n_>WdGCGLyVDur>Z:>::::::yayYZ:J<B:=B:;jysy?:;:]dAVi<J<M:=j>
r:?d:<J;^U<J:f:<J;@J;vCS=[Ls<jlVH[KR<:;B:::::::JFNZ;F:;J;<J:<jysy;Z:::
:::j=J]M:;B:F:Y<>Z:>:::::::::J?<Z:vYxI:;Z::::::JywYB:::::::::::::yay=J
:B:::::::::::::::::::jysy:>:<::::::::=J:f:FZ<vyyyYE:WS:mZ:f:V[<Z:f:^[<
>b<>jUV;<JMTjA^;UTRZ_?:;MC<J::ojyyiyAZ:><<JZyyyonyyyyAbUJmA:EZ:F[<Z<f:
;JDDjkAJF@JH<Z:Vy<N^yM:<:[V:>Z:b:;B>cTTUUSZZ:WMP]WF>aQ`gq?j;>hqgoJnfXa
:f_;j><J:N`DZ:FZ:B:]SXsW:E:cJ:AjlEJHjw?jxM:<:[V:B:D:::::::Uk:^:>x;>:?;
_;<JCjs`PqHpqHQN`ls`Pq\\lNHpqHAgNp>m>>O;PrIJb@JS@JE_G;Y:[T:cX:KOZOo;>d
;>Z=fZ:JDJQ^=<jw;<:[n:>Z:>Z<:Ums:::JrXA:UK:^:>x;F:gZ:N@B:OJ;<J;a`<JqN:
AFX;b:Cb[QkODZ=<PVKXW;DJ;I`<>Z<xG?Zmc:HBRIpM;Vjs?Z<bZKK;<j;]ADrNNZ>RkZ
m;M]:bUrZm=?FDrZk=?VD^:Q;?bZ;j[\\Qv\\qv\\qv\\AUH;sb:Ww:kd:gT:WB;gT:;I;
gT:;r:<:c:uX:s:qAB:>L;B:;R:DZJVdscRYEUXqh=K?@Svpyu^oR=Jr:jPF:C:[Q:<JB>
Z:N`DZ:n:;jPhleqmeiLALJ?DJfIJ>LJuPZ=^U;JMjPAjZ<QrHq`Tn[Hn:<J=AZ:nj;J\\
Pps`pmtPJHok`pltpkPPP<l^tpkt\\?FZ::LOUr>i<SM[@@::L?EuV:ZKZgOfikBVB:B:Z
?[[[BrEZJ_xJrK>dl=cY?>ZniB:><AlZr]ELOjA?:[JZRJyEL<[;O?jiP>=<>Z;NZ<b:;b
:@Z;>Z=>Z;B;N[;>:Hr[V:qZEF:?J>?Z:FZ;b<b>ZmK:DrnB:t@HRvB;h<<:j\\;A=?vUj
sj;;u;Fi:J;]<;rZk=?VD^:E@VHRT>:W=AVXbZK;AFXbZM[>rDb:H@vGrVrZm]:NjbZ=@I
NjcB:LY?>:G;Ojysy=Z:>:s:qQBv:>:sg:>ZFIZ<NZ\\VdsWhngfgcqUG>AM;rUjsj;aAD
RNj;]ADrNJ::::::Geq;B:OB:kK?AZ:B:JhEXF^:<jP@J:^:>X=j;>Z:>::::WTJWTLB::
:::::::::::::::::::::::::::::::4:" }{TEXT -1 2 ". " }}{PARA 0 "" 0 "" 
{TEXT -1 52 "\303\360\340\364\350\367\345\361\352\350 \356\355\356 \+
\357\360\345\344\361\362\340\342\353\345\355\356 \361\345\354\345\351
\361\362\342\356\354 \352\360\350\342\373\365 \353\350\355\350\351." }
}{PARA 0 "" 0 "" {TEXT -1 11 "\317\356\361\362\356\377\355\355\340\377
 " }{TEXT 265 2 "\321 " }{TEXT -1 43 "\356\357\360\345\344\345\353\377
\345\362\361\377 \350\347 \355\340\367\340\353\374\355\373\365 \363
\361\353\356\342\350\351 \350 \360\340\342\355\340: " }{OLE 1 4617 1 "
[xm]Br=WfoRrB:::wk;nyyI;G:;:j::>:B>N:F:nyyyyy]::yyyyyy::::::::::::::::
:::::::::::::::::::::::::::::::::::::::::::::::::::::::fyyyyya:nYf::G:
I:wAyA::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:::::::::::::::NDYmq^H;C:ELq^H_mvJ::::::::gj<vyyuyJ<j;tV;B:;JZC:bKB::>
vZQZDhoCOt;V:>b@Z:j:vCSmlJ::::::::::OJ;@jyyyyyy;jysy;Z:::::::^<>:fB]mt
FFcmnvGWMJnC==nHE=;:::::JJN:yyyxI:;Z::::::j:>:QS:B:F:AlqfG[maNFO=;::::
::::_J;Zy=J:B::::::f:;jn>:;:wyyN:<j;<J:^:;jA>:G:wAK:M:OJ:V;^;f;;JA>:[B
:<JykBJC>:a:c:e:gJ:v<<JFJyky;:::::::::::::::::::::::::::::::::::::::::
::::::::::::::::::::::::::j:b:<Z::::::::::JHJ;Nd=y[;J@g>TVdJ:^;Ek<@Z@>
[>WdG_dpB:arOMeU=DUSeJ=uVMuRAtUCUS[TRIUSamBPJd`ppPps<LaPpu<Lcxpp@PqF\\
=Vdsgg\\wgfS>ErJYUW_UTEeV;cMEM:@K<pNd<l\\\\QtDqjN<KRBYSKYFKYSJ[Dw[r=It
Q=DN_yAwRJ[Dwer==D:cYKcYCcy]?tQ=\\JrJyTJvk?_xdveB_xIHb:B><NtyrZxQ^LYBx
jZdliLniPNtyo\\RJYB==j:FZ<NZ<NZ:N:=r:=B:Aj:^:dj:<J;Vj=s:h;QR:DZBH@;R:=
J?DJ<TrXfa<NZ<XH=Jyyy;d:yayYZHQ:>:;H:<:TNEB:UTRcETcTX[US;cGWCF;SK]UW=E
WMuUWM@B::P`?oBY:ETV:WCKaTML]nIalHH;B:;:::::jysyAB:^:<j:<J:vYxY;J:jYe:
qe:>s=j:F;HJlA:?JJ?Z:j<B:?R:?ja^G>D_mlVH[KR<:;B:::::::JFNZ;F:;B:?B:;B:
yayA:<::::::I:OB;B:F:Y<>Z:>:::::::::J?<:yay=J:B::::::nYyA<::::::::::::
jysy:>:<:::::::::::::::::::vYxI:;Z::::::::j:>:E:=b:yyyyq<JQ@jFB:E:Qb:B
:E:Sb:;d:;X<QZ:n^@v;Sj`@@J:>F_B:;:N=yyyxY:<JBB:;xyyQMyyyyY:a:GY:<j<B:M
b:b:EJ:^\\<Vv;>];^]:B:qi:?sy>Z:JBA:;B:DJ:<Kd`ppP@BBJq^oRA=ks_SuW;V:[uW
Gs=GEoC:US:F[:>Z:N`DZ:FZ:B:]SXsW:E:cJ:AjDHJHjw?jx]:JBA:<Z<::::::jPF:C:
[Y:;jC<J:N@B:KJ:VhcogkVfiWhknLSMfOx;>O;H:?G:Hj<<:c:WKHB:qAB:>L=B:;B:;b
::a=:::[uW:f?;J<JrG:MJ:N@B:=Z:Vbss:EB:^<fx;^=VYZ:J;Njcc:nG?B:KN:DJ<TrO
V_<NZ<XF?B:?vUD:aM;>K<Z::::JBAJ:R:DJ:<kc`a\\wgfsWos=OR`kWyiMP]G:[=:Uk:
^:>X;B:O:_c<B:?J:<jXhLfIJ:HJJC:G;gS:=DV[uVUdKAtJ=B:YR:v[;J\\Pps`pmtPJH
ok`pltpkPPP<l^tpkt\\?FZ::n@HkeJpNb[STBS:BOffm;:@;pPkx@]j[:Z:j`RKRRB<x<
BNcI>X>[dvJtQ;;BwE<:[j[FBxr\\N?vK;JB>bnUJyEL<[;O?jiP>=<>Z;NZ<b:;Z;R:;r
:@Z>J?@J:rZVZ:V=hj:N:K^:FZ;b<LZw:HA;bZM=t@\\B?B;h<rRDZ<xGrVB\\>Z:N[:JM
J?vYxy:J:^=VY[j=J:^q<ZFIZ<NZ\\VdsWhngfgCoGs=GM:JVNk;B:<:^u\\A=CZ:f?;J<
JrG:AJ:<J::::nc;ocC[::::::::::::::::::::::::::::::::::::::::::::::::::
::::::::::::::::::::::::::::::::::::4:" }{TEXT -1 9 " . \322\340\352
\350\354 " }}{PARA 0 "" 0 "" {TEXT -1 45 "\356\341\360\340\347\356\354
 \347\355\340\367\345\355\350\377\354\350 y(x) \341\363\344\363\362 \+
\352\356\360\355\350 \363\360\340\342\355\345\355\350\377" }}{PARA 0 "
" 0 "" {TEXT -1 1 " " }{OLE 1 4617 1 "[xm]Br=WfoRrB:::wk;nyyI;G:;:j::>
:B>N:F:nyyyyy]::yyyyyy::::::::::::::::::::::::::::::::::::::::::::::::
:::::::::::::::::::::::fyyyyya:nYf::G:I:wAyA::::::::::::::::::::::::::
:::::::::::::::::::::::::::::::::::::::::::::::::::::NDYmq^H;C:ELq^H_m
vJ::::::::gj<vyyuyJ<j;tV;B:;JZC:bKB::>vZQZDhoCOt;V:>jAZ:j:vCSmlJ::::::
::::OJ;@jyyyyyy;jysy;Z:::::::^<>:fB]mtFFcmnvGWMJnC==nHE=;:::::JJN:yyyx
I:;Z::::::j:>:CX:B:F:AlqfG[maNFO=;::::::::_J;Zy=J:B::::::f:;jn>:;:wyyN
:<j;<J:^:v;;J=JyK>j>J?>:Q:S:UJ:n;;jCJB<Z:F<N<;JyKDjDJE>:iZ:>=F=N=V=^=f
=nYvY:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
=Z<B:<::::::::::s:?JcHVNA:SoLbkc<;J@f>ER:TJ>LncpNdT]:V\\QGghGbf_g<GfmG
g]Wbi_f_?d[wf_WH]R;cTTUUSaEBWTSiEB_tUUURWmBHjc`qpDpql`KfZ=wgoOhcgfl?^H
gF;R>CRMcDBEDXceV=MC>[[v_?wk>w_;?dnA\\IvbYGbJOxYn];?dni\\IFb:^x?_x_^xI
PbYGB<[=we;kAQNteli\\NtyrZ<ZJBJcy]=tYKDw[r==dDyDKyTKcyQE\\;w[FF:=j:DJ;
DJ;<J;FZ=FZ:V:=J<b<=B:?b:?vVDJ:DrnN:t`<>Z=@I?B;Gf>?SE?j;;=Jyyy;d:yayYZ
HQ:>:;H:<:TNEB:UTRcETcTX[US;cGWCF;SK]UW=EWMuUWM@B::P`?oBY:ETV:WCKaTML]
nIalHH;B:;:::::jysyAB:^:<j:>:yayQ:>:>[`JTD:?E;F:MZ=F`<B:?jpK:f:<J;@J;v
CS=[LsfFaMR>`:J:<:::::::>=?R:=:?B:;B:yayA:<::::::I:CG;>Z:j:vCJ:<J:::::
:::::OB:<jysy:>:<::::::wqy[:::::::::::::vYxI:;Z::::::::::::::::::::yay
=J:B::::::::F:;j<j:Djyyyyg:n_;F=<j<j?D:<j<J@DZ<>j\\V;n^@v;Sj`@@J:>D_B:
;:N=yyyxY:<JBB:;xyyQ]yyyyYZD\\:nr;B:EZ:F[<J:Dj<>:cb:;U:WKHB:qi:;fyB:>l
;J:<Z<>ZJ^dcgg_;<<nGSGpkJVXSpXQ:AJrXQg=KmTN<jP@:[[:N`DZ:V=Vhcog]wgm?_c
VhcogbF_]wgm;@mkxps@MRnLSMCMJN?RGx:[T:_S:gNp>v;>d;^t;>O;POAJb@J^AJE_Gk
PpAJNKK_]<r:EB:^<^b<^=<jw;<:[n:<Z:>Z<:Ums:::::<jPF:C:[Y:;jDJSZ:F[:>:kE
XkUXkUXk]:n\\<no=n_<nd;n[>nd;>v>nd;>Z=fZ:JDJTHJHjw;<:[V:;J:@J:DJ:VdscR
YEUXq\\EleEJ;DrkN:?vUD:a=AN:^:QkODZ=Hi:N:?FDDJ:HRvJ;a\\<^:EhBi@a=`@;Jq
j;aADRNj;]ADrNB;h<DJ;I@vGrVrZm]:NjbZ=@INjcJ<N<NZ<XHRT>:W=KVF;b:C:jkJ;y
@VH>KjXfa<B\\[C:<::::::::::joIK?PMVqyu^oR=JrXA:UK:^:>X=jC<J:N`DZ:>;;jP
XwOXwOplPpM<DJZIJuIJuPJUTJZIJALZ=fWn>vs;Fbj?hmgc@Wb=GZ:>o;B:KW:^b_Whcw
fh?^MWfcgfhWf___ZFchWfhR;=:JUr>i<S][;L@:L?EuV:ZKrNpPkx@]j[bV:<:>^?[[c>
\\Zi:<Ot=[AKbDI^xOJ:Ly\\:JBVB=\\IhBO;YN:><;Dw@ny\\^JRJO[YkiP>=<>Z;NZ<b
:;b:;R:@J:HJ:@Z>J?@J:N:a]:Njc;W=A>CJCJ:HBRkZ][<xGrVrZZerD<Zs?:DRNB:AFX
bZM[>RkZm;M]:bUrZm=?FDrZk=?VD^:Q;?jkZi;a=AVX>Z<@?Vjr[<H?LZLZ<rVjnB:t@
\\rRB;:H@DrqZm[B<p=>kj>:;RrOJ:n>N;yayI:<J:^=VY[j=J:^q<B:lv:DJ;Dlc`qsLq
lp`@OuJnF;B:OB:kK?AZ:B:=J:^u\\A=CZ:f_;F:C:[Q:VZ:>Z:>::::WTJWTLB:::::::
:::::::::::::::::::::4:" }{TEXT -1 37 " , \360\340\347\360\345\370\340
\345\354\356\343\356 \356\362\355\356\361\350\362\345\353\374\355\356 \+
Z=y(x). " }}{PARA 0 "" 0 "" {TEXT -1 84 "\310\354\345\355\355\356 \375
\362\356 \361\356\344\345\360\346\350\362\361\377 \342 \355\340\351
\344\345\355\355\356\354 \360\345\370\345\355\350\350 Maple y(t). \322
\340\352\356\345 \360\345\370\345\355\350\345 \343\360\340\364\350\367
\345\361\352\350 \357\360\345\344-" }}{PARA 0 "" 0 "" {TEXT -1 77 "
\361\362\340\342\350\362\374 \353\345\343\367\345, \345\361\353\350 \+
\357\345\360\345\351\362\350 \352 \367\350\361\353\345\355\355\356\354
\363 \360\345\370\345\355\350\376 \344\350\364\364\345\360\345\355\366
\350\340\353\374\355\356\343\356 \363\360\340\342\355\345\355\350\377.
" }}}{EXCHG {PARA 0 "" 0 "" {TEXT 270 1 "2" }{TEXT -1 64 ". \317\360
\356\342\345\344\270\354 \367\350\361\353\345\355\355\356\345 \360\345
\370\345\355\350\345, \342\350\347\363\340\353\350\347\340\366\350\376
 \350 \352\356\355\362\360\356\353\374 \360\345\370\345\355\350\377 y(
" }{TEXT 257 1 "t" }{TEXT -1 13 ") \342 \347\340\344\340\355\355\356
\351 " }}{PARA 0 "" 0 "" {TEXT -1 6 "\362\356\367\352\345 " }{TEXT 
256 1 "t" }{TEXT -1 1 ":" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 
"F:=dsolve(\{de,yt0\},y(t),numeric);" }}{PARA 11 "" 1 "" {XPPMATH 20 "
6#>%\"FGf*6#%(x_rkf45G6)%$resG%%dataG%%varsG%)solnprocG%)outpointG%&nd
solG%\"iG6#%inCopyright~(c)~2000~by~Waterloo~Maple~Inc.~All~rights~res
erved.G6\"C*>%8_EnvDSNumericSaveDigitsG%'DigitsG>F6\"#9@%/%-_EnvInFsol
veG%%trueG>8(-&%&evalfG6#F56#9$>F>-FAFC>8%`6$%$GetG%$SetGb6#%+thismodu
leG6#%%DataGF26$%$GetG%$SetGF2F2F2F26\"6#%%DataG>8&-_FHFS6#Q(sysvarsF2
>8'-Fen6#Q/soln_procedureF2@$4-%%typeG6$F>.%(numericGC$@,-%'memberG6$F
D7+Q&startF2.%&startGQ'methodF2.%'methodGQ%leftF2Q&rightF2Q)leftdataF2
Q*rightdataF2Q+enginedataF2C$>8$-Fin6#-%(convertG6$FD.%'stringG@&-F`o6
$Fgp.%&arrayGO-%%evalG6$Fgp\"\"\"0FgpQ)procnameF2OFgp-Fgo6$FD7&Q%lastF
2.%%lastGQ(initialF2.%(initialGC$>FgpFhp@$-F`o6$Fgp.%%listGO7#-%$seqG6
$/&FY6#,&FhqFhq8*Fhq&FgpFcs/Fes;\"\"!Fhq3-F`o6$F>%\"=G-Fgo6$-%$lhsG6#F
>7$FbrFcrC$@%-F`o6$-%$rhsGFbtFjr>Fgp-Fin6#/Fbr7$Fis-%#opG6#FhtYQKiniti
al~values~must~be~specified~in~a~listF2@$FhrOF]s/F>Q.solnprocedureF2O-
Ffq6#Fin/F>FgnOFY@%09!%(unknownGO-.F_vFCC$>8)-%(pointtoG6#&-Fen6#Q0sol
n_proceduresF26#FisO-.FfvFCZ%C$>Fgp-FinFbtF]sF2YF2F2F2F2" }}}{EXCHG 
{PARA 0 "" 0 "" {TEXT 266 10 "\317\360\350\354\345\367\340\355\350\345
" }{TEXT -1 19 ". \315\350\346\345 \342 \361\362\360\363\352\362\363
\360\345 " }{TEXT 267 1 "F" }{TEXT -1 41 " \342 \352\360\363\343\353
\373\365 \361\352\356\341\352\340\365 \363\352\340\347\373\342\340\345
\362\361\377 \347\355\340\367\345\355\350\345 \"" }{TEXT 268 1 "t" }
{TEXT -1 15 "\", \340 \342 \352\342\340\344\360\340\362-" }}{PARA 0 "
" 0 "" {TEXT -1 39 "\355\373\365 - \355\356\354\345\360 \352\356\354
\357\356\355\345\355\362\373 \342\345\352\362\356\360\340 \360\345\370
\345\355\350\377 " }{TEXT 269 1 "F" }{TEXT -1 1 ":" }{TEXT 258 0 "" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "F(.2); F(0.6)[2];" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#7$/%\"tG$\"\"#!\"\"/-%\"yG6#F%$\"35DmO0b!4&*
*!#=" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/-%\"yG6#%\"tG$\"3G&3lOX#GX()!
#=" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 62 "plots[odeplot](F,[[t,
y(t),color=red]],t=-2..1.7,labels=[t,y]);" }}{PARA 7 "" 1 "" {TEXT -1 
89 "Warning, cannot evaluate the solution further right of 1.0892305, \+
probably a singularity\n" }}{PARA 7 "" 1 "" {TEXT -1 121 "Warning, can
not evaluate the solution further left of -.88888889, maxfun limit exc
eeded (see ?dsolve,maxfun for details)\n" }}{PARA 13 "" 1 "" 
{GLPLOT2D 484 167 167 {PLOTDATA 2 "6$-%'CURVESG6$X,%)anythingG6\"6\"[g
l'!%\"!!#aq\"T\"#C0000000000000007FFC000000000000BFFED097B425EC957FFC0
00000000000BFFDA12F684BD9297FFC000000000000BFFC71C71C71C7817FFC0000000
00000BFFB425ED097B4157FFC000000000000BFFA12F684BDA0AA7FFC000000000000B
FF8E38E38E38F017FFC000000000000BFF7B425ED097B967FFC000000000000BFF684B
DA12F682A7FFC000000000000BFF55555555554BF7FFC000000000000BFF425ED097B4
3167FFC000000000000BFF2F684BDA12FAB7FFC000000000000BFF1C71C71C71C407FF
C000000000000BFF097B425ED08D47FFC000000000000BFEED097B425ECEF7FFC00000
0000000BFEC71C71C71C7267FFC000000000000BFEA12F684BDA1043FF6747317CD113
EBFE7B425ED097B3C3FF4599B21E624A8BFE55555555555733FF3085F00042CEABFE2F
684BDA12F513FF21539D14400C9BFE097B425ED09893FF16136364A5F1FBFDC71C71C7
1C6CC3FF0DD4BE9D7CEADBFD7B425ED097B3C3FF07FD389947CD7BFD2F684BDA12FAB3
FF04176E507B7BABFCC71C71C71C6CC3FF01BA54727F456BFC2F684BDA12FAB3FF0083
3ED2BB82FBFB2F684BDA12F633FF001070EA5242D00000000000000003FF0000000000
0003FB2EBF7187CA9383FEFFDF9E4FC95B43FC2EBF7187CA8F03FEFEFB93B6C19533FC
C61F2A4BAFD683FEFC944930F45DA3FD2EBF7187CA8F03FEF7F0FA940B4203FD7A6F4D
E9BD32C3FEF06535109CE4B3FDC61F2A4BAFE1C3FEE5538A089918C3FE08E78356D142
C3FED62C63C53A9F33FE2EBF7187CA94A3FEC269505345BCD3FE54975FB8C3E683FEA9
7A50DBC3D6A3FE7A6F4DE9BD3863FE8AA8789FA8CAE3FEA0473C1AB68A43FE64DCD63A
CDA303FEC61F2A4BAFDC23FE36251F485AF493FEEBF7187CA92E03FDF4AA03DFB68DF3
FF08E78356D14E03FD49B5556F36DF13FF1BD37A6F4DE617FFC0000000000003FF2EBF
7187CA9A47FFC0000000000003FF41AB68A0473257FFC0000000000003FF54975FB8C3
E687FFC0000000000003FF678356D1409AB7FFC0000000000003FF7A6F4DE9BD32C7FF
C0000000000003FF8D5B450239E6F7FFC0000000000003FFA0473C1AB67F07FFC00000
00000003FFB3333333333337FFC000000000000-%'COLOURG6&%$RGBG$\"*++++\"!\"
)$\"\"!F2F1-%+AXESLABELSG6$%\"tG%\"yG" 1 2 0 1 10 0 2 9 1 4 2 
1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 59 "plots[odeplot](F,[[t,y(t),color=red]],t=0..4,labels
=[t,y]);" }}{PARA 7 "" 1 "" {TEXT -1 89 "Warning, cannot evaluate the \+
solution further right of 1.0892305, probably a singularity\n" }}
{PARA 13 "" 1 "" {GLPLOT2D 493 175 175 {PLOTDATA 2 "6$-%'CURVESG6$X,%)
anythingG6\"6\"[gl'!%\"!!#_q\"S\"#00000000000000003FF00000000000003FB4
E5E0A72F05163FEFFD44D562C8523FC4E5E0A72F055E3FEFEA14FDC796323FCF58D0FA
C687593FEFB66424CAE79F3FD4E5E0A72F055E3FEF52DDBF293A063FDA1F58D0FAC65C
3FEEB175B58FCE6F3FDF58D0FAC687593FEDC579C46FE7403FE24924924924853FEC83
5641D895CA3FE4E5E0A72F05043FEADF60D7B50D923FE7829CBC14E5DD3FE8CB0E4147
E6823FEA1F58D0FAC65C3FE62FF173251E543FECBC14E5E0A6DA3FE2E395A686CF3D3F
EF58D0FAC687B33FDD019D29B8ABE33FF0FAC687D633EC3FCDA954ADD98E763FF24924
924923D17FFC0000000000003FF397829CBC15797FFC0000000000003FF4E5E0A72F05
5E7FFC0000000000003FF6343EB1A1F5447FFC0000000000003FF7829CBC14E5297FFC
0000000000003FF8D0FAC687D6D07FFC0000000000003FFA1F58D0FAC6B67FFC000000
0000003FFB6DB6DB6DB69B7FFC0000000000003FFCBC14E5E0A6807FFC000000000000
3FFE0A72F05398287FFC0000000000003FFF58D0FAC6880D7FFC000000000000400053
97829CBBF97FFC0000000000004000FAC687D633EC7FFC0000000000004001A1F58D0F
ABDF7FFC00000000000040024924924924B27FFC0000000000004002F05397829CA57F
FC000000000000400397829CBC14987FFC00000000000040043EB1A1F58C8A7FFC0000
000000004004E5E0A72F055E7FFC00000000000040058D0FAC687D517FFC0000000000
004006343EB1A1F5447FFC0000000000004006DB6DB6DB6D367FFC0000000000004007
829CBC14E60A7FFC000000000000400829CBC14E5DFD7FFC0000000000004008D0FAC6
87D5EF7FFC00000000000040097829CBC14DE27FFC000000000000400A1F58D0FAC6B6
7FFC000000000000400AC687D6343EA87FFC000000000000400B6DB6DB6DB69B7FFC00
0000000000400C14E5E0A72E8E7FFC000000000000400CBC14E5E0A7627FFC00000000
0000400D6343EB1A1F547FFC000000000000400E0A72F05397477FFC00000000000040
0EB1A1F58D0F3A7FFC000000000000400F58D0FAC6880D7FFC00000000000040100000
000000007FFC000000000000-%'COLOURG6&%$RGBG$\"*++++\"!\")$\"\"!F2F1-%+A
XESLABELSG6$%\"tG%\"yG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 
45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "" 0 "" {TEXT 260 7 "\307
\340\344\340\355\350\345" }{TEXT -1 44 ". \317\356\361\354\356\362\360
\345\362\374 \342 Help \352\340\352 \360\345\370\340\376\362\361\377 \+
\304\323 \357\356\360\377\344\352\340 " }{TEXT 262 1 "n" }{TEXT -1 33 
" \350 \361\350\362\345\354\373 \304\323. \302\373\341\360\340\362\374
 \304\323 \350\347 [24] " }}{PARA 0 "" 0 "" {TEXT -1 85 "(\305\364\350
\354\356\342) \350 \360\345\370\350\362\374 \345\343\356. \335\362\356
 \360\345\370\345\355\350\345 (\367\350\361\353\345\355\355\356\345) \+
\345\361\362\374 \362\340\352\346\345 \342 Mathcad - \356\357\366\350
\377 Odesolve." }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 85 "---------------
-------- \317\320\316\302\305\320\312\300 ----------------------------
------------------------" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 80 "\327
\362\356\341\373 \356\361\363\371\345\361\362\342\350\362\374 \357\360
\356\342\345\360\352\363 \357\356\353\363\367\345\355\355\356\343\356 \+
\360\345\370\345\355\350\377 \304\323, \345\371\270 \360\340\347 \357
\356\342\362\356\360\350\354 \360\345\370\345\355\350\345 \344\350\364
-" }}{PARA 0 "" 0 "" {TEXT -1 25 "\364\345\360\345\355\366\350\340\353
\374\355\356\343\356 \363\360\340\342\355\345\355\350\377:" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "de0:=diff(y(t),t$1)-f(t)=0;" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$de0G/,&-%%diffG6$-%\"yG6#%\"tGF-\"
\"\"**F-F.-%$sinGF,F.F*!\"\"-%$cosG6#F*F2F.\"\"!" }}}{EXCHG {PARA 0 ">
 " 0 "" {MPLTEXT 1 0 36 "Y:=dsolve(\{de0,yt0\},y(t)); rhs(Y);  " }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"YG/-%\"yG6#%\"tG-%'RootOfG6#,.-%$s
inGF(\"\"\"*&F)F0-%$cosGF(F0!\"\"-F36#%#_ZGF0*&F7F0-F/F6F0F0-F36#F0F4-
F/F;F4" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'RootOfG6#,.-%$sinG6#%\"tG
\"\"\"*&F*F+-%$cosGF)F+!\"\"-F.6#%#_ZGF+*&F2F+-F(F1F+F+-F.6#F+F/-F(F6F
/" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 9 "\317\360\356\342\345\360\352
\340:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "pr_a:=subs(y(t)=rh
s(Y),de0): pr_a;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/\"\"!F$" }}}
{EXCHG {PARA 0 "" 0 "" {TEXT -1 77 "\302 \357\360\340\342\350\353\374
\355\356\361\362\350 \357\356\353\363\367\345\355\355\356\343\356 \360
\345\370\345\355\350\377 \354\356\346\355\356 \362\340\352\346\345 \+
\363\341\345\344\350\362\374\361\377, \347\340\357\363\361\362\350\342
 \357\360\356\366\345\344\363\360\363 " }}{PARA 0 "" 0 "" {TEXT -1 58 
"\363\357\360\356\371\345\355\350\377, \342 \360\345\347\363\353\374
\362\340\362\345 \352\356\362\356\360\356\351 \344\356\353\346\355\373
 \357\356\353\363\367\350\362\374 \362\356\346\344\345\361\362\342\356
:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "simplify(pr_a); " }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#/\"\"!F$" }}}{EXCHG {PARA 0 "" 0 "" 
{TEXT -1 33 "\305\361\362\374 \344\360\363\343\350\345 \342\356\347
\354\356\346\355\356\361\362\350 \357\360\356\342\345\360\352\350:" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "odetest(Y,de0);" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 21 "odetest(Y,[de0,yt0]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7$\"
\"!F$" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 97 "------------------------
----------------------------------------------------------------------
---" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "restart;with(plots):
" }}{PARA 7 "" 1 "" {TEXT -1 50 "Warning, the name changecoords has be
en redefined\n" }}}{SECT 0 {PARA 3 "" 0 "" {TEXT 272 59 "\317\360\350
\354\345\360 \2711 \360\345\370\345\355\350\377 \344\350\364\364\345
\360\345\355\366\350\340\353\374\355\356\343\356 \363\360\340\342\355
\345\355\350\377 2-\343\356 \357\356\360\377\344\352\340." }{TEXT -1 
0 "" }}{EXCHG {PARA 0 "" 0 "" {TEXT -1 80 "\302 \350\355\362\345\360
\340\352\362\350\342\355\356\354 \360\345\346\350\354\345 \354\356\346
\355\356 \347\340\357\350\361\340\362\374 \350 \360\345\370\350\362
\374 \353\376\341\356\345 \350\347 \363\360\340\342\355\345\355\350
\351 \357\356\353\374\347\356\342\340\362\345\353\377, " }}{PARA 0 "" 
0 "" {TEXT -1 9 "\355\340\357\360\350\354\345\360:" }}}{EXCHG {PARA 0 
"> " 0 "" {MPLTEXT 1 0 37 "de:=diff(x(t),t$2)=-t^3*x(t)+exp(-t);" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#deG/-%%diffG6$-%\"xG6#%\"tG-%\"$G6$
F,\"\"#,&*&)F,\"\"$\"\"\"F)F5!\"\"-%$expG6#,$F,F6F5" }}}{EXCHG {PARA 
0 "" 0 "" {TEXT -1 44 "\307\340\344\340\344\350\354 \355\340\367\340
\353\374\355\373\345 \363\361\353\356\342\350\377 \361\353\345\344\363
\376\371\350\354 \356\341\360\340\347\356\354:" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 20 "xt0:=x(0)=1, x(2)=4;" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%$xt0G6$/-%\"xG6#\"\"!\"\"\"/-F(6#\"\"#\"\"%" }}}
{EXCHG {PARA 0 "" 0 "" {TEXT -1 49 "\315\340\365\356\344\350\354 \340
\355\340\353\350\362\350\367\345\361\352\356\345 \360\345\370\345\355
\350\345 (\345\361\353\350 \356\355\356 \350\354\345\345\362\361\377):
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "r:=dsolve(\{de,xt0\},x(
t));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"rG6\"" }}}{EXCHG {PARA 0 "
" 0 "" {TEXT -1 9 "\317\360\356\342\345\360\352\340:" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 20 "odetest(r,[de,xt0]);" }}{PARA 8 "" 1 "" 
{TEXT -1 47 "Error, (in odetest) invalid subscript selector\n" }}}
{EXCHG {PARA 0 "" 0 "" {TEXT -1 14 "\321\362\360\356\350\354 \343\360
\340\364\350\352:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "plot(r
hs(r),t=0..4);" }}{PARA 8 "" 1 "" {TEXT -1 61 "Error, invalid input: r
hs expects 1 argument, but received 0\n" }}}{EXCHG {PARA 0 "" 0 "" 
{TEXT -1 26 "\315\340\365\356\344\350\354 \367\350\361\353\345\355\355
\356\345 \360\345\370\345\355\350\345:" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 33 "R:=dsolve(\{de,xt0\},x(t),numeric);" }}{PARA 11 "" 1 
"" {XPPMATH 20 "6#>%\"RGf*6#%&x_bvpG6(%$resG%%dataG%)solnprocG%&ndsolG
%)outpointG%\"iG6#%inCopyright~(c)~2000~by~Waterloo~Maple~Inc.~All~rig
hts~reserved.G6\"C)>%8_EnvDSNumericSaveDigitsG%'DigitsG>F5\"#9@%/%-_En
vInFsolveG%%trueG>8(-&%&evalfG6#F46#9$>F=-F@FB>8%`6$%$GetG%$SetGb6#%+t
hismoduleG6#%%DataGF16$%$GetG%$SetGF1F1F1F1%,_m156079452G6#%%DataG>8&-
_FGFR6#Q/soln_procedureF1@$4-%%typeG6$F=.%(numericG@+/F=Q.solnprocedur
eF1O-%%evalG6#FX-%'memberG6$F=7)Q&startF1Q%leftF1Q&rightF1Q*errorprocF
1Q(rawdataF1Q&orderF1Q&errorF1O-FXFB/F=Q(sysvarsF1O-FZ6#Fcp09!%(unknow
nGO-.FhpFBC$>8'-%(pointtoG6#&-FZ6#Q0soln_proceduresF16#\"\"!O-.F_qFBZ%
C$>8$-FX6#F=7$/%\"tG&F_r6#\"\"\"-%$seqG6$/&.7$-%\"xG6#Fdr-%%diffG6$F_s
Fdr6#8)&F_r6#,&FfsFgrFgrFgr/Ffs;Fgr\"\"#F1YF1F1F1F1" }}}{EXCHG {PARA 
0 "" 0 "" {TEXT -1 23 "\342 \362\356\354 \367\350\361\353\345 \342 \+
\362\356\367\352\345 t=1" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "
R(1.4);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7%/%\"tG$\"#9!\"\"/-%\"xG6#
F%$\"3]V$*o')*yo=\"!#;/-%%diffG6$F*F%$!3$y`PJ_xaT$!#=" }}}{EXCHG 
{PARA 0 "" 0 "" {TEXT -1 82 "\321\362\360\356\350\354 \343\360\340\364
\350\352 \342 \356\352\360\345\361\362\355\356\361\362\350 \362\356
\367\352\350 t=0, \352\356\362\356\360\373\351 \361 \363\342\345\353
\350\367\345\355\350\345\354 t \361\350\353\374\355\356 \350\361\352
\340\346\340\345\362\361\377, " }}{PARA 0 "" 0 "" {TEXT -1 46 "\367
\362\356 \356\361\356\341\345\355\355\356 \365\356\360\356\370\356 \+
\342\350\344\355\356 \355\340 \364\340\347\356\342\356\354 \357\356
\360\362\360\345\362\345." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
59 "plots[odeplot](R,[[t,x(t),color=red]],t=0..8,labels=[t,x]);" }}
{PARA 7 "" 1 "" {TEXT -1 85 "Warning, right boundary of range exceeds \+
domain of the problem, it has been adjusted\n" }}{PARA 13 "" 1 "" 
{GLPLOT2D 583 162 162 {PLOTDATA 2 "6$-%'CURVESG6$X,%)anythingG6\"6\"[g
l'!%\"!!#_q\"S\"#00000000000000003FEFFFFFFFFFFFFC3FA4E5E0AB37370A3FF5F
466EC4F5C6F3FB4E5E0A6EBB4103FFBEF5AD506AD2C3FBF58D0FC874F954000F84B7CE
8EE443FC4E5E0A6EBB4104003FBEAC12E02FB3FCA1F58D1B981D34007026608A5B13D3
FCF58D0FA618E18400A0B938CC3142B3FD249249297ADED400D174221D2681C3FD4E5E
0A6EBB4104010129AE45F94603FD7829CBC529AF140119A91E38A50993FDA1F58D0A6A
114401323570F4A66743FDCBC14E60D87F54014ACAF45B8CBD53FDF58D0FA618E18401
63650707274BB3FE0FAC687E43A7D4017BFDE79E823EA3FE24924920E3D8E401948E7F
628F80C3FE397829CC1B0FF401AD0E2961503AC3FE4E5E0A775246F401C5727555AE44
53FE6343EB19F2781401DDAEE7B07F10D3FE7829CBC529AF1401F5B4B6DF13BB93FE8D
0FAC67C9E0340206B943022F8EA3FEA1F58D1301173402126A0F7EFE0B93FEB6DB6DB5
A14854021DE115BAE409C3FECBC14E60D87F54022910F7D3A5B513FEE0A72F0378B074
0233EA83AEAF6923FEF58D0FAEAFE774023E5C93EB4D2683FF05397828A80C44024853
F3E2AC9DB3FF0FAC687E43A7D40251BB48C9C99CF3FF1A1F58CF93C054025A7B00BC95
5163FF249249252F5BE402627949E81FC563FF2F0539767F746402699A1393ED6843FF
397829CC1B0FF4026FBF1B6AEF59A3FF43EB1A1D6B28740274C8091B8CD6E3FF4E5E0A
7306C4040278929B556E8273FF58D0FAC8A25F84027AFAE86C6B2813FF6343EB19F278
14027BDBB5E23DC643FF6DB6DB6F8E1394027B0EE96D2D3793FF7829CBC0DE2C240278
6E1670612FB3FF829CBC1679C7A40273D32A6AAE4893FF8D0FAC67C9E034026D193AB2
B85EE3FF97829CBD657BB402641D750FFDDC73FFA1F58D0EB594440258C0345EEA6BC3
FFAC687D64512FC4024AE638D9B4EF23FFB6DB6DB5A14854023A7A031CE66733FFC14E
5E0B3CE3D402276D4E5A074F23FFCBC14E5C8CFC640211BAA58921AD43FFD6343EB228
97E401F2CE17299F0263FFE0A72F0378B07401BD075B70680A63FFEB1A1F59144BF401
825F249BD171D3FFF58D0FAA6464840143326B271D9B64000000000000000401000000
0000001-%'COLOURG6&%$RGBG$\"*++++\"!\")$\"\"!F2F1-%+AXESLABELSG6$%\"tG
%\"xG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve \+
1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "z:=t->diff(x(t),t);" 
}}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"zGf*6#%\"tG6\"6$%)operatorG%&arr
owGF(-%%diffG6$-%\"xG6#9$F2F(F(F(" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 
32 "\321\362\360\356\350\354 \343\360\340\364\350\352 - \364\340\347
\356\342\373\351 \357\356\360\362\360\345\362:" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 29 "odeplot(R,[x(t),z(t)],0..8);\n" }}{PARA 7 "" 
1 "" {TEXT -1 85 "Warning, right boundary of range exceeds domain of t
he problem, it has been adjusted\n" }}{PARA 13 "" 1 "" {GLPLOT2D 582 
239 239 {PLOTDATA 2 "6$-%'CURVESG6$X,%)anythingG6\"6\"[gl'!%\"!!#_q\"S
\"#3FEFFFFFFFFFFFFC4022322C4C2967193FF5F466EC4F5C6F402246A658AAEB2C3FF
BEF5AD506AD2C40225A4CA66BDABD4000F84B7CE8EE4440226D203DB817F54003FBEAC
12E02FB40227F19132F5CFD4007026608A5B13D40229022B8A468C9400A0B938CC3142
B4022A019067F823B400D174221D2681C4022AEC4BF89C5DF4010129AE45F94604022B
BD82FF1EFD340119A91E38A50994022C6EBCAC53233401323570F4A66744022CF7AC7C
A1C254014ACAF45B8CBD54022D4DFC77D851E40163650707274BB4022D651835F42214
017BFDE79E823EA4022D2DF920ACD75401948E7F628F80C4022C96F4AC8D57A401AD0E
2961503AC4022B8B8D7111563401C5727555AE44540229F448461AD9A401DDAEE7B07F
10D40227B686B10CB7F401F5B4B6DF13BB940224B4685A08BD440206B943022F8EA402
20CCB5AE058F4402126A0F7EFE0B94021BDAD5F3576A04021DE115BAE409C40215B6D3
B71EC4C4022910F7D3A5B514020E3572A272BBC40233EA83AEAF69240205285AC790E4
54023E5C93EB4D268401F4BCB9FE988D54024853F3E2AC9DB401DB47AAA3B57FA40251
BB48C9C99CF401BD865FF7E54AE4025A7B00BC955164019B0B2D7C7D4B0402627949E8
1FC564017367966E656F4402699A1393ED684401462E694BFB3B04026FBF1B6AEF59A4
0112F64B0D3C47040274C8091B8CD6E400B2B97C0230AB040278929B556E8274003213
554D130D84027AFAE86C6B2813FF46CDCD94C2DF94027BDBB5E23DC643FA91CA17C3FC
2B54027B0EE96D2D379BFF4B10C83F10888402786E1670612FBC0060084E8004259402
73D32A6AAE489C01147873AB6E4384026D193AB2B85EEC017FD292812153B402641D75
0FFDDC7C01F19283F79CC7940258C0345EEA6BCC02347FF269CB44F4024AE638D9B4EF
2C02729194A6B43AF4023A7A031CE6673C02B25F9E4E47F94402276D4E5A074F2C02F3
25F0DCD7FD940211BAA58921AD4C0319FC4D7EF6E59401F2CE17299F026C0339E134CC
A269D401BD075B70680A6C0358A2444010091401825F249BD171DC03758BBFD5DB86B4
0143326B271D9B6C038FD6EC0E8C7B94010000000000001C03A6AC5DE85E245-%'COLO
URG6&%$RGBG$\"#5!\"\"$\"\"!F2F1-%+AXESLABELSG6$Q\"xF)Q#x'F)" 1 2 0 1 
10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart;" }}}{SECT 0 {PARA 3 "" 0 "
" {TEXT 261 60 "\317\360\350\354\345\360 \271 2 \360\345\370\345\355
\350\377 \344\350\364\364\345\360\345\355\366\350\340\353\374\355\356
\343\356 \363\360\340\342\355\345\355\350\377 2-\343\356 \357\356\360
\377\344\352\340." }{TEXT -1 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 49 "de:=diff(x(t),t$2)+K^2*x(t)+h*sin(omega*t+delta):" }}}{EXCHG 
{PARA 0 "" 0 "" {TEXT -1 44 "\307\340\344\340\344\350\354 \355\340\367
\340\353\374\355\373\345 \363\361\353\356\342\350\377 \361\353\345\344
\363\376\371\350\354 \356\341\360\340\347\356\354:" }}}{EXCHG {PARA 0 
"> " 0 "" {MPLTEXT 1 0 23 "xt0:=x(0)=0, D(x)(0)=0;" }}{PARA 11 "" 1 "
" {XPPMATH 20 "6#>%$xt0G6$/-%\"xG6#\"\"!F*/--%\"DG6#F(F)F*" }}}{EXCHG 
{PARA 0 "" 0 "" {TEXT -1 16 "\315\340\365\356\344\350\354 \360\345\370
\345\355\350\345:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "dsolve
(\{de,xt0\},x(t));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/-%\"xG6#%\"tG,(
*.-%$sinG6#*&%\"KG\"\"\"F'F/F/%\"hGF/-%$cosG6#%&deltaGF/%&omegaGF/F.!
\"\",&*$)F.\"\"#F/F6*$)F5F:F/F/F6F6**-F2F,F/F0F/-F+F3F/F7F6F6*(F0F/-F+
6#,&*&F5F/F'F/F/F4F/F/F7F6F/" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 62 "
\307\340\344\340\355\350\345. \317\360\356\342\345\344\350\362\345 \+
\357\340\360\340\354\345\362\360\350\367\345\361\352\350\351 \340\355
\340\353\350\347 \357\356\353\363\367\345\355\355\356\343\356 \360\345
\370\345\355\350\377." }}}}{SECT 0 {PARA 3 "" 0 "" {TEXT 263 14 "\317
\360\350\354\345\360 \360\345\370\345\355\350\377" }{TEXT -1 1 " " }
{TEXT 264 3 "\321\304\323" }{TEXT -1 0 "" }}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 173 "sys:=diff(y(x),x)=2*z(x)-y(x)-x, diff(z(x),x)=y(x); \+
                                                             fns:=\{y(
x),z(x)\}; yx0:=y(0)=0,z(0)=1; dsolve(\{sys,yx0\},fns);" }}{PARA 11 "
" 1 "" {XPPMATH 20 "6#>%$sysG6$/-%%diffG6$-%\"yG6#%\"xGF-,(*&\"\"#\"\"
\"-%\"zGF,F1F1F*!\"\"F-F4/-F(6$F2F-F*" }}{PARA 11 "" 1 "" {XPPMATH 20 
"6#>%$fnsG<$-%\"yG6#%\"xG-%\"zGF(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>
%$yx0G6$/-%\"yG6#\"\"!F*/-%\"zGF)\"\"\"" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#<$/-%\"zG6#%\"xG,**&#\"\"&\"#7\"\"\"-%$expG6#,$*&\"\"#F.F(F.!\"
\"F.F.*&#F.\"\"$F.-F0F'F.F.#F.\"\"%F.*&F4F5F(F.F./-%\"yGF',(*&#F,\"\"'
F.F/F.F5*&F7F.F9F.F.#F.F4F." }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 39 "
\315\340\365\356\344\350\354 \360\345\370\345\355\350\345, \357\360
\345\344\361\362\340\342\353\377\345\354\356\345 \360\377\344\356\354:
 " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "Order:=6: dsolve(\{sys
,yx0\},fns,series);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#<$/-%\"zG6#%\"x
G+/F(\"\"\"\"\"!F*\"\"##!\"\"F,\"\"$#\"\"(\"#C\"\"%#!#8\"$?\"\"\"&-%\"
OG6#F*\"\"'/-%\"yGF'+/F(F,F*#!\"$F,F,#F1F;F/#F5F2F3#\"\"*\"#SF7F8F;" }
}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 48 "\310\361\357\356\353\374\347\363
\345\354 \356\357\345\360\340\362\356\360\355\373\351 \354\345\362\356
\344 \355\340\365\356\346\344\345\355\350\377 \360\345\370\345\355\350
\377:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 47 "sol := dsolve(\{sy
s, yx0\}, fns, method=laplace);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$
solG<$/-%\"zG6#%\"xG,**&#\"\"&\"#7\"\"\"-%$expG6#,$*&\"\"#F0F*F0!\"\"F
0F0*&#F0\"\"$F0-F2F)F0F0#F0\"\"%F0*&F6F7F*F0F0/-%\"yGF),(*&#F.\"\"'F0F
1F0F7*&F9F0F;F0F0#F0F6F0" }}}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 96 "----
--------   \312 \360\345\370\345\355\350\376 \347\340\344\340\367 \354
\345\362\356\344\356\354 \335\351\353\345\360\340 --------------------
------------------------------" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 21 "restart; with(plots):" }}{PARA 7 "" 1 "" {TEXT -1 50 "Warning,
 the name changecoords has been redefined\n" }}}{EXCHG {PARA 0 "" 0 "
" {TEXT -1 57 "\327\350\361\353\345\355\355\356\345 \360\345\370\345
\355\350\345 \304\323 1-\343\356 \357\356\360\377\344\352\340, \350
\354\345\376\371\345\343\356 \357\360\340\342\363\376 \367\340\361\362
\374 " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "f:=t->cos(y(t));" 
}}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fGf*6#%\"tG6\"6$%)operatorG%&arr
owGF(-%$cosG6#-%\"yG6#9$F(F(F(" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 59 
"\322\345\357\345\360\374 \347\340\357\350\370\345\354 \355\340\367
\340\353\374\355\373\345 \363\361\353\356\342\350\377 \342 \362\356
\367\352\345 t0 \357\356\344 \350\354\345\355\345\354 yt0:" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "yt0:=y(0)=0;" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%$yt0G/-%\"yG6#\"\"!F)" }}}{EXCHG {PARA 0 "" 0 "" 
{TEXT -1 19 "\307\340\357\350\370\345\354 \360\345\370\340\345\354\356
\345 \304\323" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "de:=diff(y
(t),t$1)=f(t);" }{TEXT -1 1 " " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#d
eG/-%%diffG6$-%\"yG6#%\"tGF,-%$cosG6#F)" }}}{EXCHG {PARA 0 "" 0 "" 
{TEXT -1 56 "\321\356\361\362\340\342\350\354 \347\340\344\340\355\350
\345 \355\340 \360\345\370\345\355\350\345 \344\350\364\364\345\360
\345\355\366\350\340\353\374\355\356\343\356 \363\360\340\342\355\345
\355\350\377." }}{PARA 0 "" 0 "" {TEXT 273 1 "1" }{TEXT -1 24 ". \300
\355\340\353\350\362\350\367\345\361\352\356\345 \360\345\370\345\355
\350\345:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "resh:=dsolve(
\{de,yt0\},y(t)); rhs(resh);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%res
hG/-%\"yG6#%\"tG-%'arctanG6$*&,&*$)-%$expGF(\"\"#\"\"\"F4F4!\"\"F4,&F/
F4F4F4F5,$*(F3F4F1F4F6F5F4" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'arcta
nG6$*&,&*$)-%$expG6#%\"tG\"\"#\"\"\"F/F/!\"\"F/,&F(F/F/F/F0,$*(F.F/F*F
/F1F0F/" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 79 "\312\340\352\356\345 \+
\346\345 \360\345\370\345\355\350\345 \342\347\377\362\374 \350\347 \+
\362\356\343\356, \367\362\356 \361\362\356\350\362 \342 \361\352\356
\341\352\340\365? \317\360\345\344\357\356\353\356\346\350\354 \375
\362\350\354 \360\345\370\345\355\350\345\354 " }}{PARA 0 "" 0 "" 
{TEXT -1 14 "\377\342\353\377\345\362\361\377 Y(t):" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 46 "Y:=t->arctan((exp(t)^2-1)/(exp(t)^2+1)); \+
Y(0);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"YGf*6#%\"tG6\"6$%)operato
rG%&arrowGF(-%'arctanG6#*&,&*$)-%$expG6#9$\"\"#\"\"\"F8F8!\"\"F8,&F1F8
F8F8F9F(F(F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"!" }}}{EXCHG 
{PARA 0 "" 0 "" {TEXT -1 54 "\315\356 \362\356\343\344\340 \375\362
\356 \360\345\370\345\355\350\345 \344\356\353\346\355\356 \363\344
\356\342\353\345\362\342\356\360\377\362\374 \350\361\365\356\344\355
\356\354\363 \304\323" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "si
mplify(subs(y(t)=Y(t),de)); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/,$*(
\"\"#\"\"\"-%$expG6#,$*&F&F'%\"tGF'F'F',&-F)6#,$*&\"\"%F'F-F'F'F'F'F'!
\"\"F',$*&#F'F&F'*&F&F7*&F.F',&F(F'F'F'!\"##F4F&F'F'" }}}{EXCHG {PARA 
0 "" 0 "" {TEXT -1 77 "\322\356\346\344\345\361\362\342\340 \355\345 \+
\357\356\353\363\367\350\353\356\361\374! \315\340\365\356\344\350\354
 \342 Mathematica \344\360\363\343\356\345 \362\356\367\355\356\345 \+
\360\345\370\345\355\350\345, \352\356\362\356\360\356\345" }}{PARA 0 
"" 0 "" {TEXT -1 26 "\344\356\353\346\355\356 \363\344\356\342\353\345
\362\342\356\360\377\362\374 de.  " }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 44 "simplify(subs(y(t)=2*arctan(tanh(t/2)),de));" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#/-%%diffG6$,$*&\"\"#\"\"\"-%'arctanG6#
-%%tanhG6#,$*&F)!\"\"%\"tGF*F*F*F*F4-%$cosG6#,$*&F)F*-F,6#*&,&-%%coshG
6#F4F*F*F3F*-%%sinhGF@F3F*F*" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 59 "
\316\344\355\340\352\356 \350 \347\344\345\361\374 Maple \355\345 \354
\356\346\345\362 \363\357\360\356\361\362\350\362\374 \345\343\356 \+
\344\356 \362\356\346\344\345\361\362\342\340!? " }}{PARA 0 "" 0 "" 
{TEXT -1 52 "\316\361\362\340\345\362\361\377 \342\356\357\360\356\361
 - \352\340\352 \350\362\345\360\357\360\345\362\350\360\356\342\340
\362\374 \360\345\370\345\355\350\345 resh? " }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 34 "simplify(arctan(tanh(z))); k:=1.1:" }}{PARA 11 "
" 1 "" {XPPMATH 20 "6#-%'arctanG6#-%%tanhG6#%\"zG" }}}{EXCHG {PARA 0 "
" 0 "" {TEXT -1 72 "\304\340\344\350\354 \343\360\340\364\350\367\345
\361\352\363\376 \350\353\353\376\361\362\360\340\366\350\376 \357\360
\345\344\357\356\353\340\343\340\345\354\373\365 \360\345\370\345\355
\350\351, \357\345\360\342\356\345 \350\347 \352\356\362\356\360\373
\365 " }}{PARA 0 "" 0 "" {TEXT -1 57 "\357\356\353\363\367\345\355\356
 \342 Mathematica \350 \344\345\351\361\362\342\350\362\345\353\374
\355\356 \377\342\353\377\345\362\361\377 \360\345\370\345\355\350\345
\354:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 110 "plot([2*arctan(ta
nh(t/2)),arctan(tanh(t)),k*arctan((exp(t)^2-1)/(exp(t)^2+1))],t=0..2,c
olor=[red,black,blue]);" }}{PARA 13 "" 1 "" {GLPLOT2D 560 291 291 
{PLOTDATA 2 "6'-%'CURVESG6$7S7$$\"\"!F)F(7$$\"39LLLL3VfV!#>$\"3e*zmcm]
!eVF-7$$\"3'pmm;H[D:)F-$\"3Y#>6ITKN9)F-7$$\"3LLLLe0$=C\"!#=$\"3*okD#35
lQ7F87$$\"3ILLL3RBr;F8$\"3Yzy2O\"3Nm\"F87$$\"3Ymm;zjf)4#F8$\"3#)e]Cr(f
L3#F87$$\"3=LL$e4;[\\#F8$\"3O*)Hq\\;LpCF87$$\"3p****\\i'y]!HF8$\"3AA![
,&z0lGF87$$\"3,LL$ezs$HLF8$\"3-9jD_c^pKF87$$\"3_****\\7iI_PF8$\"3/K\"[
gOJsm$F87$$\"3#pmmm@Xt=%F8$\"3Cj1\"f,$3qSF87$$\"3QLLL3y_qXF8$\"3eO6.Ql
B>WF87$$\"3i******\\1!>+&F8$\"3967i\\i\\0[F87$$\"3()******\\Z/NaF8$\"3
skjo#4rc=&F87$$\"3'*******\\$fC&eF8$\"3,-gXxkSWbF87$$\"3ELL$ez6:B'F8$
\"3))z:f+jUjeF87$$\"3Smmm;=C#o'F8$\"3$4R&oAB9MiF87$$\"3-mmmm#pS1(F8$\"
3xKO%QBm1a'F87$$\"3]****\\i`A3vF8$\"37<R]M]O))oF87$$\"3slmmm(y8!zF8$\"
3+:sQLy1)=(F87$$\"3V++]i.tK$)F8$\"3_L:2'\\x!3vF87$$\"39++](3zMu)F8$\"3
eHl8(=zT!yF87$$\"3#pmm;H_?<*F8$\"3l$)pM:09/\")F87$$\"3emm;zihl&*F8$\"3
;fh)o:@:P)F87$$\"39LLL3#G,***F8$\"3#)zEbq\\H^')F87$$\"3<LLezw5V5!#<$\"
3\"\\2gG5&[K*)F87$$\"3!****\\PQ#\\\"3\"Fas$\"3-sV'p%z_p\"*F87$$\"3BLL$
e\"*[H7\"Fas$\"3@SXb2Yb<%*F87$$\"3#*******pvxl6Fas$\"3e%)ev*R1_m*F87$$
\"3z****\\_qn27Fas$\"3%QBVZA'=**)*F87$$\"3%)***\\i&p@[7Fas$\"3Z@fG.2z6
5Fas7$$\"3#)****\\2'HKH\"Fas$\"3hOD#G&4@N5Fas7$$\"3_mmmwanL8Fas$\"3-_`
yFg\\b5Fas7$$\"3'******\\2goP\"Fas$\"3O@t8@3Qw5Fas7$$\"3CLLeR<*fT\"Fas
$\"3#Q:GbGKY4\"Fas7$$\"3'******\\)Hxe9Fas$\"3B,-WWF(Q6\"Fas7$$\"3Ymm\"
H!o-*\\\"Fas$\"3&)y[xgWJJ6Fas7$$\"3))***\\7k.6a\"Fas$\"3O(\\)yW%z)[6Fa
s7$$\"3emmmT9C#e\"Fas$\"3?M5v=GTl6Fas7$$\"3\"****\\i!*3`i\"Fas$\"35$)p
*=!\\1#=\"Fas7$$\"3QLLL$*zym;Fas$\"3'z\"G0sv[(>\"Fas7$$\"3GLL$3N1#4<Fa
s$\"3*\\3SQObE@\"Fas7$$\"3kmm\"HYt7v\"Fas$\"3!QyVa49rA\"Fas7$$\"3%****
***p(G**y\"Fas$\"3[z3J<Z!*R7Fas7$$\"3lmm;9@BM=Fas$\"31**)*HA/+a7Fas7$$
\"3ELLL`v&Q(=Fas$\"3m!3Ae'[6m7Fas7$$\"30++DOl5;>Fas$\"3y2V7yn`y7Fas7$$
\"3/++v.Uac>Fas$\"3W1Fx,Y'**G\"Fas7$$\"\"#F)$\"3/:g/O.w,8Fas-%'COLOURG
6&%$RGBG$\"*++++\"!\")F(F(-F$6$7SF'7$F+$\"3gyeg8!=RN%F-7$F1$\"3fjO9AJm
;\")F-7$F6$\"3WA`4$yc#H7F87$F<$\"3M#*Q&>=d4k\"F87$FA$\"3eD6Pq@cR?F87$F
F$\"3gQ]u5rI(R#F87$FK$\"3etEU_2?aFF87$FP$\"3Z#p9![k_2JF87$FU$\"3MWmN)y
(yUMF87$FZ$\"3?F;X\"4c$pPF87$Fin$\"3i7!o7$oPTSF87$F^o$\"3jMKEi*y+L%F87
$Fco$\"3B/nW#H/:g%F87$Fho$\"3Kx&e'o(pf%[F87$F]p$\"3-ydjCC(Q0&F87$Fbp$
\"3k7qcSUI%G&F87$Fgp$\"3G6%\\R%y'eY&F87$F\\q$\"3G+&))HpN@m&F87$Faq$\"3
&\\lgn`%=BeF87$Ffq$\"3E5^+qm*p)fF87$F[r$\"3UMb!\\VA78'F87$F`r$\"3WZh'*
z)z-F'F87$Fer$\"3=sw9#3!Q)Q'F87$Fjr$\"3roXTP_<1lF87$F_s$\"3$RC]FQT(=mF
87$Fes$\"3PY)p`y%>4nF87$Fjs$\"3kSLjr<e*z'F87$F_t$\"3'4\"H*)\\Zd&)oF87$
Fdt$\"3U8A!\\\"**)H'pF87$Fit$\"3EebR#4b?.(F87$F^u$\"33ebi:y`-rF87$Fcu$
\"3skAjB^tgrF87$Fhu$\"3!45WF#f$z@(F87$F]v$\"3?)3z5,-dE(F87$Fbv$\"3kK*4
wZXQJ(F87$Fgv$\"3MS(*R7TbbtF87$F\\w$\"35h6i]Ms&R(F87$Faw$\"3e!f>1us=V(
F87$Ffw$\"3Ybmu9GnmuF87$F[x$\"3k<!*zh$zu\\(F87$F`x$\"3qO9Z&zak_(F87$Fe
x$\"3[An1mp'Gb(F87$Fjx$\"3A,q>PrDvvF87$F_y$\"3M]Q![s!)))f(F87$Fdy$\"3C
3V(p%)4$=wF87$Fiy$\"3UGT3n#*RPwF87$F^z$\"3Gzt7w6AawF87$Fcz$\"3%emt;sX3
n(F8-Fhz6&FjzF)F)F)-F$6$7SF'7$F+$\"3aok'\\\")4$*y%F-7$F1$\"3N;!eVVH$G*
)F-7$F6$\"3Eb[ShC=_8F87$F<$\"3m#G\\,!H00=F87$FA$\"3hP#3uQ=NC#F87$FF$\"
3rT&>=#y.PEF87$FK$\"37T\\mF3iHIF87$FP$\"3\\gh\"G4z#=MF87$FU$\"3s3B>nl1
(y$F87$FZ$\"3K!z'f+<HYTF87$Fin$\"3#Q\"[R9X^XWF87$F^o$\"3ge&*[eo3jZF87$
Fco$\"3Ku8p@Zlh]F87$Fho$\"3KMW_XncI`F87$F]p$\"3gc$*4n'f#fbF87$Fbp$\"3N
9PikYt7eF87$Fgp$\"3T^VMGYX7gF87$F\\q$\"3`^tGi#\\$GiF87$Faq$\"36@nV!*H]
0kF87$Ffq$\"33Ac+Pjp&e'F87$F[r$\"34)3'RyYMWnF87$F`r$\"3=kF'z'yI(*oF87$
Fer$\"3]TCO!4=s-(F87$Fjr$\"3qEg:hFzcrF87$F_s$\"3yo_-@bh!G(F87$Fes$\"3y
Jo!RE9,Q(F87$Fjs$\"3;vmz[*R&zuF87$F_t$\"3%H?#)[AKTd(F87$Fdt$\"35MCR1*)
GfwF87$Fit$\"3U9^j,1ENxF87$F^u$\"3c9\")=(f\"z7yF87$Fcu$\"3U\"\\&*fj3o(
yF87$Fhu$\"357&=]^H(RzF87$F]v$\"37(*p=7AF#*zF87$Fbv$\"3OE4PD+BX!)F87$F
gv$\"3e9(RO_464)F87$F\\w$\"3KyKo&z&HN\")F87$Faw$\"3'*\\:o9+1v\")F87$Ff
w$\"3*)>8A'4SL@)F87$F[x$\"3i>*yzHFsC)F87$F`x$\"3g\"e=]F+\"z#)F87$Fex$
\"3R&RtEm`\"3$)F87$Fjx$\"3M-n\"4&GyK$)F87$F_y$\"3;OUG(zo(e$)F87$Fdy$\"
3iR<nJ39!Q)F87$Fiy$\"3qTDz$>R6S)F87$F^z$\"3x<,u$HV'>%)F87$Fcz$\"3xK5%Q
HIzV)F8-Fhz6&FjzF(F(F[[l-%+AXESLABELSG6$Q\"t6\"Q!F\\^m-%%VIEWG6$;F(Fcz
%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "C
urve 1" "Curve 2" "Curve 3" }}}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 72 "
\310\347 \343\360\340\364\350\352\340 \342\350\344\355\356, \367\362
\356 \357\345\360\342\356\345 \350 \344\342\340 \357\356\361\353\345
\344\363\376\371\350\365 \360\345\370\345\355\350\377 \361\350\353\374
\355\356 \360\340\347\355\377\362\374\361\377!" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "
" }}}}{MARK "0 1 0" 21 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }
{PAGENUMBERS 1 0 2 33 1 1 }