{VERSION 2 3 "APPLE_68K_MAC" "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 "" -1 256 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 }
{CSTYLE "" -1 257 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 }{CSTYLE "" -1 258 
"" 0 1 0 0 0 0 0 1 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 "" 0 256 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 1 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 256 "" 0 "" {TEXT -1 37 "Estimation and Limits --
 Introduction" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" 
{TEXT -1 185 "This worksheet illustrates how Maple can be used with mo
dels like the model in this section for the concentration of Agent Yuc
ky in Clear Lake.  The following cell defines that model.  " }{TEXT 
256 16 "Evaluate it now." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 135 "Fcn := p -> 0.80 * p:\nInitialValu
e := 10:\npollution := \n  proc(n)\n    if n = 1 then InitialValue els
e Fcn(pollution(n - 1)) fi\n  end:\n " }}}{EXCHG {PARA 0 "" 0 "" 
{TEXT -1 75 "The next cell illustrates how Maple can print several yea
rs of the model.  " }{TEXT 257 16 "Evaluate it now." }}{PARA 0 "" 0 "
" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 84 "for k fro
m 1 to 20 \n   do printf(`%4d %10.4fn`, k, pollution(k));\n   print();
\n   od;" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" 
{TEXT -1 69 "The next cell illustrates how Maple can graph the same in
formation.  " }{TEXT 258 15 "Evaluate it now" }{TEXT -1 1 "." }}{PARA 
0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 88 "p
lot([seq([n, pollution(n)], n = 1 .. 20)], \n      year = 1 .. 20, tit
le = `Pollution`);" }}}}{MARK "5 0 0" 45 }{VIEWOPTS 1 1 0 1 1 1803 }