{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 "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 "Heading 1" 0 3 1 
{CSTYLE "" -1 -1 "" 1 18 0 0 0 0 0 1 0 0 0 0 0 0 0 }1 0 0 0 8 4 0 0 0 
0 0 0 -1 0 }{PSTYLE "Heading 2" 3 4 1 {CSTYLE "" -1 -1 "" 1 14 0 0 0 
0 0 0 0 0 0 0 0 0 0 }0 0 0 -1 8 2 0 0 0 0 0 0 -1 0 }{PSTYLE "Maple Out
put" 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 "M
aple 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 4 "" 0 "" {TEXT -1 17 "Mth 256 Fall 2000" }}
{PARA 4 "" 0 "" {TEXT -1 13 "Bent Petersen" }}{PARA 4 "" 0 "" {TEXT 
-1 0 "" }}{PARA 4 "" 0 "" {TEXT -1 44 "Two illustrations of Newton's l
aw of cooling" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" 
{TEXT -1 205 "In the graphs the red is the ambient temperature (which \+
drives the system) and the blue is the temperature of our wine cellar,
 root cellar, or whatever (the system response). The numbers are not r
ealistic." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 
140 "Notice how the response tracks the ambient with a time delay (pha
se shift in the first example) and with a reduced amplitude of fluctua
tion." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 8 "restart;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 
"ode:=diff(T(t),t)+k*T(t)=k*F(t);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>
%$odeG/,&-%%diffG6$-%\"TG6#%\"tGF-\"\"\"*&%\"kGF.F*F.F.*&F0\"\"\"-%\"F
GF,F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "F:=t->B+A*cos(omeg
a*t);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"FGR6#%\"tG6\"6$%)operator
G%&arrowGF(,&%\"BG\"\"\"*&%\"AGF.-%$cosG6#*&%&omegaGF.9$F.F.F.F(F(F(" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "dsolve(ode):Ts:=unapply(r
hs(%),t);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#TsGR6#%\"tG6\"6$%)oper
atorG%&arrowGF(*&,.*&%\"BG\"\"\")%\"kG\"\"#\"\"\"F0*&F/F4)%&omegaGF3F4
F0*(F1F4%\"AGF0-%$cosG6#*&F7F09$F0F0F0**F2F0F9F4F7F4-%$sinGF<F0F0*(-%$
expG6#,$*&F2F4F>F4!\"\"F0%$_C1GF0F1F4F0*(FCF4FIF4F6F4F0F4,&*$F1F4F0*$F
6F4F0!\"\"F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "B:=2:A:
=3:k:=3:omega:=3*Pi:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "sol
ve(Ts(0)=8,_C1): _C1:=%;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$_C1G,$*
&,&\"\"\"F(*$)%#PiG\"\"#\"\"\"F,F-,&F(F(F)F(!\"\"\"\"$" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 55 "plot([F(t),Ts(t)],t=0..3,color=[red
,blue],thickness=3);" }}{PARA 13 "" 1 "" {GLPLOT2D 690 474 474 
{PLOTDATA 2 "6'-%'CURVESG6$7iv7$\"\"!$\"\"&F(7$$\"1+++DJdpK!#<$\"11QW)
)))oe[!#:7$$\"1+++]i9RlF.$\"1BZF2\"o![WF17$$\"1,](oHl:'zF.$\"1ACY)fIV>
%F17$$\"1++vVV)RQ*F.$\"1W\">._:7!RF17$$\"1+D1R.k!3\"!#;$\"11i*Q'G)Rd$F
17$$\"1++vVA)GA\"FD$\"1*Qc\\'[]=KF17$$\"1+v=U\"[GQ\"FD$\"1;y(4HUHz#F17
$$\"1+]iSS\"Ga\"FD$\"1+p<].R\\BF17$$\"1+D1R*zFq\"FD$\"1FR9T=\"z*=F17$$
\"1++]Peui=FD$\"1[PP\"R\\([9F17$$\"1++v$4sP-#FD$\"1gx'oqi#45F17$$\"1++
+]$)z%=#FD$\"1f%*)yH6b#fFD7$$\"1++D1Y#eM#FD$\"1)=$y?/%>3#FD7$$\"1++]i3
&o]#FD$!1^1$eSH(\\8FD7$$\"1+]i:FPFGFD$!1rH$o=iKl'FD7$$\"1++voX*y9$FD$!
1a0\"fs')Ha*FD7$$\"1*\\(=n,/&=$FD$!1\\N2N6Z2(*FD7$$\"1+]ild=AKFD$!1:)f
p4\\b$)*FD7$$\"1+D1k8LfKFD$!1$pzAljq#**FD7$$\"1++]ipZ'H$FD$!1bh7]E!>)*
*FD7$$\"1+]Pf\"o2P$FD$!1MrC\"=I8)**FD7$$\"1++Dc$f]W$FD$!134q&\\MQ$)*FD
7$$\"1+++]<k$f$FD$!14R+L6o,\"*FD7$$\"1++vVTAUPFD$!1P)=7iw(*z(FD7$$\"1+
+D1E2'*QFD$!1g$ej+5'yeFD7$$\"1++vo5#*\\SFD$!1^1BFvI9MFD7$$\"1++DJ&pP?%
FD$!1X:L]a*ee%F.7$$\"1++v$*zhdVFD$\"1u#fS$)4l#HFD7$$\"1++v$HGn^%FD$\"1
*ehzq*Q.oFD7$$\"1++v$fQen%FD$\"1=s62rk(4\"F17$$\"1++v$*)[\\$[FD$\"1'G;
$)z3_`\"F17$$\"1++v$>fS*\\FD$\"1Q-#Q&G?$)>F17$$\"1+++D#fE:&FD$\"1W41Kh
9ICF17$$\"1,+Dc#f7J&FD$\"1+$)Gvj\\nGF17$$\"1,+](Gf)paFD$\"1a*3Q))*\\&G
$F17$$\"1++v=$f%GcFD$\"1My-DW$[n$F17$$\"1*\\7`%*)f\"z&FD$\"1xh7E;EOSF1
7$$\"1+](=dQZ&fFD$\"1smKW[k\\VF17$$\"1,vV)>yy6'FD$\"1XJS]+f2YF17$$\"1+
++Dy,\"G'FD$\"1zz=J7,/[F17$$\"1,](oH6ZU'FD$\"1MymLdLA\\F17$$\"1++voZSo
lFD$\"1G\"p\"pV9()\\F17$$\"1+vo/:DSmFD$\"1Au#RNq!**\\F17$$\"1+]iS#)47n
FD$\"1-VQ;.D(*\\F17$$\"1*\\il(\\%Ry'FD$\"1e.b)f#p\")\\F17$$\"1++]7<zbo
FD$\"1B853&oC&\\F17$$\"1++vV8KzrFD$\"1s*G$[fecYF17$$\"1,++v4&G](FD$\"1
,o\"fu7c6%F17$$\"1++]7+GlwFD$\"1+@hSh_mPF17$$\"1+++]!4x#yFD$\"1sD_R87w
LF17$$\"1,+](3Q,*zFD$\"1W@&HsHN&HF17$$\"1+++Drc_\")FD$\"1e(>`]N'3DF17$
$\"1*******f(44$)FD$\"13a1j*=&o?F17$$\"1+++v!GcY)FD$\"1jU;sQ\"pi\"F17$
$\"1,++]&e@i)FD$\"1*pon$RT$>\"F17$$\"1+++D!*oy()FD$\"1\\n#eznVx(FD7$$
\"1+v=#pL3#*)FD$\"1#GKrC1ZA%FD7$$\"1+]Pf$yH1*FD$\"1Cu6q@[x&*F.7$$\"1,D
cEI70#*FD$!1z=*HGgz'>FD7$$\"1++v$pnsM*FD$!1(4SZl))**\\%FD7$$\"1+Dc^9H;
&*FD$!1Y?d#Heh$pFD7$$\"1,]P4_J&o*FD$!1*z:MK<-p)FD7$$\"1^7G)3F)p(*FD$!1
5v'H(f'oH*FD7$$\"1+v=n*QV&)*FD$!1l35-tu<(*FD7$$\"1]P4Y3&)Q**FD$!1%G08c
#>]**FD7$$\"1++]siL-5F1$!1*Qvx%ys#***FD7$$\"1++DJL(4.\"F1$!1[/UH.#3t)F
D7$$\"1+++!R5'f5F1$!1Dk#zM$p)Q&FD7$$\"1]PfViEw5F1$!1k<SyL/yDFD7$$\"1+v
=(4AH4\"F1$\"14r'>)GLyyF.7$$\"1]7y]zd46F1$\"1%)G;$)[;EYFD7$$\"1+]P/QBE
6F1$\"1=fr)GhD%))FD7$$\"1]7.dq(49\"F1$\"1ej,>$>2G\"F17$$\"1+vo4.sb6F1$
\"1w])4yZ5p\"F17$$\"1]PMiNYq6F1$\"1T0A&yJt5#F17$$\"1+++:o?&=\"F1$\"1bm
n*zY:_#F17$$\"1]P%)*\\#Q,7F1$\"1ra-Nt9kHF17$$\"1+vo%=ev@\"F1$\"19T**GG
Q%Q$F17$$\"1]7`pQtL7F1$\"1Tmw-_]sPF17$$\"1+]Pa&4*\\7F1$\"1K`5'H6&>TF17
$$\"1++v3dr!G\"F1$\"1e/,;!4'QYF17$$\"1+]7j=_68F1$\"1D[%)Ra$o$\\F17$$\"
1DJq5wb>8F1$\"1vj-P0vu\\F17$$\"1]7GeLfF8F1$\"1o5n\"=6c*\\F17$$\"1v$fe5
HcL\"F1$\"1%eY#yxH**\\F17$$\"1+vV`[mV8F1$\"1YtB\">*y&)\\F17$$\"1]Pf[jt
f8F1$\"1g9M'Q%f2\\F17$$\"1++vVy!eP\"F1$\"1D[(>Q<Gw%F17$$\"1]7G$\\m0R\"
F1$\"1SQJ()e.uXF17$$\"1+D\"G9D`S\"F1$\"1cFYfA`NVF17$$\"1]PM#z$3?9F1$\"
1<++DO\">0%F17$$\"1+](=WU[V\"F1$\"1kq+)ee'GPF17$$\"1](=#R;w]9F1$\"1g&z
,*)[FM$F17$$\"1+DcO3om9F1$\"1vSUR*pm#HF17$$\"1]i!R.+E[\"F1$\"1@g_7.x*[
#F17$$\"1++DJ#>&)\\\"F1$\"1^H(4Rm=/#F17$$\"1]7G.[0::F1$\"1TF(HHidd\"F1
7$$\"1+DJv.fJ:F1$\"1p@0\")4%*>6F17$$\"1]PMZf7[:F1$\"1^R%3t2X&oFD7$$\"1
+]P>:mk:F1$\"1X^')z&H#GGFD7$$\"1++]Z+X$f\"F1$!1MXQ$Q=k8$FD7$$\"1+]iv&Q
Ai\"F1$!1@f-zSC3uFD7$$\"1]i:vZyP;F1$!186y))*3a*))FD7$$\"1+vou4L`;F1$!1
V]U[uNj(*FD7$$\"1DJXuS5h;F1$!1@=!3&=ye**FD7$$\"1](=U<x)o;F1$!1W.'yo*[$
***FD7$$\"1i:5CPws;F1$!1M(e6(H[]**FD7$$\"1vV)RF]mn\"F1$!1lPImZHn)*FD7$
$\"1)=nQ#o`!o\"F1$!10%p$ym.W(*FD7$$\"1++vtLU%o\"F1$!1D!y+2u3e*FD7$$\"1
+]Pk[a;<F1$!12K\\\"*H\"eu'FD7$$\"1+++bjm[<F1$!1:x19g:y9FD7$$\"1+v$4myV
w\"F1$\"1)yBaq9s%=FD7$$\"1+](o'44!y\"F1$\"1eD<PR$*pbFD7$$\"1+D\"GF.ez
\"F1$\"1@DyHY^3'*FD7$$\"1++vyb^6=F1$\"1yZ@!ebuQ\"F17$$\"1]ilU!=n#=F1$
\"1QM!*=#yI\"=F17$$\"1+Dc10#>%=F1$\"11T'fjJDC#F17$$\"1](o/(H7d=F1$\"1/
&y_g9qm#F17$$\"1+]PMaKs=F1$\"1*ou^wFy2$F17$$\"1]Pfy^?*)=F1$\"10t#e3Qx]
$F17$$\"1+D\"G#\\31>F1$\"1%\\V[cp&**QF17$$\"1]7.nY'H#>F1$\"1Sy4giUVUF1
7$$\"1++D6W%)R>F1$\"1kRyhQiIXF17$$\"1+]78)y,(>F1$\"1`0n%\\(G#)[F17$$\"
1+++:K^+?F1$\"1(*H71\\'***\\F17$$\"1++vj;!H.#F1$\"1e$)*3`<p&[F17$$\"1+
+]7,Hl?F1$\"1q80mLs\\WF17$$\"1](=n[k*z?F1$\"1P<MBJf(=%F17$$\"1+v$4')QY
4#F1$\"1%H*GPgo$)QF17$$\"1]i:NKJ4@F1$\"1`^&R(e!Qa$F17$$\"1+]P4w)R7#F1$
\"1\"RkMQVW<$F17$$\"1]iSw0.S@F1$\"1(*)HPEK_u#F17$$\"1+vVVN2c@F1$\"1J3]
zh,*H#F17$$\"1](o/^;@<#F1$\"1[?*=/xf%=F17$$\"1++]x%f\")=#F1$\"1eBy_CX'
R\"F17$$\"1](=#fYD.AF1$\"1zgc$o%ze)*FD7$$\"1+v$4%)\\$=AF1$\"1tC.T3)z&f
FD7$$\"1]ilA]WLAF1$\"1/dZCR!4M#FD7$$\"1+]P/-a[AF1$!1>2;(3%[$>*F.7$$\"1
+]7Ly4!G#F1$!1=0`K`^-jFD7$$\"1+](=Yb;J#F1$!18VV3</w$*FD7$$\"1DJX*zo$>B
F1$!1u*fHdY0u*FD7$$\"1]7.P@3FBF1$!1wyz!R[z%**FD7$$\"1v$4YZ&zMBF1$!1#yU
:d^r***FD7$$\"1+v=7)3DM#F1$!1FIp,i*y))*FD7$$\"1]PM([NzN#F1$!1I!HpN_r>*
FD7$$\"1++]i@OtBF1$!1g[-qGH!*yFD7$$\"1](=<Y7&*Q#F1$!1)))z%3%e@*eFD7$$
\"1+v$4wicS#F1$!1QldL7H&H$FD7$$\"1]i:gI\"=U#F1$!1]6@oaT(f\"F.7$$\"1+]P
fL'zV#F1$\"1$)R10R)>W$FD7$$\"1]7.<!=NX#F1$\"1c??:*))QF(FD7$$\"1+vouE2p
CF1$\"1%HGEa!)y8\"F17$$\"1]PMKti%[#F1$\"1,\\@Br'oc\"F17$$\"1+++!*>=+DF
1$\"1!>+NkX^+#F17$$\"1+D1u))3;DF1$\"1^4PZ4;`CF17$$\"1+]7ed*>`#F1$\"11N
?@-,\"*GF17$$\"1+v=UE!za#F1$\"1e@(3$4()3LF17$$\"1++DE&4Qc#F1$\"1-Hkd*o
tp$F17$$\"1]7G$p%ezDF1$\"15Uqyc1XSF17$$\"1+DJg)f`f#F1$\"1F'[&p%RwM%F17
$$\"1]PMF]86EF1$\"1+I7`UT)f%F17$$\"1+]P%>5pi#F1$\"1#G&*3'o&=z%F17$$\"1
]7`MfSTEF1$\"1x%o(*)*z`\"\\F17$$\"1+vou;!fl#F1$\"1\\dZbFd%)\\F17$$\"1D
cwW&\\Jm#F1$\"1G9\"o&>N)*\\F17$$\"1]P%[T(RqEF1$\"1M)fspX\")*\\F17$$\"1
7G))\\8-uEF1$\"15\\:qdz#*\\F17$$\"1v=#\\GXwn#F1$\"1WW*)Q\\&R)\\F17$$\"
1Q4'*>#p7o#F1$\"1(fSd^L;(\\F17$$\"1+++bJ*[o#F1$\"1dD%G(e%e&\\F17$$\"1+
]7j17=FF1$\"1.!G`F0Tl%F17$$\"1++Dr\"[8v#F1$\"1Dh3ye>%4%F17$$\"1+v$4r2i
w#F1$\"13p9sv$Qx$F17$$\"1+]i]s1\"y#F1$\"1bB!35X(=MF17$$\"1+DJ!zEfz#F1$
\"1jVBg;(e.$F17$$\"1+++Ijy5GF1$\"1GH*fV9Fj#F17$$\"1]Pf)pHm#GF1$\"1nC@K
ZT*=#F17$$\"1+v=nIZUGF1$\"1U\\8y&**=u\"F17$$\"1]7yNkJeGF1$\"1d(*f$[G,I
\"F17$$\"1+]P/)fT(GF1$\"1H1IO7LR()FD7$$\"1+voHRK*)GF1$\"1FVeD5g$*[FD7$
$\"1+++b!)[/HF1$\"1)4Q+w/fN\"FD7$$\"1+DJ!=_'>HF1$!1@Q![a?;!=FD7$$\"1+]
i0j\"[$HF1$!1fDXB**e9XFD7$$\"1+D\"G:3u'HF1$!1lV0gPy&f)FD7$$\"\"$F($!\"
\"F(-%'COLOURG6&%$RGBG$\"*++++\"!\")F(F(-F$6$7[s7$F($\"\")F(7$F3$\"1&o
VgC(yIuF17$F=$\"1[&>c6u^;(F17$FH$\"1(HuG\"[hqoF17$FR$\"1\"4n`6Dl\\'F17
$Ffn$\"1VZ9:s/vgF17$F`o$\"1CS>()pA3cF17$Fjo$\"1\"**H[e-56&F17$F_p$\"1'
[.JYrOg%F17$Fdp$\"15DKkP=0TF17$Fbr$\"1![j^'zsqOF17$F\\s$\"1ZiBoy&4G$F1
7$Ffs$\"1mdlT\\\"4%HF17$F`t$\"15e`.LhyEF17$Fet$\"1!e<;=ujd#F17$Fjt$\"1
fDL'[-x\\#F17$F_u$\"1w3z%\\iEW#F17$Fdu$\"1!GtaPn3T#F17$$\"1+]P4#fL2&FD
$\"1'zvVTeMS#F17$Fiu$\"1JMqw'z9S#F17$$\"1+]iS#f>B&FD$\"1Nzi#fhZS#F17$F
^v$\"1\\<*pY4JT#F17$Fcv$\"1SB6WZ5WCF17$Fhv$\"16KbIjW#\\#F17$Fbw$\"1;q#
z+nhj#F17$F\\x$\"1*HDBk#Q>GF17$Fjy$\"13e$yt#HdJF17$F_z$\"1k^V,XY6LF17$
Fdz$\"18@<0g=7MF17$$\"1,+v$\\lSe(FD$\"1GPr`55FMF17$Fiz$\"1&HH9C`uV$F17
$$\"1++DJX\\YxFD$\"1b7#3i!4VMF17$F^[l$\"12wG_5*QW$F17$$\"1++voN#*3zFD$
\"1]]XmGwRMF17$Fc[l$\"1*[`$\\`kIMF17$$\"1++D1ENr!)FD$\"1[+cZ!4lT$F17$F
h[l$\"1zd\\\"*eN(R$F17$Fb\\l$\"17<Q\"[$fxKF17$F\\]l$\"18Bw&)pU!4$F17$F
`^l$\"1d?r)RC;i#F17$F^`l$\"1&GBhCoz)>F17$Fh`l$\"1Tnik\"GGa\"F17$Fbal$
\"1AZ!y._HP\"F17$F\\bl$\"1@1PTWh(G\"F17$$\"1DJqIagL6F1$\"1!4b^oM4G\"F1
7$Fabl$\"15i(>qQ(y7F17$$\"1v$fLo[$[6F1$\"1>JH-\\,\"G\"F17$Ffbl$\"1E1n.
1t(G\"F17$F[cl$\"1O3;*HXUJ\"F17$F`cl$\"1gVK#e2wN\"F17$Fjcl$\"1WCbTE]1:
F17$Fddl$\"1o>d<%3gr\"F17$F^el$\"1\"3F\"Ha70AF17$F\\gl$\"1!G=*z%zVo#F1
7$Ffgl$\"1F)[w#oaVGF17$F`hl$\"1(z!fY)3]%HF17$$\"1voaS?!GW\"F1$\"12!y9n
$GhHF17$Fehl$\"1:Dfz*=E(HF17$$\"1D1*yB@(e9F1$\"1Lmhu*R*yHF17$Fjhl$\"13
6.E.?!)HF17$$\"1vVBN/ku9F1$\"1M\"zNU#QwHF17$F_il$\"1kWKqu\\nHF17$$\"1D
\"yDjf0\\\"F1$\"1Znx8ae`HF17$Fdil$\"1%=oar9Z$HF17$F^jl$\"1*Hhs$>!e!GF1
7$Fhjl$\"1%Hv>,\"Q0EF17$Fb[m$\"1+&**odhW9#F17$Fj]m$\"1j[]CF**>;F17$F_^
m$\"1T4'z+!R%R\"F17$Fd^m$\"11\"4j#z>F7F17$Fi^m$\"1u>K#[O9<\"F17$F^_m$
\"1n)\\\">_]M6F17$$\"1]P%)>r%zy\"F1$\"13q(z6gL7\"F17$Fc_m$\"1?.i\"f!=<
6F17$$\"1]7yD%fO!=F1$\"1[sOMn*f6\"F17$Fh_m$\"1HP2`8\")>6F17$F]`m$\"1J^
E(4t79\"F17$Fb`m$\"1*)Q4nA(3=\"F17$Fg`m$\"1U>L,LxP7F17$F\\am$\"1TYpCry
58F17$Ffam$\"1S.7\"[^C_\"F17$F`bm$\"1'f5)G_8%y\"F17$Fjbm$\"1m'\\iIcVH#
F17$F_cm$\"10;8wWFSDF17$Fdcm$\"1s]k&e\\vt#F17$Ficm$\"115^(3jd!GF17$F^d
m$\"1Mwf%fB)eGF17$Fcdm$\"1\"*fv)o2d*GF17$Fhdm$\"1PC668q:HF17$$\"1D1*G4
4?8#F1$\"1(orx!oL>HF17$F]em$\"1Ft&pW!y<HF17$$\"1v=#*f?0[@F1$\"1%Ge7pR5
\"HF17$Fbem$\"1T;Na;:**GF17$Fgem$\"1s#R>+H-'GF17$F\\fm$\"1\"z>z9!*=!GF
17$Fffm$\"1>h#\\z7Wk#F17$F`gm$\"1Xl\"*fpwNCF17$Fjgm$\"1gL\"[[L7\">F17$
Fhim$\"1V]nY!G'G9F17$Fbjm$\"1*Q^;6ONC\"F17$F\\[n$\"1TAa.dVG6F17$$\"1DJ
?)oSdW#F1$\"1zy$ez0D6\"F17$Fa[n$\"1)R2c9k85\"F17$$\"1v$feM&HhCF1$\"1x6
2!3q]4\"F17$Ff[n$\"1^ad/pl$4\"F17$$\"1Dc^.+&oZ#F1$\"1W\"eMsJr4\"F17$F[
\\n$\"1,:j,aZ06F17$$\"1v=<hYS#\\#F1$\"1+x3nEk=6F17$F`\\n$\"1-ox`BcO6F1
7$Fj\\n$\"1#HeX*y*oD\"F17$Fd]n$\"16f$e7CQW\"F17$Fh^n$\"1V,G(Rs;%>F17$F
`an$\"1WjJ9.(>U#F17$Fean$\"1\\Bv1l,]EF17$Fjan$\"1;/UY5,:GF17$F_bn$\"1g
E'RU&)Q'GF17$Fdbn$\"19T'yYue*GF17$$\"1](o/-(\\)y#F1$\"1%f*)\\_F`!HF17$
Fibn$\"1Q8L\\/N5HF17$$\"1]i:glN.GF1$\"1BaDj%=4\"HF17$F^cn$\"1@toF'Gq!H
F17$Fccn$\"1&4\\E&3'R)GF17$Fhcn$\"1:&R7a\\7%GF17$F]dn$\"1k[@()Q%)zFF17
$Fbdn$\"1%p.A>46q#F17$Ffen$\"1+(=7[E^F#F17$F`fn$\"1a-z#R2Zs\"F1-Fefn6&
FgfnF(F(Fhfn-%+AXESLABELSG6$Q\"t6\"%!G-%*THICKNESSG6#Fafn-%%VIEWG6$;F(
F`fn%(DEFAULTG" 1 2 0 1 3 2 9 1 4 2 1.000000 45.000000 45.000000 0 }}}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart;" }}}{EXCHG {PARA 0 
"> " 0 "" {MPLTEXT 1 0 32 "ode:=diff(T(t),t)+k*T(t)=k*F(t);" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#>%$odeG/,&-%%diffG6$-%\"TG6#%\"tGF-\"\"\"*&%
\"kGF.F*F.F.*&F0\"\"\"-%\"FGF,F." }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 76 "F:=t->B+A*(Heaviside(t-1)-Heaviside(t-2))-A*(Heavisid
e(t-2)-Heaviside(t-3));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"FGR6#%
\"tG6\"6$%)operatorG%&arrowGF(,(%\"BG\"\"\"*&%\"AGF.,&-%*HeavisideG6#,
&9$F.!\"\"F.F.-F36#,&F6F.!\"#F.F7F.F.*&F0\"\"\",&F8F.-F36#,&F6F.!\"$F.
F7F.F7F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "dsolve(ode)
:Ts:=unapply(rhs(%),t);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#TsGR6#%
\"tG6\"6$%)operatorG%&arrowGF(,2%\"BG\"\"\"*&%\"AGF.-%*HeavisideG6#,&9
$F.!\"\"F.F.F.*(F0\"\"\"F1F8-%$expG6#,&*&%\"kGF.F5F.F6F>F.F.F6*&F0F8-F
26#,&F5F.!\"#F.F.FC*(F0F8F@F8-F:6#,&F=F6F>\"\"#F.FH*&F0F8-F26#,&F5F.!
\"$F.F.F.*(F0F8FJF8-F:6#,&F=F6F>\"\"$F.F6*&-F:6#,$F=F6F.%$_C1GF.F.F(F(
F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "B:=2:A:=4:k:=2:omega:
=3*Pi:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "solve(Ts(0)=3,_C1
): _C1:=%;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$_C1G\"\"\"" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 55 "plot([F(t),Ts(t)],t=0..5,col
or=[red,blue],thickness=3);" }}{PARA 13 "" 1 "" {GLPLOT2D 667 432 432 
{PLOTDATA 2 "6'-%'CURVESG6$7^p7$\"\"!$\"\"#F(7$$\"1LLL3x&)*3\"!#;F)7$$
\"1nm\"H2P\"Q?F.F)7$$\"1LL$eRwX5$F.F)7$$\"1ML$3x%3yTF.F)7$$\"1nm\"z%4
\\Y_F.F)7$$\"1MLeR-/PiF.F)7$$\"1***\\il'pisF.F)7$$\"1MLe*)>VB$)F.F)7$$
\"1nmTg()4_))F.F)7$$\"1++DJbw!Q*F.F)7$$\"1nT&)3\\m_'*F.F)7$$\"1N$ekGkX
#**F.F)7$$\"1c)e'3<be**F.F)7$$\"1w$f38RD***F.F)7$$\"1!*fIbEl-5!#:$\"\"
'F(7$$\"1Ug_(R^g+\"FYFZ7$$\"1Yh'>))[G,\"FYFZ7$$\"1]iSmjk>5FYFZ7$$\"1ek
GN8CL5FYFZ7$$\"1nm;/j$o/\"FYFZ7$$\"1+]7GTt%4\"FYFZ7$$\"1LL3_>jU6FYFZ7$
$\"1++]i^Z]7FYFZ7$$\"1++](=h(e8FYFZ7$$\"1++]P[6j9FYFZ7$$\"1L$e*[z(yb\"
FYFZ7$$\"1nm;a/cq;FYFZ7$$\"1nmm;t,m<FYFZ7$$\"1+]iSj0x=FYFZ7$$\"1Le9;0?
E>FYFZ7$$\"1nmm\"pW`(>FYFZ7$$\"1i:NgX3#)>FYFZ7$$\"1fk.HW#)))>FYFZ7$$\"
12*yLO%>#*>FYFZ7$$\"1a8s(Hkb*>FYFZ7$$\"1-Q1KU$*)*>FYFZ7$$\"1]iSmTI-?FY
$!\"#F(7$$\"1Ugx.Ry:?FYFhr7$$\"1Me9TOEH?FYFhr7$$\"1<a)e6Bi0#FYFhr7$$\"
1+]i!f#=$3#FYFhr7$$\"1++D\"=EX8#FYFhr7$$\"1+](=xpe=#FYFhr7$$\"1nm\"H28
IH#FYFhr7$$\"1n;zpSS\"R#FYFhr7$$\"1LL3_?`(\\#FYFhr7$$\"1M$e*)>pxg#FYFh
r7$$\"1+]Pf4t.FFYFhr7$$\"1MLe*Gst!GFYFhr7$$\"1n;H2\"34'GFYFhr7$$\"1+++
DRW9HFYFhr7$$\"1+Dc,6jSHFYFhr7$$\"1+]7y#=o'HFYFhr7$$\"1]iSm=\"*zHFYFhr
7$$\"1+voaa+$*HFYFhr7$$\"18yv^)yi*HFYFhr7$$\"1D\"G)[Ab**HFYFhr7$$\"1P%
)*ekDG+$FYF)7$$\"1](oH/*41IFYF)7$$\"1v$4r$ek7IFYF)7$$\"1++DJE>>IFYF)7$
$\"1+v$4^n)pIFYF)7$$\"1+]i!RU07$FYF)7$$\"1++v=S2LKFYF)7$$\"1mmm\"p)=ML
FYF)7$$\"1++](=]@W$FYF)7$$\"1L$e*[$z*RNFYF)7$$\"1,+]iC$pk$FYF)7$$\"1m;
H2qcZPFYF)7$$\"1+]7.\"fF&QFYF)7$$\"1mm;/OgbRFYF)7$$\"1+]ilAFjSFYF)7$$
\"1MLL$)*pp;%FYF)7$$\"1ML3xe,tUFYF)7$$\"1n;HdO=yVFYF)7$$\"1,++D>#[Z%FY
F)7$$\"1nmT&G!e&e%FYF)7$$\"1MLL$)Qk%o%FYF)7$$\"1+]iSjE!z%FYF)7$$\"1,]P
40O\"*[FYF)7$$\"\"&F(F)-%'COLOURG6&%$RGBG$\"*++++\"!\")F(F(-F$6$7go7$F
($\"\"$F(7$F,$\"1X?1E$[T!GFY7$F0$\"1BpT'oE_m#FY7$F3$\"1)3<NH_u`#FY7$F6
$\"1M-K$)ogLCFY7$F9$\"1DwEDM=]BFY7$F<$\"1Lyzm$[sG#FY7$F?$\"1>'p?RvRB#F
Y7$FB$\"1U0(y**\\#*=#FY7$FE$\"1H??1:Eq@FY7$FH$\"1Q&*=M#yJ:#FY7$FK$\"1$
>_x&32X@FY7$FN$\"1!Qdje#RP@FY7$F]o$\"1\"o45&QC%G#FY7$Fco$\"1\\eX%R54[#
FY7$Fio$\"12W\"Q#R[%4$FY7$F\\p$\"1,#3#**))=eOFY7$F_p$\"1[8t1#*>9TFY7$F
bp$\"114V'GA%pWFY7$Fep$\"1xG(e'\\nLZFY7$Fhp$\"1=@IYz=*)\\FY7$F[q$\"1yC
itJ'[;&FY7$F^q$\"1<5h'Gy6L&FY7$Faq$\"1%H8PN)y$R&FY7$Fdq$\"1\"zFkLP0X&F
Y7$Fjq$\"1XdAlE:laFY7$Ffr$\"1c6U!R(fUaFY7$F[s$\"1'=^1UHYC&FY7$F^s$\"1L
pmis#>0&FY7$Fas$\"18!f)RQw\"o%FY7$Fds$\"1>n[-2.JVFY7$Fgs$\"1dT7x/=8PFY
7$Fjs$\"1BgEPnibJFY7$$\"1MeRA9WRAFY$\"1&ozX>*zJEFY7$F]t$\"12IGUT>h@FY7
$$\"1nTNr&3AM#FY$\"1^?QlsEr<FY7$F`t$\"1U-u!pyyT\"FY7$$\"1+v$41oWW#FY$
\"12FGI4tt5FY7$Fct$\"1%\\!3WcNUwF.7$$\"1L3_D1l_DFY$\"1Z&*G-S4dZF.7$Fft
$\"1Yw#*=5*H<#F.7$Fit$!1#Qz8jy!*p\"F.7$F\\u$!1R7*oU'>D^F.7$F_u$!1(=q+^
kbj'F.7$Fbu$!1Eu?&zrD*zF.7$Feu$!1q&>1Co_g)F.7$Fhu$!1`$f4'4q'=*F.7$F[v$
!1'eWx<&>m%*F.7$F^v$!1:$eJBl%Q(*F.7$Fav$!1w/jgfU0)*F.7$Fdv$!1SN'=u\\>(
)*F.7$Fgv$!1IXn'HDEr*F.7$Fjv$!13[Q<#Q(=&*F.7$F]w$!1]\\H\"Q^Z8*F.7$F`w$
!1@!*=Q&fdv)F.7$Fcw$!1$[8$G6>%)fF.7$Ffw$!1!>XH*\\vzMF.7$Fiw$\"1#Gbtx?A
D\"F.7$F\\x$\"1@vnnvz%o%F.7$F_x$\"1mCdD/0fwF.7$Fbx$\"1HX6d<7_)*F.7$Fex
$\"1dpNeej!=\"FY7$Fhx$\"1$=zN>7+L\"FY7$F[y$\"11!ek/FrX\"FY7$F^y$\"12KY
6Y0e:FY7$Fay$\"1.aSZHnV;FY7$Fdy$\"1LcwROT5<FY7$Fgy$\"1n&)Hfjvl<FY7$Fjy
$\"1Asq)\\*=5=FY7$F]z$\"1y<qLzaV=FY7$F`z$\"1qVXkXju=FY7$Fcz$\"1mm!o0nr
*=FY7$Ffz$\"1cjFT*[n\">FY7$Fiz$\"1#=QCz))>$>FY7$F\\[l$\"1ZlF65FX>FY-F_
[l6&Fa[lF(F(Fb[l-%*THICKNESSG6#Fj[l-%+AXESLABELSG6$Q\"t6\"%!G-%%VIEWG6
$;F(F\\[l%(DEFAULTG" 1 2 0 1 3 2 9 1 4 2 1.000000 45.000000 45.000000 
0 }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "0 7 0" 
140 }{VIEWOPTS 1 1 0 1 1 1803 }