{VERSION 2 3 "SUN SPARC SOLARIS" "2.3" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 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 }}
{SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT -1 10 "This week:" }}{PARA 0 "" 
0 "" {TEXT -1 26 "3.1  Mathematical modeling" }}{PARA 0 "" 0 "" {TEXT 
-1 40 "3.2  Compartmental analysis    1, 12, 25" }}{PARA 0 "" 0 "" 
{TEXT -1 47 "3.3  Heating and cooling of buildings  4, 6, 11" }}{PARA 
0 "" 0 "" {TEXT -1 22 "3.4  Mechanics   7, 18" }}{PARA 0 "" 0 "" 
{TEXT -1 37 "3.5  Improved Euler method  8, 10, 20" }}{PARA 0 "" 0 "" 
{TEXT -1 45 "3.6  Runge-Kutta  5, 7, 9, 20, dsolve/numeric" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "d10:=diff(x(t),t)=a-b*x(t);" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "with(DEtools);" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "?dfieldplot" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 11 "a:=10;b:=5;" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 11 "?dfieldplot" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 127 "dfieldplot(diff(y(x),x)=1/2*(-x-(x^2+4*y(x))^(1/2)),y(x),x=-3..
3,y=-3..2,\\\ntitle=`Restricted domain`,color=1/2*(-x-(x^2+4*y)));" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 73 "dfieldplot(diff(x(t),t)=a-b
*x(t), x(t),t=0..3,x=0..4,\ntitle=`p.99, #10`);" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "0 2 0" 3 }{VIEWOPTS 1 1 0 2 1 
1805 }