{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 255 0 0 1 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 }{CSTYLE "" -1 259 "" 0 1 0 0 0 
0 0 1 0 0 0 0 0 0 0 }{CSTYLE "" -1 260 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 
0 }{CSTYLE "" -1 261 "" 0 1 255 0 0 1 0 1 0 0 0 0 0 0 0 }{PSTYLE "Norm
al" -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 12 "Optimization" }}{PARA 0 
"" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 21 "The Maple procedu
re  " }{TEXT 256 8 "maximize" }{TEXT -1 108 "  can be used to find the
 maximum value of a function on an interval.  The cell below illustrat
es its use.  " }{TEXT 257 26 "Evaluate the next cell now" }{TEXT -1 1 
"." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 107 "demand := p -> 1000 - 500 * p:\n\nT := p -> demand(p
) * (p - c):\nc := 0.20:\n\nmaximize(T(p), \{p\}, \{p = 0..2\});" }}}
{EXCHG {PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 22 "No
tice the procedure  " }{TEXT 258 8 "maximize" }{TEXT -1 267 "  uses th
ree arguments.  The first argument is the function to be maximized. Th
e second argument is a list whose elements are the variables over whic
h we have control.  The third argument is a list giving the range of e
ach of the variables over which we have control." }}{PARA 0 "" 0 "" 
{TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 15 "The procedure  " }{TEXT 
259 8 "maximize" }{TEXT -1 98 "  returns the maximum value of the func
tion on the specified interval.  We can use the procedure  " }{TEXT 
260 5 "solve" }{TEXT -1 106 "  to find the appropriate values of the v
ariables over which we have control as shown in the cell below.  " }
{TEXT 261 26 "Evaluate the next cell now" }{TEXT -1 1 "." }}{PARA 0 "
" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "solv
e(T(p)=405, p);" }}}}{MARK "3 0 0" 18 }{VIEWOPTS 1 1 0 1 1 1803 }