{VERSION 4 0 "SGI MIPS UNIX" "4.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 "" 1 18 0 0 0 0 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 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 "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 {PARA 0 "" 0 "" {TEXT -1 0 "" }{TEXT 256 54 "306. Using Maple \+ to apply the Laplace transform method" }{TEXT -1 39 " laplace_exercis e.mws, JR, Dec 5, 2001" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 77 "re start:\nalias(u=Heaviside);\nforce:=4*u(t-7);\nplot(force,t=0..20,axes =boxed);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%\"uG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&forceG,$-%\"uG6#,&%\"tG\"\"\"\"\"(!\"\"\"\"%" }} {PARA 13 "" 1 "" {GLPLOT2D 322 154 154 {PLOTDATA 2 "6&-%'CURVESG6$7hn7 $$\"\"!F)F(7$$\"39LLLL3VfV!#=F(7$$\"3%pmm;H[D:)F-F(7$$\"3MLLLe0$=C\"!# +&F4F(7$$\"3J+++]Z/NaF4F(7$$\" 3;+++]$fC&eF4F(7$$\"3qLL$ez6:B'F4F(7$$\"3P++D1o(oX'F4F(7$$\"3/nmm;=C#o 'F4F(7$$\"3!pmm\"z')pxnF4F(7$$\"3knmmTb:toF4F(7$$\"3,om\"H(R)3#pF4F(7$ $\"3]nm;/ChopF4F(7$$\"3qm\"z>^W0)pF4F(7$$\"3!om\"z>mZ#*pF4F(7$$\"3)o;/ ws3W+(F4$\"\"%F)7$$\"3)pm;a$3M;qF4F^p7$$\"3;n;/^]?SqF4F^p7$$\"3Mnmmm#p S1(F4F^p7$$\"3JLLe9t9'G(F4F^p7$$\"3<++]i`A3vF4F^p7$$\"3Rmmmm(y8!zF4F^p 7$$\"3K,+]i.tK$)F4F^p7$$\"3!3++v3zMu)F4F^p7$$\"3Yomm\"H_?<*F4F^p7$$\"3 ,nm;zihl&*F4F^p7$$\"39LLL3#G,***F4F^p7$$\"3WLLezw5V5!#;F^p7$$\"3.++v$Q #\\\"3\"FdrF^p7$$\"3]LL$e\"*[H7\"FdrF^p7$$\"3-+++qvxl6FdrF^p7$$\"31++] _qn27FdrF^p7$$\"36++Dcp@[7FdrF^p7$$\"3+++]2'HKH\"FdrF^p7$$\"3_mmmwanL8 FdrF^p7$$\"35+++v+'oP\"FdrF^p7$$\"3CLLeR<*fT\"FdrF^p7$$\"3B+++&)Hxe9Fd rF^p7$$\"3gmm\"H!o-*\\\"FdrF^p7$$\"39++DTO5T:FdrF^p7$$\"3emmmT9C#e\"Fd rF^p7$$\"3\"****\\i!*3`i\"FdrF^p7$$\"3_LLL$*zym;FdrF^p7$$\"3fLL$3N1#4< FdrF^p7$$\"3!pm;HYt7v\"FdrF^p7$$\"3A+++q(G**y\"FdrF^p7$$\"3'pmmT6KU$=F drF^p7$$\"3dLLL`v&Q(=FdrF^p7$$\"30++DOl5;>FdrF^p7$$\"3A++v.Uac>FdrF^p7 $$\"#?F)F^p-%'COLOURG6&%$RGBG$\"#5!\"\"F(F(-%+AXESLABELSG6$Q\"t6\"Q!6 \"-%*AXESSTYLEG6#%$BOXG-%%VIEWG6$;F(Fhv%(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 69 "solve(x^2+2*x+5=0,x);\nde:=diff(y(t),t,t)+2*di ff(y(t),t)+5*y(t)=force;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$^$!\"\"\" \"#^$F$!\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#deG/,(-%%diffG6$-%\" yG6#%\"tG-%\"$G6$F-\"\"#\"\"\"*&F1F2-F(6$F*F-F2F2*&\"\"&F2F*F2F2,$-%\" uG6#,&F-F2\"\"(!\"\"\"\"%" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "with(inttrans):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "lapl ace(de,t,s);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/,,*&%\"sG\"\"\",&*&F& F'-%(laplaceG6%-%\"yG6#%\"tGF0F&F'F'-F.6#\"\"!!\"\"F'F'--%\"DG6#F.F2F4 *(\"\"#F'F&F'F*F'F'*&F:F'F1F'F4*&\"\"&F'F*F'F',$*&-%$expG6#,$F&!\"(F'F &F4\"\"%" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "eq:=subs(laplac e(y(t),t,s)=Y,%);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#eqG/,,*&%\"sG \"\"\",&*&F(F)%\"YGF)F)-%\"yG6#\"\"!!\"\"F)F)--%\"DG6#F.F/F1*(\"\"#F)F (F)F,F)F)*&F7F)F-F)F1*&\"\"&F)F,F)F),$*&-%$expG6#,$F(!\"(F)F(F1\"\"%" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "Y:=solve(eq,Y);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"YG*&,**&)%\"sG\"\"#\"\"\"-%\"yG6#\"\"!F+ F+*&--%\"DG6#F-F.F+F)F+F+*(F*F+F,F+F)F+F+*&\"\"%F+-%$expG6#,$F)!\"(F+F +F+*&F)F+,(*$F(F+F+*&F*F+F)F+F+\"\"&F+F+!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "Y:=subs( D(y)(0)=0, y(0)=3, Y);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"YG*&,(*$)%\"sG\"\"#\"\"\"\"\"$*&\"\"'F+F)F+F+* &\"\"%F+-%$expG6#,$F)!\"(F+F+F+*&F)F+,(F'F+*&F*F+F)F+F+\"\"&F+F+!\"\" " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "y:=invlaplace(Y,s,t);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"yG,,*&-%$expG6#,$%\"tG!\"\"\"\" \"-%$cosG6#,$F+\"\"#F-\"\"$*(#F3F2F-F'F--%$sinGF0F-F-*&#\"\"%\"\"&F--% \"uG6#,&F+F-\"\"(F,F-F-*&#F:F;F-*(F " 0 "" {MPLTEXT 1 0 30 "plot(y,t=0..20,numpoints=200);" }}{PARA 13 "" 1 "" {GLPLOT2D 398 576 576 {PLOTDATA 2 "6%-%'CURVESG6$7ex7$$\"\"!F)$\"\"$F) 7$$\"3dD^-05_^5!#=$\"3OkE!RvVH#H!#<7$$\"3JE_/4QWm>F/$\"3O^;KU'>&[FF27$ $\"3=uZ&4>q`*HF/$\"3CIwbk*oJY#F27$$\"3uZ%*)ydVK^$F/$\"3%R#f\\x5P$H#F27 $$\"3I@T#['p6JSF/$\"3\\(oTq?)46@F27$$\"3j\\(\\**)*Gla%F/$\"3fubIR;#3#> F27$$\"3Tx`2:5%>1&F/$\"3)3`Aqkm\\s\"F27$$\"3(=\\)pRRzRbF/$\"3*='4dFJ.T :F27$$\"3X2;Kkok,L +)F/7$$\"3uV([(\\zkI!)F/$\"32Vj*Q?%QSiF/7$$\"3gc8Fa))y]!*F/$\"39Y()pAL f7$$\"3d3l`!*) =F/7$$\"3'\\(\\**)f)[17F2$!3zXJn&yh#4PF/7$$\"3/'>Rycl4J\"F2$!3r4-jQgL6 ]F/7$$\"3,h@V'[[;T\"F2$!3UNB'GRm2!eF/7$$\"3)oNrUNjtX\"F2$!3Ev6&fd#)3-' F/7$$\"3v_06A#yI]\"F2$!3M\"GoaD&phhF/7$$\"3LS!3;iPub\"F2$!3`,QVo-eLiF/ 7$$\"3pFb5@qz6;F2$!3kz/M*p(*3@'F/7$$\"3RqS\"GcYyl\"F2$!3)Hb*RU'e^7'F/7 $$\"348E_/h*Qq\"F2$!3mETU/_(\\)fF/7$$\"3JHe;L#H5\"=F2$!3LGUEZWq#[&F/7$ $\"3lD^-0-'e!>F2$!3c]\")[UCV\")[F/7$$\"3Tw_06[!*4?F2$!3E*Q:j56Q6%F/7$$ \"375?S!))z*3@F2$!3ATty&[,,L$F/7$$\"3dS!3;KaB@#F2$!3oUX*f7Pd]#F/7$$\"3 J;KkGVG2BF2$!3p'zAt(*\\ux\"F/7$$\"3lX\"He;z'4CF2$!3j.)o+L\">_5F/7$$\"3 ?.17C'Qg^#F2$!3u]GZw*))p)QFcp7$$\"3pIhAX[i3EF2$\"3xa!\\!3.g<5Fcp7$$\"3 -8D]+0i3FF2$\"3Xr<$Hq-$Q`Fcp7$$\"3tC\\)pzD>\"GF2$\"3)[K:*yg%os)Fcp7$$ \"3O%)oPv)*)H\"HF2$\"3ES'[Dt&R-6F/7$$\"3[S!3;A#)='HF2$\"3k-&4\"GOhz6F/ 7$$\"3<'>Rycu2,$F2$\"3KY/r(*)>iB\"F/7$$\"3gg?T#=h]1$F2$\"3PkSB4qZw7F/7 $$\"3fC\\)pzZ$>JF2$\"33QuQw_p5K$F2$\"3l>KcNUn/7F/7 $$\"3*yb6BYdaT$F2$\"3O`co%**4$)4\"F/7$$\"30^,.1%['=NF2$\"3#f+_?tY\\_*F cp7$$\"3Db5@UIu:OF2$\"3z75:G!eD)zFcp7$$\"3_Ryc8\\BxTA%F2$!3OKns7\">(*R'F]\\l7$$\"3m;KkGhTXF2$!3O% [N8PHVT#Fcp7$$\"3))Qxa4Xw@YF2$!3PHLe?rNOEFcp7$$\"3e]+,-EI>ZF2$!3[G%*G` nm%p#Fcp7$$\"31lHf=hgF[F2$!3`3(=(=**[7EFcp7$$\"31^,.1!*Q@\\F2$!3yo3dF! eAW#Fcp7$$\"3&Hb5@ULy-&F2$!31-.%HOus;#Fcp7$$\"35%ze<&f%[7&F2$!3g*yLvPp f'=Fcp7$$\"3sE`18C'4B&F2$!3Ku=L-#*)o]\"Fcp7$$\"3u@V'G(H_A`F2$!3]BS<*o? .>\"Fcp7$$\"3]qS\"Gw*zEaF2$!3EnsB.0#fR)F]\\l7$$\"3M\\)pR*f_FbF2$!3W[^8 ,dU 9QZZ#!#A7$$\"3moOtYR#[#eF2$\"3J`Q!*3F$\\(=F]\\l7$$\"3u06AW!y*GfF2$\"3P 4zVZT^lMF]\\l7$$\"31#Gc7XW#GgF2$\"3pTzrpdWXXF]\\l7$$\"3TfVUD&F]\\l7$$\"3K'Gd94\"HFiF2$\"3o/SKxT&pb&F]\\l7$$\"3k`18EC\"=L' F2$\"3g?*[\"y%*GqbF]\\l7$$\"3Y\"Gc7lD>V'F2$\"3_`%\\e6pNK&F]\\l7$$\"3c \\**)z>&zJlF2$\"3nz%=.gC@)[F]\\l7$$\"3+nJjE$4hj'F2$\"3PfOay&QDF%F]\\l7 $$\"3)4=OsW'=KnF2$\"3(GDDHF] \\l7$$\"3kX!4=cB#RpF2$\"3`U$)e'G4*[@F]\\l7$$\"3zS\"GcK1%))pF2$\"3'Rq8& >\"4z!=F]\\l7$$\"3$fBZ%*3*ePqF2$\"3H(z0M)>\"GB%F]\\l7$$\"3&zW*)yn()y3( F2$\"3O[n;\"\\`!p:Fcp7$$\"34f;Lmi=QrF2$\"3&yJD1]'zOF/7$$\"3f9Fa3(f1 k(F2$\"3IK?VVOWmZF/7$$\"32%*)ydviXt(F2$\"3'e:a(HvL!p&F/7$$\"3`sW*)yt!H %yF2$\"3-lH'*[n6tmF/7$$\"3517C[+oSzF2$\"3pGG:cuF/7$$\"3a\\)pR*4UP!) F2$\"3'>COpQ@s6)F/7$$\"3yAZ%*)e[99)F2$\"3w@KYTwp#p)F/7$$\"3&\\#\\)p*p* eC)F2$\"3!fB(\\WH'y7*F/7$$\"3ksX\"HeH4M)F2$\"3'pj6ZdRUS*F/7$$\"3o%)oPv (*Q\"R)F2$\"3F)3f\"HA]2&*F/7$$\"3s'>Ry'*\\=W)F2$\"3x>%=%ofh#e*F/7$$\"3 #**f>R=%4\"\\)F2$\"3YU)4OX%\\I'*F/7$$\"3K,+++%Q.a)F2$\"3%G[>?\"R2b'*F/ 7$$\"3eX([(\\'>Pf)F2$\"3E\"Rzm56wl*F/7$$\"31)[(\\**35Z')F2$\"3$o&='[p< vj*F/7$$\"3=`06A0H$p)F2$\"3_$okDOVQg*F/7$$\"3M=OsW,[R()F2$\"3?X%*GSa=92%*F/7$$\"3OkFb5:KX*)F2$\"3wUv!o^LuA *F/7$$\"3EsU&3d)4W!*F2$\"3_\\xBSH7F!*F/7$$\"3$pAX!4U&H9*F2$\"3wKU/T\"p s\"))F/7$$\"3!Hc7Dq!yV#*F2$\"3(=*y=()G!\\g)F/7$$\"356C['4b1N*F2$\"3Q4# >rUO?R)F/7$$\"35d7D]%['[%*F2$\"3E1R;l-2:#)F/7$$\"3[LoOt/QX&*F2$\"3qqv0 ([)4i!)F/7$$\"3^^.29ay['*F2$\"3i/W%prea#zF/7$$\"3x\"Gc7Dl>v*F2$\"3S-S( *oK8=yF/7$$\"3qg?T#GvX%)*F2$\"3mZZ!GQ(HYxF/7$$\"3roNrU&yU&**F2$\"3lK3: i$*e*o(F/7$$\"3Cf=P9tg/5!#;$\"3F$3yw%RqjwF/7$$\"3U+,-CPM:5Fb`m$\"3/&fP &3;7bwF/7$$\"3OtY$pe!fD5Fb`m$\"3r$Q4:iT^m(F/7$$\"3Lu[(\\\")RZ.\"Fb`m$ \"3C!QH*zm+'o(F/7$$\"3+qRzy!H]/\"Fb`m$\"3XRZ)\\Ft%>xF/7$$\"3UjE`YlQb5F b`m$\"3y'G:N,j.w(F/7$$\"3$f Qc=Q&4\"Fb`m$\"3*y+bXk86$zF/7$$\"3wNrUlKe06Fb`m$\"3/BgfOu\"y'zF/7$$\"3 h8Faom2;6Fb`m$\"3q?=?@=2+!)F/7$$\"3#Hf=PE>`7\"Fb`m$\"3,nu5J(GM-)F/7$$ \"3n>RyOUsN6Fb`m$\"3wv)f1\"*>R/)F/7$$\"3wT$oO$>$Ql6Fb`m$\"3XF*epxM52) F/7$$\"3#\\(\\**y]Dw6Fb`m$\"3p(G;$fSIr!)F/7$$\"3L$oOt)\\Y&=\"Fb`m$\"3A h@1i]]o!)F/7$$\"3905?+$yh>\"Fb`m$\"3^]!)F/7$$\"3&oLnMHVgD\"Fb`m$\"3KA'oNUE:,)F/7$$\" 3V#['HR#zmE\"Fb`m$\"32nRIp)yR+)F/7$$\"3ONqShy$fF\"Fb`m$\"3-%\\#yG\"=%) *zF/7$$\"3TtY$pUPfG\"Fb`m$\"35%>^S.QN*zF/7$$\"3]9HeczE'H\"Fb`m$\"3tB`9 H7t*)zF/7$$\"3s5@UkVP18Fb`m$\"30cj4(>sr)zF/7$$\"3xT$oO$G:;8Fb`m$\"3;9G h$R0d)zF/7$$\"3u9Hec,,F8Fb`m$\"3Eg`ey\"*)zF/7$$\"3\"y_06o\\ mP\"Fb`m$\"3[BJpx='4*zF/7$$\"3:17Co))z'Q\"Fb`m$\"3oAQWM-!H*zF/7$$\"3EW )oPb@nR\"Fb`m$\"37,UI$GqZ*zF/7$$\"3O['Hfo4rS\"Fb`m$\"3S?z*=\\:m*zF/7$$ \"3b'Hf=p9rT\"Fb`m$\"3!GFy()=@#)*zF/7$$\"3!oQxaDYtU\"Fb`m$\"3iij5j\\k* *zF/7$$\"3t9He'4$\\P9Fb`m$\"31Pv$3I83+)F/7$$\"3pV([(*)p\"oW\"Fb`m$\"3a jHg8Wm,!)F/7$$\"3!zeR=61n9Fb`m$\" 3b!G+)F/7$$\"3+'>Ry#=Dx9Fb`m$\"3bt%[\"GC/.!)F/7$$\"3NFa3Pc+([\"Fb `m$\"35Gy,\\t4.!)F/7$$\"3i=Pu))f$y\\\"Fb`m$\"3E6g,q>*H+)F/7$$\"3APu[xU @2:Fb`m$\"3=*p<^-*y-!)F/7$$\"3Sxa4>(ey^\"Fb`m$\"3L^&3Y2nC+)F/7$$\"3_,. 1s*fv_\"Fb`m$\"3mPLKUu6-!)F/7$$\"3ya4>=;>S*yd\"Fb`m$\"3])o635d-+)F/ 7$$\"3$Qxa4.Bze\"Fb`m$\"35k/R9Z$G;Fb`m$\"3wj#[?z\"R**zF/7$$\"3u],.'[/ yj\"Fb`m$\"3;NJq#pf$**zF/7$$\"3c([(\\>mD[;Fb`m$\"3[%y#Rr1O**zF/7$$\"3V ]+,UzEe;Fb`m$\"3+(e)\\[4R**zF/7$$\"3C(\\N@9&**zF/7$$\"3IS!3;-%H)o\"Fb`m$\"3C?Ie'**) e**zF/7$$\"3OC['HjL\")p\"Fb`m$\"3#oXs%=)p'**zF/7$$\"3eE`1Lx**3e4Dj++)F/7$$\"3&pLnM D+&ocQ[ 4+!)F/7$$\"3YzeFb`m$\"3y%)\\A%*=****zF/7$$\"3 g\\)pRB&[>>Fb`m$\"3KAD#[/%)***zF/7$$\"3sW*)y(zq$H>Fb`m$\"3))\\GA-$y*** zF/7$$\"3\\yc8ZMXR>Fb`m$\"3A#e=?\\u***zF/7$$\"3\\jE`')39]>Fb`m$\"3Iq\" )=%[s***zF/7$$\"3tZ&4>AS*f>Fb`m$\"3gm/FGA(***zF/7$$\"3b06ACMhp>Fb`m$\" 3'yD.V?t***zF/7$$\"3`d9H=R&*z>Fb`m$\"3u'QLpIv***zF/7$$\"3?]+,->F!*>Fb` m$\"3#\\[wq>y***zF/7$$\"#?F)$\"3#)HxD*Q\")***zF/-%'COLOURG6&%$RGBG$\"# 5!\"\"F(F(-%+AXESLABELSG6$Q\"t6\"Q!6\"-%%VIEWG6$;F(F`_o%(DEFAULTG" 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 0 "" }}}}{MARK "1 3" 1 } {VIEWOPTS 1 1 0 3 4 1802 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }