{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 "" 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 "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 Plo
t" 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 173 "# Example 1, page 7
1 of Asmar, analysis in maple.\n# my''+cy'+ky=F(t) with F a sawtooth w
ave.\n# Assume here that we know F as a Fourier cosine series\n# and m
=2, c=0.05, k=50." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 46 "F:=una
pply(10*cos((2*n+1)*t)/(2*n+1)^2,(n,t));" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#>%\"FGf*6$%\"nG%\"tG6\"6$%)operatorG%&arrowGF),$*(\"#5\"\"\"-%$c
osG6#*&,&*&\"\"#F09$F0F0F0F0F09%F0F0F5!\"#F0F)F)F)" }}}{EXCHG {PARA 0 
"> " 0 "" {MPLTEXT 1 0 41 "FS:=unapply(sum(F(n,t),n=0..infinity),t);" 
}}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#FSGf*6#%\"tG6\"6$%)operatorG%&arr
owGF(,$*&#\"\"&\"\"#\"\"\"*(,**(-%$expG6#*&9$F1^#F1F1F1-%(polylogG6$F0
*$-F66#*&^#F0F1F9F1#F1F0F1-F66#*&^#!\"#F1F9F1FCF1*(F5F1-F<6$F0,$F>!\"
\"F1FDFCFM*(-F66#*&^#FMF1F9F1F1-F<6$F0*$FDFCF1F?FCF1*(FOF1-F<6$F0,$FUF
MF1F?FCFMF1F?#FMF0FDFZF1F1F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 96 "FS(0); # FS is a sawtooth wave of height FS(0) and pe
riod 2*Pi\nplot(FS(t),t=0..4*Pi,axes=boxed);" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#,$*(\"\"&\"\"\"\"\"%!\"\"%#PiG\"\"#F&" }}{PARA 13 "" 1 
"" {GLPLOT2D 234 160 160 {PLOTDATA 2 "6&-%'CURVESG6$7Y7$$\"\"!F)$\"+]0
qL7!\")7$$\"+r66RF!#5$\"+i7d=5F,7$$\"+arRA^F0$\"+&=%)QJ)!\"*7$$\"+.:l-
yF0$\"+St\")3iF87$$\"+Ks1]5F8$\"+Xnz*3%F87$$\"+\"*pe=8F8$\"+\"\\Z3)>F8
7$$\"+\"=Rvc\"F8$\"++j:eD!#67$$\"+`ZJD=F8$!+XI)*)*>F87$$\"+>m!>4#F8$!+
l1z#4%F87$$\"+ANkdBF8$!+?M))zhF87$$\"+*e')4j#F8$!+][rE$)F87$$\"+7turGF
8$!+9Xw@5F,7$$\"+'3ns+$F8$!+'\\,#G6F,7$$\"+hoyUJF8$!+AEwK7F,7$$\"+$4j)
yKF8$!+*f))e7\"F,7$$\"+D$R\\T$F8$!+wX,>5F,7$$\"+`'3sn$F8$!+!G(GI\")F87
$$\"+GVP:RF8$!+Q%Q(fiF87$$\"+_jd)>%F8$!+[\\ZNSF87$$\"+9c[QWF8$!+5?B^@F
87$$\"+>rb<ZF8$\"+]l/fSFM7$$\"+)o#ek\\F8$\"+[Zs!)>F87$$\"+)))3cB&F8$\"
+X&f$4TF87$$\"+B**o$\\&F8$\"+bKKOhF87$$\"+4/(Hw&F8$\"+XsC^#)F87$$\"+aR
D5gF8$\"+n2M>5F,7$$\"+5$=O9'F8$\"+()[3C6F,7$$\"+mE)pF'F8$\"+1!H)G7F,7$
$\"+]2^:kF8$\"+!Rs(H6F,7$$\"+M)QSb'F8$\"+)os4-\"F,7$$\"+Uq@&z'F8$\"+lw
^:$)F87$$\"+:hpbqF8$\"+-)>(piF87$$\"+&['zCtF8$\"+S/@cTF87$$\"+)pe!)e(F
8$\"+eQb)3#F87$$\"+D%yF%yF8$\"+](z*)z)FM7$$\"+`7gD\")F8$!+'\\&HL@F87$$
\"+W,tz$)F8$!+S\">#HTF87$$\"+xp1^')F8$!+XOHgiF87$$\"+w%Qp*))F8$!+!)QO
\">)F87$$\"+o4ul\"*F8$!+sLDI5F,7$$\"+l??#H*F8$!+&ov&H6F,7$$\"+lJm=%*F8
$!+,!)*)G7F,7$$\"+]9&3b*F8$!+jEoM6F,7$$\"+P(RIo*F8$!+EA'3.\"F,7$$\"+gh
^T**F8$!+vJby#)F87$$\"+-<@@5F,$!+#**eK:'F87$$\"+\"yts/\"F,$!+!4[j5%F87
$$\"+@g#R2\"F,$!+eg38?F87$$\"+nvN+6F,$\"++6F%G'FM7$$\"+8akC6F,$\"+ucSq
>F87$$\"+D?[_6F,$\"+o!)ocTF87$$\"+A%zt<\"F,$\"+b]77hF87$$\"+T_#R?\"F,$
\"+0)Gq>)F87$$\"+xHLH7F,$\"+sZD>5F,7$$\"+fqjc7F,$\"+J0qL7F,-%'COLOURG6
&%$RGBG$\"*++++\"F,F(F(-%+AXESLABELSG6$%\"tGQ!6\"-%*AXESSTYLEG6#%$BOXG
-%%VIEWG6$;F($\"+iqjc7F,%(DEFAULTG" 1 2 0 1 10 0 2 9 1 2 2 1.000000 
45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 54 "de:=2*diff(y(t),t,t)+0.05*diff(y(t),t)+50*y(t)=F(n,t)
;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#deG/,(*&\"\"#\"\"\"-%%diffG6$-
%\"yG6#%\"tG-%\"$G6$F0F(F)F)*&$\"\"&!\"#F)-F+6$F-F0F)F)*&\"#]F)F-F)F),
$*(\"#5F)-%$cosG6#*&,&*&F(F)%\"nGF)F)F)F)F)F0F)F)FCF7F)" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "dsolve(de,y(t));" }}{PARA 12 "" 1 "
" {XPPMATH 20 "6#/-%\"yG6#%\"tG,(*(-%$expG6#,$*&\"#!)!\"\"F'\"\"\"F0F1
-%$sinG6#,$*(F/F0\"'***f\"#F1\"\"#F'F1F1F1%$_C2GF1F1*(F*F1-%$cosGF4F1%
$_C1GF1F1*&#F1\"'+C5F1*(,&**\"&+?$F1,&%\"nGF1\"\"$F1F1,&FGF1F9F0F1-F=6
#*&,&*&F9F1FGF1F1F1F1F1F'F1F1F0*&,&*&\"$+%F1FGF1F1\"$+#F1F1-F3FKF1F1F1
,,*$)FG\"\"%F1F1*&F9F1)FGFHF1F1*&#\"&*Rq\"%+kF1*$)FGF9F1F1F0*&#\"&*zwF
hnF1FGF1F0#\"',;#*\"&+c#F1F0,&FGF1F8F1!\"#F1F1" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 20 "subs(_C1=0,_C2=0,%);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#/-%\"yG6#%\"tG,$*&#\"\"\"\"'+C5F+*(,&**\"&+?$F+,&%\"nGF
+\"\"$F+F+,&F2F+\"\"#!\"\"F+-%$cosG6#*&,&*&F5F+F2F+F+F+F+F+F'F+F+F6*&,
&*&\"$+%F+F2F+F+\"$+#F+F+-%$sinGF9F+F+F+,,*$)F2\"\"%F+F+*&F5F+)F2F3F+F
+*&#\"&*Rq\"%+kF+*$)F2F5F+F+F6*&#\"&*zwFMF+F2F+F6#\"',;#*\"&+c#F+F6,&F
2F+#F+F5F+!\"#F+F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "Y:=un
apply(rhs(%),(n,t));" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%\"YGf*6$%\"n
G%\"tG6\"6$%)operatorG%&arrowGF),$*&#\"\"\"\"'+C5F0*(,&**\"&+?$F0,&9$F
0\"\"$F0F0,&F7F0\"\"#!\"\"F0-%$cosG6#*&,&*&F:F0F7F0F0F0F0F09%F0F0F;*&,
&*&\"$+%F0F7F0F0\"$+#F0F0-%$sinGF>F0F0F0,,*$)F7\"\"%F0F0*&F:F0)F7F8F0F
0*&#\"&*Rq\"%+kF0*$)F7F:F0F0F;*&#\"&*zwFSF0F7F0F;#\"',;#*\"&+c#F0F;,&F
7F0#F0F:F0!\"#F0F0F)F)F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 42 
"Z:=unapply(evalf(sum(Y(n,t),n=0..5),2),t);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%\"ZGf*6#%\"tG6\"6$%)operatorG%&arrowGF(,8*&$\"#@!\"#
\"\"\"-%$cosG6#9$F1F1*&$\"#A!\"&F1-%$sinGF4F1F1*&$\"#N!\"$F1-F36#,$*&$
\"\"$\"\"!F1F5F1F1F1F1*&$\"#;F9F1-F;FAF1F1*&$FI!\"\"F1-F;6#,$*&$\"\"&F
FF1F5F1F1F1F1*&$\"#V!\"%F1-F36#,$*&$\"\"(FFF1F5F1F1F1FM*&$\"#J!\"'F1-F
;FYF1F1*&$\"#6FWF1-F36#,$*&$\"\"*FFF1F5F1F1F1FM*&$\"#W!\"(F1-F;FaoF1F1
*&$FVF9F1-F36#,$*&$F_oFFF1F5F1F1F1FM*&$\"#7FioF1-F;F^pF1F1F(F(F(" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 269 "# Dominant term is 1.6 sin(
5t), from Y(2,t)\n# Thisis the term of the series solution whose frequ
ency\n# most closely matches the natural frequency of the homogeneous
\n# DE 2y''+0.05y'+50y=0, i.e., the practical resonance value\n# sqrt(
k/m - c^2/(2 m^2)) for my''+cy'+ky=0." }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 57 "naturalFrequency := evalf(sqrt(50/2 - (0.05)^2/(2*2^2
)));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%1naturalFrequencyG$\"+](o***
\\!\"*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 46 "opts:=axes=boxed,
color=[blue,red],thickness=2;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%op
tsG6%/%%axesG%&boxedG/%&colorG7$%%blueG%$redG/%*thicknessG\"\"#" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 41 "plot(\{Z(t),1.6*sin(5*t)\},t
=0..2*Pi,opts);" }}{PARA 13 "" 1 "" {GLPLOT2D 278 164 164 {PLOTDATA 2 
"6(-%'CURVESG6$7iw7$$\"\"!F)F(7$$\"3eET6j*))QU$!#>$\"3_c!>\"G8vDF!#=7$
$\"3;`#Gi#zxZoF-$\"3M9T00D\"=P&F07$$\"3\"zBM*)omr-\"F0$\"3aMmP.K#3'yF0
7$$\"3i]cC&eb&p8F0$\"3`so$GY,?,\"!#<7$$\"3_IF=LjYn;F0$\"3'3!Q)[.8Z=\"F
@7$$\"3q5)>63x`'>F0$\"3$Qr/=6(=J8F@7$$\"3e!*o0HyGjAF0$\"3iec![xz\"[9F@
7$$\"3YqR*pd)>hDF0$\"3C\"*\\R@+5L:F@7$$\"3\\LyxtWrGFF0$\"3)p()))4BFgc
\"F@7$$\"3'fph0PIi*GF0$\"3+7`$Rcuze\"F@7$$\"3WebMniujIF0$\"3=Q+/T\")y)
f\"F@7$$\"3Y@%HT;i7B$F0$\"3-%[R^9#R)f\"F@7$$\"3'p9(pdRHmNF0$\"3'Q>PU6h
Sc\"F@7$$\"3Zs[E^dK,RF0$\"35q'>LgUf[\"F@7$$\"3CVu.`$y&QUF0$\"3OF<t9\")
Hl8F@7$$\"3+9+\"[&4$ed%F0$\"3U+ya6N#f?\"F@7$$\"3y%e#ecN38\\F0$\"3)>X'>
b)RB,\"F@7$$\"3ab^NehL]_F0$\"3o*p7$HjQ+zF07$$\"3]9<Qde)fe&F0$\"3k\"H))
QY8`Y&F07$$\"3Ls#3kbN;#fF0$\"3A0h!Q,qm(GF07$$\"3;I[Vb_GdiF0$\"3EvcXEi%
>2#F-7$$\"35*QhW&\\$Hf'F0$!3GXFLeF5oCF07$$\"3J-7h\">DT!pF0$!3)>zK=J)4)
)[F07$$\"3]:5wGaJ:sF0$!3e\"HU(RB***=(F07$$\"3fF3\"fm0l_(F0$!3_BZh%po\"
=$*F07$$\"3zS11.fpPyF0$!3(H)z\"G%37A6F@7$$\"3#e!R^M[8#[)F0$!3()*=mrQ]b
U\"F@7$$\"3upr'fwtl7*F0$!3)G5[jxZAe\"F@7$$\"3?<d1CP))4#*F0$!3e/&4c(Hx!
f\"F@7$$\"3ylU;#o$>$H*F0$!3yNjYk$Qlf\"F@7$$\"3O9GESO]w$*F0$!35lQiSR`*f
\"F@7$$\"3#=Oh$)f8)f%*F0$!3o\\x42Xv*f\"F@7$$\"3H4*fkbBJa*F0$!3;8-B\"o*
>(f\"F@7$$\"3'yXeX^Lki*F0$!358RN&*Q(=f\"F@7$$\"3W1qlsMu4(*F0$!3[[B5*Q'
y$e\"F@7$$\"3!Rbb2V`Iz*F0$!3WV,Q$>^Hd\"F@7$$\"3gu\\JE$HE,\"F@$!3y5!=TB
!e-:F@7$$\"3!QRa&4L&f/\"F@$!3y'>#3m2f!R\"F@7$$\"31OpNA/<z5F@$!3b36(yuC
1C\"F@7$$\"3_y%f^`(Q76F@$!3oj&GfT:l0\"F@7$$\"3+@?'zk/c9\"F@$!3@crd]lHL
%)F07$$\"3YjXwg<#)y6F@$!3YmEQVcMpgF07$$\"38ST=W'*)H@\"F@$!3)Qla$*yTTY$
F07$$\"3!or.w_drC\"F@$!3o)Q!)*)*yy!e(F-7$$\"3W$HB5TD8G\"F@$\"3?_BN<e0q
>F07$$\"36qGW%H$\\:8F@$\"3&*fKrv=$3k%F07$$\"3w*zcZQ)eX8F@$\"3s>So$*4\"
Q)oF07$$\"3SH22vMov8F@$\"33$\\>5#[@r*)F07$$\"3GfYQl&ydS\"F@$\"3EI5)yw'
e&3\"F@7$$\"3$*)e)pbO(eV\"F@$\"3#H()G%4w^\\7F@7$$\"3/]+3VNj.:F@$\"3b*G
:)[yi5:F@7$$\"396:YIMRr:F@$\"3)G_\\$pG***f\"F@7$$\"3Z'z]kaJ%R;F@$\"3iu
y9f^q1:F@7$$\"3!=3SCmpuq\"F@$\"3*3KAc>A2C\"F@7$$\"3%z2'RGLDS<F@$\"3Is4
)**oK#f5F@7$$\"33u?N%*p.t<F@$\"3cjqk))4Y$\\)F07$$\"3?q!3.m?e!=F@$\"3)=
Ju$\\H*o;'F07$$\"3LmSEEVgQ=F@$\"3Y`:)***f*\\n$F07$$\"35QMoN]Po=F@$\"3B
M)QfiD\\K\"F07$$\"3')4G5Xd9)*=F@$!3mWQsguWa5F07$$\"3j\"=AXX;z#>F@$!3cX
'*3k)*\\5MF07$$\"3S`:%R;(od>F@$!37wg/gR7\"p&F07$$\"3M]e#pT(3$*>F@$!3#e
v%**e%>_B)F07$$\"3^Z,\"*pw[G?F@$!3QuCF(H)>_5F@7$$\"3oWW*G#z)Q1#F@$!3iU
\\EJe*zC\"F@7$$\"3#=uye<)G*4#F@$!3>0-r<jz/9F@7$$\"34q_hLoFH@F@$!3Z$z(f
x,W.:F@7$$\"3!zz^8\\l#f@F@$!3QM,N!\\X$o:F@7$$\"3!=1?-#)fU<#F@$!31BZ/O/
m(e\"F@7$$\"3;E$)3\\TD*=#F@$!3[zt[Ad0)f\"F@7$$\"3^!fczZ[U?#F@$!35v6wZH
Z*f\"F@7$$\"3Ua[#o!GC>AF@$!3%pBJ(\\T!>f\"F@7$$\"3W_![\\uETD#F@$!3pRA^*
[a)R:F@7$$\"3W]72$o5!*G#F@$!3AkAkmw2T9F@7$$\"3,[W>@Y*QK#F@$!3;A[l\"3r&
)H\"F@7$$\"3-YwJf&y(eBF@$!3,IWhA\"fm6\"F@7$$\"3w=DTbnl*Q#F@$!3MEdmfAjr
#*F07$$\"31\"R2:&\\`?CF@$!3-,ZG')z5crF07$$\"3OjAgZJT^CF@$!3%R_%Hr^Mq[F
07$$\"3oNrpV8H#[#F@$!3SVheH/soCF07$$\"3X@Su='ph^#F@$\"3:)))R,y:jJ#F-7$
$\"3C24z$*y/]DF@$\"3\"yK8i:``#HF07$$\"3Y$zP)oh#Re#F@$\"3h7c)*4oLNbF07$
$\"3EzY)QW/yh#F@$\"3Gop_L?(o)zF07$$\"3+yMCtX1]EF@$\"3pI!\\#H!y4,\"F@7$
$\"3=xAg-ZK#o#F@$\"3gX6+7B-(>\"F@7$$\"3Ow5'>$[e9FF@$\"377l9c+*>N\"F@7$
$\"35v)>8'\\%ou#F@$\"3)f9=41e=Z\"F@7$$\"3Exf*>-00y#F@$\"3Q+-o\"Gchb\"F
@7$$\"3Vz?n#3lT\"GF@$\"3oMB`K.['f\"F@7$$\"3uI,,8^*4$GF@$\"3;Ut.*GY(*f
\"F@7$$\"3g\"=[L9Dy%GF@$\"3[KS_G2p\"f\"F@7$$\"3YKiot^lkGF@$\"3!*43wg1P
s:F@7$$\"3w$GCS?&[\")GF@$\"3ijiA:G#>a\"F@7$$\"30%oesk&R7HF@$\"3;\\%pyV
'yd9F@7$$\"3*Q3$\\!41L%HF@$\"3BoGRm!)*)Q8F@7$$\"3=%[FP`;U(HF@$\"3uIwEm
=4)=\"F@7$$\"3Z%)='p(p70IF@$\"318;@))G'*35F@7$$\"3D>g%e1o%QIF@$\"3'zp;
&z-B*)yF07$$\"3g`,ta\"4=2$F@$\"3A6&ooo\"4qaF07$$\"3$zG9OC]^5$F@$\"3)fK
r$>rG**GF07$$\"3sA%)\\K8\\QJF@$\"3Iaw%RWd4[#F-7$$\"3#er1NNBJ<$F@$!3*4#
eUa)>?^#F07$$\"3#*3]^u`v2KF@$!3Sw^y2?+(>&F07$$\"3--L_&R(QUKF@$!3[lLUTS
aExF07$$\"3c&fJlT>qF$F@$!39L^*G%))\\-5F@7$$\"3&yQEEpmrI$F@$!3ge#Q=v(Qy
6F@7$$\"3e!=@(oRJPLF@$!34S88LEbF8F@7$$\"3'G(f\"[ChuO$F@$!3e9#[fl5mW\"F
@7$$\"39l2\"4_3wR$F@$!3zin&owhG`\"F@7$$\"3\\hx&HY))QT$F@$!3[\"4^/\"o2l
:F@7$$\"3%yv/]So,V$F@$!3Eie>;v#pe\"F@7$$\"3=a<0Z$[kW$F@$!3]%3WJ=p#)f\"
F@7$$\"3_]()4*GGFY$F@$!3qeU)QqE!*f\"F@7$$\"3?VF>t\")G&\\$F@$!3/ZY*[OR)
o:F@7$$\"3MOnGd![y_$F@$!3S](=%3Q;(\\\"F@7$$\"3?#yUNg&[hNF@$!3#4yo\"Rrc
\"Q\"F@7$$\"3iF))z\\J7&f$F@$!3/LdOg>)pA\"F@7$$\"31t[0'pg(GOF@$!3j-\")Q
U2xP5F@7$$\"3#*=4JU#)RiOF@$!3%3!40'>JF>)F07$$\"3GUz%)=gI&p$F@$!3IiyeSt
&4$eF07$$\"36m\\Q&z8#GPF@$!3\\<6g\\vn6LF07$$\"3[*)>#>d@6w$F@$!3d'4P&)e
E%HqF-7$$\"3%G,f%[$HSz$F@$\"3r.'fH8!yC>F07$$\"3%p#\\M9$pe#QF@$\"3,#*er
J6Z=WF07$$\"3eS3B!G4x&QF@$\"3#=`!)o79/!oF07$$\"3Aan6Y#\\&*)QF@$\"3+xfY
brO5!*F07$$\"3KoE+7#*Q@RF@$\"3'HNDq!QC*4\"F@7$$\"3o+Mbl?ucRF@$\"3?g];e
Yb'G\"F@7$$\"31LT5>\\4#*RF@$\"3FROf!*3xL9F@7$$\"3)\\'[lsxWFSF@$\"3_]_^
3YIO:F@7$$\"3y(f0ii+G1%F@$\"3iFu#pTg4f\"F@7$$\"3Y0T&=o$oySF@$\"3!y@L(*
o>%*f\"F@7$$\"378E]Pnc%4%F@$\"3m(*>`kqz(f\"F@7$$\"3!37^Jz\\/6%F@$\"3Sy
q\\pF5'e\"F@7$$\"3ZG'*z[GLETF@$\"3][aH>0Tk:F@7$$\"3#Qk'4g*)4eTF@$\"3%=
w@$f7k\"\\\"F@7$$\"3;fORr]')*=%F@$\"39yjK*=@8Q\"F@7$$\"3))=Rav@yBUF@$
\"3*=j_#=>BD7F@7$$\"3sxTpz#*pdUF@$\"3FP!o^E!*R.\"F@7$$\"3cOW%QQ;;H%F@$
\"3ot&=vFI38)F07$$\"3R&p%*z[LbK%F@$\"3m%Gz(37[)o&F07$$\"3i&pFaUniN%F@$
\"3(38]Jy2CL$F07$$\"3'epgGO,qQ%F@$\"39p4@FP'z(*)F-7$$\"35'p$H+`t<WF@$!
3a'fV#[U(zb\"F07$$\"3M'pExBp%[WF@$!3Oes[Em-xRF07$$\"3oPwB\\&p?[%F@$!3+
B]O4bY7lF07$$\"3,z&[2')pc^%F@$!3#[anH3DX'))F07$$\"3O?&fA<q#\\XF@$!3'Gn
L#evp'4\"F@7$$\"3oh/x$[qGe%F@$!3mti[y:1w7F@7$$\"3qQq'H.,hk%F@$!3]()*zA
s>H^\"F@7$$\"3e;O;#eJ$4ZF@$!37FJ'*\\I\")*f\"F@7$$\"3sU'G^sDax%F@$!36%)
Gd2J=@:F@7$$\"3&)oO4o)>:%[F@$!3kmlYP)HzF\"F@7$$\"3WXD#4UHQ([F@$!3I9npC
aV16F@7$$\"3;@9vt*Qh!\\F@$!3Q,FlzNGh!*F07$$\"3w(H!eE&[%Q\\F@$!3%=Hp*z#
[A#oF07$$\"3Ou\"4%z!e2(\\F@$!3<o(eN+bbS%F07$$\"3/&\\Fp=$e/]F@$!3k'*[Q'
QuOv\"F07$$\"3t:eW%H3%Q]F@$\"3EEC,G\"zC[*F-7$$\"3IPT'>SLA2&F@$\"3E%)4M
U;6BOF07$$\"3*zX#[4&eg5&F@$\"3gg>'en)e%>'F07$$\"3Y!*>B3hjQ^F@$\"3'QI%z
,P$\\])F07$$\"3#Q_\")pq87<&F@$\"3idLK3?,f5F@7$$\"3>d5t08z._F@$\"3\")[;
Q$[%\\R7F@7$$\"3n*e![/*ojB&F@$\"3_c3!HsirQ\"F@7$$\"3-J))[/Uop_F@$\"3:u
#*oi&p,]\"F@7$$\"3Dtq\\/&**HI&F@$\"3%*zK\"fEY;d\"F@7$$\"3OL\"*\\H$G8J&
F@$\"3!=\\#H$HoFe\"F@7$$\"3O%>,X:d'>`F@$\"3'y'*)4Ge9\"f\"F@7$$\"3PbK]z
f)zK&F@$\"3O\"pLQMknf\"F@7$$\"3[:`]/[JO`F@$\"3]A&)3)49'*f\"F@7$$\"3fvt
]HOkW`F@$\"3#QOR%\\,p*f\"F@7$$\"3qN%4XXsHN&F@$\"37,X,mB*pf\"F@7$$\"3#e
\\6&z7Ih`F@$\"3EoKsDa_\"f\"F@7$$\"3#ob8X5I'p`F@$\"3?KY93))H$e\"F@7$$\"
3fR3_p*3dV&F@$\"3\"HbL'=I'GU\"F@7$$\"3PA\"GX$yy,bF@$\"3y8*=**o9&36F@7$
$\"31]ilTw9KbF@$\"35*eX7+vH@*F07$$\"3wxVy[u]ibF@$\"3#=()4/N;*GrF07$$\"
3W0D\"fDnGf&F@$\"3u-yIb;!4)[F07$$\"39L1/jqABcF@$\"3*pmjeSK1_#F07$$\"3C
W>6GG-ecF@$!32[(yO`OZ_#F-7$$\"3WaK=$f=Gp&F@$!3xNYHPp&z,$F07$$\"3blXDeV
hFdF@$!3'>?S/)4K#p&F07$$\"3mweKB,TidF@$!3G*4-AU?[>)F07$$\"3w$)*3/(=`$z
&F@$!31H\\+hubA5F@7$$\"3w\"4#\\<OlCeF@$!3hcX5:D#4?\"F@7$$\"3w*>vXOvd&e
F@$!3=j***p'pE]8F@7$$\"3'oIe;6(*o)eF@$!3Y)\\1&p=)pY\"F@7$$\"3(y8!=&Qz+
#fF@$!3))>\")*[<BBb\"F@7$$\"3yp>qe;E`fF@$!3q4?IdA.&f\"F@7$$\"3;')GY&z_
)pfF@$!3KmxeHj)**f\"F@7$$\"3o,QAKRW')fF@$!3)=4ef<ORf\"F@7$$\"3<<Z)*o].
.gF@$!3WlVb2M#pd\"F@7$$\"3nKcu0ii>gF@$!3-hJ4L]1\\:F@7$$\"3)Rsoa(eQ^gF@
$!3cAivxMCm9F@7$$\"3G:=>Xb9$3'F@$!3gbL.<a_Y8F@7$$\"3Y2\\\"\\@0\\6'F@$!
39&[!\\KM#H>\"F@7$$\"3w)*zj%)[mYhF@$!3`X8qfFI45F@7$$\"31*\\Lr)\\z!='F@
$!3#e_7A.t!QyF07$$\"3P***G'*3D\\@'F@$!3=9@@dYTb`F07$$\"3o*\\C@>b!\\iF@
$!3J$Q)zkh<<FF07$$\"3)****>YH&=$G'F@$!3Je_<1pw/5!#C-%'COLOURG6&%$RGBGF
(F($\"*++++\"!\")-F$6$7]w7$F($\"3%***********p\"R#F07$F+$\"3j\"30>9bn6
&F07$F2$\"3'[\"[i))z\"*fxF07$F7$\"3A*4#=z8MC5F@7$F<$\"3OCyM=NQ\\7F@7$F
G$\"3GoZtS^-m:F@7$FQ$\"3aB&GK44Pw\"F@7$FV$\"3eH5hMs3&z\"F@7$Fen$\"3i\"
\\99?9`\"=F@7$Fjn$\"3q3%fy1JU#=F@7$F_o$\"3yN5Qu%e<#=F@7$Fdo$\"39o\"Ga
\\GFy\"F@7$Fio$\"37@:@:+>*p\"F@7$F^p$\"3W[V/?KRs:F@7$Fcp$\"3meknx]A19F
@7$Fhp$\"3VOqlWhG07F@7$F]q$\"3aK)pWpT;v*F07$Fbq$\"3&f9B-*><NsF07$Fgq$
\"3cTBFq'zEc%F07$F\\r$\"3$zj[K$y)z!=F07$Far$!3'G[Ct&ftG&*F-7$Ffr$!3!os
qx`2<X$F07$F[s$!3P&\\Qc$yJJeF07$F`s$!3Wa!R5Nhb.)F07$Fes$!3MI.1F)f7+\"F
@7$Fjs$!3`:VWAzA>8F@7$F_t$!3#)Rfn_NG*[\"F@7$Fdt$!3ej'=DDY%*\\\"F@7$Fit
$!3SM'*Rb'Go]\"F@7$F^u$!3MBh!*=3U6:F@7$Fcu$!3(Q>i$Gw@8:F@7$Fhu$!3P>k30
)=A^\"F@7$F]v$!3.d^R1*G%3:F@7$Fbv$!3Y.jM<t&=]\"F@7$Fgv$!3)4lJUB=D\\\"F
@7$F\\w$!3h.Lvlw$zU\"F@7$Faw$!38]R+D*R9K\"F@7$Ffw$!3mtm.)Hqm<\"F@7$F[x
$!33=3&fET](**F07$F`x$!3yEc19qO!*yF07$Fex$!33(*p?JXnrbF07$Fjx$!3q,(=z
\\*Q6IF07$F_y$!3#[!fziH*)*[$F-7$Fdy$\"3<n@8T6LOBF07$Fiy$\"3[`(4!zZvk\\
F07$F^z$\"3)y9Fe%z`qrF07$Fcz$\"3\\kY35Ok?#*F07$Fhz$\"3oWj(Q9vn5\"F@7$F
][l$\"3%GK4)*z<pE\"F@7$Fb[l$\"3N[h*y9n$>:F@7$Fg[l$\"3yZ)Q\")[Z**f\"F@7
$F\\\\l$\"3!)=1k7@&y\\\"F@7$Fa\\l$\"3FE9P4,@B7F@7$Ff\\l$\"3\\bYwK0iP5F
@7$F[]l$\"32$H1'\\\"fnB)F07$F`]l$\"3#G)Qg-O*)peF07$Fe]l$\"3\\mWv0&oxL$
F07$Fj]l$\"3*ylm9_Z*4&*F-7$F_^l$!3_H&y&4o\\l9F07$Fd^l$!3Cdo8z\"[$fQF07
$Fi^l$!3qET%y,F(yhF07$F^_l$!3yLp,Xz_q()F07$Fc_l$!3-rb_ctr56F@7$Fh_l$!3
mhG031w68F@7$F]`l$!3'))H@g'*)4u9F@7$Fb`l$!3]O&>CG%ox:F@7$Fg`l$!3aXY0>c
xZ;F@7$F\\al$!3Afd.I)y(p;F@7$Faal$!3Wmfllt#Ho\"F@7$Ffal$!3[%R8Cnjro\"F
@7$F[bl$!3=Bjc;/[#o\"F@7$Febl$!3KjpV7!ffa\"F@7$F_cl$!3bFQ**)QUsB\"F@7$
Fdcl$!3)Q$\\&\\k%4b5F@7$Ficl$!3Uy;!pqQ4^)F07$F^dl$!3]x38J:J-jF07$Fcdl$
!3!)ePpqL#*yRF07$Fhdl$!3-^aa8#Q\\O\"F07$F]el$\"3qbG<a7yU7F07$Fbel$\"3i
;@p')f<oPF07$Fgel$\"3'y6q<9[w8'F07$F\\fl$\"3OqrZu$*y&=)F07$Fafl$\"3_!
\\[^_0d(**F07$Fffl$\"3s['QPj$*f9\"F@7$F[gl$\"3MF'z<2&*)f7F@7$F`gl$\"3#
f*>o>,kQ8F@7$Fegl$\"3y:gW)QJTP\"F@7$Fjgl$\"3K!)zW8XDv8F@7$F_hl$\"3!>p#
H)*oBl8F@7$Fdhl$\"31.'31HKTM\"F@7$Fihl$\"3rSDG6E278F@7$Fcil$\"3(4eje^&
\\/6F@7$F]jl$\"3Vxb_0<9=xF07$Fbjl$\"3Ie0(zm_'3bF07$Fgjl$\"3[r..riZ$3$F
07$F\\[m$\"3sn.TO//\"4&F-7$Fa[m$!3gfIF^ecV@F07$Ff[m$!3!3H=\\CbJ!\\F07$
F[\\m$!3E!y<Y&*z`e(F07$F`\\m$!3+dMAhB&4,\"F@7$Fe\\m$!3;X*f!o!G*R7F@7$F
_]m$!3'f)=Q%)eVi:F@7$Fi]m$!3)ynLF$*zMw\"F@7$F^^m$!3kVx*R&G>%z\"F@7$Fc^
m$!3h\"fZ7$)zV\"=F@7$Fh^m$!3=qzUm9*Q#=F@7$F]_m$!3$HV*f!H\\E#=F@7$Fb_m$
!3)=^\"*GHZzy\"F@7$Fg_m$!3*)y]@nX26<F@7$F\\`m$!3Cz&Qn7?%*e\"F@7$Fa`m$!
3c!Rw[JJ\"G9F@7$Ff`m$!39w?dSrkJ7F@7$F[am$!3AD;JT5S05F@7$F`am$!3,!e`$[9
%Gh(F07$Feam$!3**eZ3$\\b;,&F07$Fjam$!3'R\\Uj/J&>BF07$F_bm$\"3H$y!=bn*3
#RF-7$Fdbm$\"3q:\"))o!egmHF07$Fibm$\"3Mk**3T:KGaF07$F^cm$\"3f!o1UI4kr(
F07$Fccm$\"39C4Pby]u(*F07$Fhcm$\"39:[UYL\"H<\"F@7$F]dm$\"3Sp*[diVzK\"F
@7$Fbdm$\"35Spr:I$zV\"F@7$Fgdm$\"31tJ1!ew'*\\\"F@7$F\\em$\"3sOIn7+?6:F
@7$Faem$\"3If;Q&fnD^\"F@7$$\"3_moKl#3D5%F@$\"3irNc()QW4:F@7$Ffem$\"3\\
c?<K.z.:F@7$$\"33v`(4K\"R=TF@$\"3K()=Hm#=c\\\"F@7$F[fm$\"3e@>@&)H%\\[
\"F@7$F`fm$\"3ANl.HEl<9F@7$Fefm$\"34*GOH*=a78F@7$Fjfm$\"3%pimv\"oth6F@
7$F_gm$\"3)4(4m#oy^v*F07$Fdgm$\"3)H7PlJDSf(F07$Figm$\"3Qlf#z'fj(>&F07$
F^hm$\"3]$3Hm(\\$=)GF07$Fchm$\"3kQIi$3h\\'[F-7$Fhhm$!3qZRvs\\qI>F07$F]
im$!3\"znJ_b1;J%F07$Fbim$!3t\"4_VX7b!oF07$Fgim$!3,aI)>x\\f6*F07$F\\jm$
!3wtYvkzk<6F@7$Fajm$!3E&f5MhxFH\"F@7$Ffjm$!3Y\"GC[:Y:_\"F@7$F[[n$!3@nv
42DC+;F@7$F`[n$!3B>)>)f108:F@7$Fe[n$!3%zG`mvn8E\"F@7$Fj[n$!35?K\\:;#e3
\"F@7$F_\\n$!3z!ezofd]\"))F07$Fd\\n$!3`+abC7DOlF07$Fi\\n$!3#o$eypy\"*z
SF07$F^]n$!3o'z%Q&=0kQ\"F07$Fc]n$\"3kz`:vjid8F07$Fh]n$\"3![B-*eCYvSF07
$F]^n$\"3]x(f1Cy6p'F07$Fb^n$\"3)e[F[$3qX!*F07$Fg^n$\"3i%QTj#[p<6F@7$F
\\_n$\"3g\")p&Qb-II\"F@7$Fa_n$\"3ccsRRAub9F@7$Ff_n$\"3Qod0+Q@u:F@7$F[`
n$\"3_+@kpjX^;F@7$Fe`n$\"3CacIXm&Rn\"F@7$F_an$\"3A&Gs_61bo\"F@7$Fian$
\"39%>%pSr/'o\"F@7$Fcbn$\"3#[0rwi)fv;F@7$Fhbn$\"3Y:OW'[Z)G:F@7$F]cn$\"
3f._(38I%H7F@7$Fbcn$\"3A$\\8p*eW\\5F@7$Fgcn$\"3Er!Q_1(o%[)F07$F\\dn$\"
3x'HGf.>DJ'F07$Fadn$\"3rzpIzM;HSF07$Ffdn$\"3U%QpDDgZM\"F07$F[en$!3(Q)R
N/OTK8F07$F`en$!3C53`l#***>RF07$Feen$!3'>c/)3&e%QjF07$Fjen$!3uTkr*pgtH
)F07$F_fn$!3EBjRGaJ,5F@7$Fdfn$!3^?e&Rp[V9\"F@7$Fifn$!3!R\\lt!)*Gb7F@7$
F^gn$!3_JZL**)>^L\"F@7$Fcgn$!356+6Lm,t8F@7$Fhgn$!3a(>q5TIeP\"F@7$F]hn$
!3_!4CY,;yO\"F@7$Fbhn$!3)yq\\0>7!\\8F@7$Fghn$!3F7kY/;`>8F@7$Fain$!3F&=
l6vCA6\"F@7$F[jn$!3dyh(>Ce:s(F07$F`jn$!3Uj%pW-KtX&F07$Fejn$!35@Iw3heoH
F07$Fjjn$!3m-X*H_h#oKF-7$F_[o$\"3I\"H6^**)p\"R#F0-Fe[o6&Fg[oFh[oF(F(-%
*THICKNESSG6#\"\"#-%+AXESLABELSG6$%\"tGQ!6\"-%*AXESSTYLEG6#%$BOXG-%%VI
EWG6$;F($\"+3`=$G'!\"*%(DEFAULTG" 1 2 0 1 10 2 2 9 1 2 2 1.000000 
45.000000 45.000000 0 0 "Curve 1" "Curve 2" }}}}{EXCHG {PARA 0 "> " 0 
"" {MPLTEXT 1 0 214 "# Computer problem: analyze with maple Example 2 \+
of Asmar page 74\n# my''+cy'+ky=F(t), m=2, c=0.01, k=18.01 and F(t) is
 the \n# 2*Pi-periodic square wave with \n# F(t)=pulse(t,0,Pi)-pulse(t
,Pi,2*Pi) on 0 <= t <= 2*Pi." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 0 "" }}}}{MARK "12 1 0" 2 }{VIEWOPTS 1 1 0 2 1 1805 1 1 1 1 }
{PAGENUMBERS 0 1 2 33 1 1 }