{VERSION 2 3 "IBM INTEL NT" "2.3" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 0 0 0 0 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 
0 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 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 "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 "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 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "y := (1 - tanh(x))*S
i(x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"yG*&,&\"\"\"F'-%%tanhG6#%
\"xG!\"\"F'-%#SiGF*F'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "pl
ot(y, x=0..10);" }}{PARA 13 "" 1 "" {INLPLOT "6%-%'CURVESG6$7co7$\"\"!
F(7$$\"+qUkCF!#6$\"+jkJ]EF,7$$\"+S&)G\\aF,$\"+.Zy^^F,7$$\"+5G$R<)F,$\"
+S!*\\/vF,7$$\"+3x&)*3\"!#5$\"+T!f!4(*F,7$$\"+N@Ki8F<$\"+welw6F<7$$\"+
ilyM;F<$\"+yr&yO\"F<7$$\"+*)4D2>F<$\"+LKrW:F<7$$\"+;arz@F<$\"+(Gruq\"F
<7$$\"+*4bQl#F<$\"+aq'z&>F<7$$\"+\"y%*z7$F<$\"+1GXo@F<7$$\"+kW8-OF<$\"
+]&=5M#F<7$$\"+XTFwSF<$\"+a.+yCF<7$$\"+3Q\\4YF<$\"+0ro#f#F<7$$\"+pMrU^
F<$\"+;DNpEF<7$$\"+,LK4aF<$\"+dNk%p#F<7$$\"+JJ$fn&F<$\"+RZ*=r#F<7$$\"+
iHaUfF<$\"+Jff@FF<7$$\"+\"z_\"4iF<$\"+uJBCFF<7$$\"+m6m#G(F<$\"+Qy)Hn#F
<7$$\"+S&phN)F<$\"+VPTWDF<7$$\"+:ddC%*F<$\"+4&*RlBF<7$$\"+*=)H\\5!\"*$
\"+lDpc@F<7$$\"+>JN[6Far$\"+dbE^>F<7$$\"+[!3uC\"Far$\"+XhpW<F<7$$\"+!p
t*\\8Far$\"+jaIP:F<7$$\"+J$RDX\"Far$\"+v*z=M\"F<7$$\"+lGhe:Far$\"+2c'e
:\"F<7$$\"+)R'ok;Far$\"+)p+.))*F,7$$\"+_(>/x\"Far$\"+d,C$R)F,7$$\"+1J:
w=Far$\"+KFe(3(F,7$$\"+dG\"\\)>Far$\"+q]4BfF,7$$\"+3En$4#Far$\"+H+*[#
\\F,7$$\"+/RE&G#Far$\"+(z/%>NF,7$$\"+D.&4]#Far$\"+Yu[wBF,7$$\"+vB_<FFa
r$\"+#RH8e\"F,7$$\"+v'Hi#HFar$\"+&[%fc5F,7$$\"+(*ev:JFar$\"+#4o)os!#77
$$\"+347TLFar$\"+lK&)>YF_w7$$\"+LY.KNFar$\"+BbLFJF_w7$$\"+\"o7Tv$Far$
\"+W*oV(>F_w7$$\"+$Q*o]RFar$\"+$Q/#38F_w7$$\"+\"=lj;%Far$\"+JxB(H)!#87
$$\"+V&R<P%Far$\"+knXk`Fix7$$\"+Xh-'e%Far$\"+5iF)R$Fix7$$\"+R\"3Gy%Far
$\"+X,%RB#Fix7$$\"+.T1&*\\Far$\"+!z,@U\"Fix7$$\"+(RQb@&Far$\"+l>H:*)!#
97$$\"+=>Y2aFar$\"+>9l`fFcz7$$\"+yXu9cFar$\"+-xcjQFcz7$$\"+\\y))GeFar$
\"+IY;$[#Fcz7$$\"+i_QQgFar$\"+@MW>;Fcz7$$\"+!y%3TiFar$\"+5e6w5Fcz7$$\"
+O![hY'Far$\"+>2jso!#:7$$\"+#Qx$omFar$\"+2K69YFb\\l7$$\"+u.I%)oFar$\"+
3dgFIFb\\l7$$\"+(pe*zqFar$\"+h%[E2#Fb\\l7$$\"+C\\'QH(Far$\"+]y!GP\"Fb
\\l7$$\"+8S8&\\(Far$\"+4HBH$*!#;7$$\"+0#=bq(Far$\"+(fJLB'F\\^l7$$\"+2s
?6zFar$\"+Etd,UF\\^l7$$\"+IXaE\")Far$\"+6q!px#F\\^l7$$\"+l*RRL)Far$\"+
%e>8'=F\\^l7$$\"+`<.Y&)Far$\"+\">WNB\"F\\^l7$$\"+8tOc()Far$\"+Um&z=)!#
<7$$\"+\\Qk\\*)Far$\"+9<'Hg&F[`l7$$\"+p0;r\"*Far$\"+(3?+h$F[`l7$$\"+lx
Gp$*Far$\"+\\G\"\\W#F[`l7$$\"+!oK0e*Far$\"+&z;)*e\"F[`l7$$\"+<5s#y*Far
$\"+i$\\w1\"F[`l7$$\"#5F($\"+N^A*z'!#=-%'COLOURG6&%$RGBG$Fgal!\"\"F(F(
-%+AXESLABELSG6$%\"xG%!G-%%VIEWG6$;F(Ffal%(DEFAULTG" 2 944 944 944 2 
0 1 0 2 9 0 4 2 1.000000 45.000000 45.000000 10030 10061 10056 10074 
0 0 0 20030 0 12020 0 0 0 0 0 0 0 1 1 0 0 0 186 925 0 0 0 0 0 0 }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 "Digits := 95; z := int( y, x
=0..infinity );" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%'DigitsG\"#&*" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"zG-%$intG6$*&,&\"\"\"F*-%%tanhG6#%
\"xG!\"\"F*-%#SiGF-F*/F.;\"\"!%)infinityG" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 9 "evalf(\");" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"jpL
D!4v<pzwC.eds&Gj.()eY?d=&=$pn&*=Wepgg*>gc1vwC%[\"z,qP!#&*" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "simplify(z);" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#-%$intG6$,$*&,&!\"\"\"\"\"-%%tanhG6#%\"xGF*F*-%#SiGF-F*
F)/F.;\"\"!%)infinityG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" 
}}}}{MARK "5 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 }