{VERSION 5 0 "IBM INTEL NT" "5.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 "" -1 256 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 1 }
{CSTYLE "" -1 257 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 1 }{CSTYLE "" -1 
258 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 1 }{CSTYLE "" -1 259 "" 0 1 0 0 
0 0 0 1 0 0 0 0 0 0 0 1 }{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Tim
es" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }
{PSTYLE "Normal" -1 256 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 1 2 
2 2 2 1 1 1 1 }3 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Normal" -1 257 1 
{CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 1 0 0 0 
0 1 0 1 0 2 2 0 1 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "with(plots);" }}
{PARA 256 "" 0 "" {TEXT -1 8 "Surfaces" }}{PARA 0 "" 0 "" {TEXT -1 0 "
" }}{PARA 0 "" 0 "" {TEXT -1 41 "The cell below illustrates how the Ma
ple " }{TEXT 256 6 "plot3d" }{TEXT -1 53 " procedure can be used to st
udy functions of the form" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }{TEXT 257 
10 "z = f(x, y" }{TEXT -1 1 ")" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 105 "plot3d(exp(-(x^2 + y^2)), x=-2..2, y=-2..2, axes=boxed);\nplo
t3d(x^2 + y^2, x=-2..2, y=-2..2, axes=boxed);" }{TEXT -1 0 "" }}}
{EXCHG {PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 50 "Th
e cell below introduces several options for the " }{TEXT 258 6 "plot3d
" }{TEXT -1 57 " procedure that can help understand functions of the f
orm" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 256 "" 0 "" {TEXT -1 11 "
z = f(x, y)" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT 
-1 49 "The most dramatic of these options is the option " }{TEXT 259 
23 "color=exp(-(x^2 + y^2))" }{TEXT -1 54 "  that colors each patch on
 the surface by its height." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 129 "plot3d(exp(-(x^2 + y^2)), x
=-2..2, y=-2..2, \n       color=exp(-(x^2+y^2)), style=patchnogrid,\n \+
      grid =[50, 50], axes=boxed);" }{TEXT -1 0 "" }}}{EXCHG {PARA 0 "
> " 0 "" {MPLTEXT 1 0 130 "plot3d(exp(-(x^2 + y^2)), x=-2..2, y=-2..2,
 \n       color=exp(-(x^2+y^2)), style=patchcontour,\n       grid =[50
, 50], axes=boxed);" }{TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 124 "plot3d(exp(-(x^2 + y^2)), x=-2..2, y=-2..2, \n      \+
 color=exp(-(x^2+y^2)), style=hidden,\n       grid =[50, 50], axes=box
ed);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 125 "plot3d(exp(-(x^2 +
 y^2)), x=-2..2, y=-2..2, \n       color=exp(-(x^2+y^2)), style=contou
r,\n       grid =[50, 50], axes=boxed);" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 147 "plot3d(exp(-(x^2 + y^2)), x=-2..2, y=-2..2, \n      \+
 color=exp(-(x^2+y^2)),  shading=zgrayscale,lightmodel=none,\n       g
rid =[50, 50], axes=boxed);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
143 "plot3d(exp(-(x^2 + y^2)), x=-2..2, y=-2..2, \n       color=exp(-(
x^2+y^2)),  shading=none,lightmodel=light1,\n       grid =[50, 50], ax
es=boxed);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 92 "contourplot(e
xp(-(x^2 + y^2)), x=-2..2, y=-2..2,contours=30,coloring=[red,blue],axe
s=boxed);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 75 "densityplot(exp(-(x^2 + y^2)), x=-2
..2, y=-2..2,numpoints=1600,axes=boxed);" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 91 "densityplot(exp(-(x^2 + y^2)), x=-2..2, y=-2..2,numpo
ints=1600,axes=boxed, colorstyle=HUE);" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 55 "animate(exp(-(x^2 + t^2)), x=-2..2, t=-2..2,frames=50
);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 63 "animate(sin(x*t), x=-
10..10, t=1..2, frames=50, numpoints=100);" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 63 "plot3d(sin(x*t), x=-10..10, t=1..2, grid=[50,100], \+
axes=boxed);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 86 "animate3d(c
os(t*x)*sin(t*y), x=-Pi..Pi, y=-Pi..Pi, t=1..2,  frames=50, numpoints=
900);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 73 "plot3d(exp(-(x^2 +
 y^2)), x=-2..2, y=-2..2, axes=boxed, title=\"A Plot\");\n" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 106 "plot3d(exp(-(x^2 + y^2)), x=-2..2,
 y=-2..2, axes=boxed, title=\"A Plot\", titlefont=[HELVETICA, BOLD, 24
]);\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "fieldplot([y*cos(x
*y), x*cos(x*y)], x=-1..1, y=-1..1);" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 0 "" }}}}{MARK "21" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }
{PAGENUMBERS 0 1 2 33 1 1 }