{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 "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 0 1 }{CSTYLE "Hyperlink" -1 17 "" 0 1 0 128 128 1 2 0 1 0 0 0 0 0 0 1 }{CSTYLE "2D Comment" 2 18 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 1 } {PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 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 "Heading 2" -1 256 1 {CSTYLE "" -1 -1 "Times" 1 14 0 0 0 1 2 1 2 2 2 2 1 1 1 1 }3 1 0 0 8 2 1 0 1 0 2 2 0 1 }{PSTYLE "Heading 2" -1 257 1 {CSTYLE "" -1 -1 "Ti mes" 1 14 0 0 0 1 2 1 2 2 2 2 1 1 1 1 }1 1 0 0 8 2 1 0 1 0 2 2 0 1 }} {SECT 0 {PARA 256 "" 0 "" {TEXT -1 16 "2D Visualization" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "restart;\nwith(plots):" }}}{SECT 1 {PARA 257 "" 0 "" {TEXT -1 18 "General Parameters" }}{EXCHG {PARA 0 " " 0 "" {TEXT -1 125 "Set some options for all plots. You can change th ese to your liking (or simply change the settings for each individual \+ plot)." }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 61 "setoptions3d(labels=[`x`, `y`,`z`], shading=zhue, axes=frame):" }}}}{SECT 1 {PARA 257 "" 0 "" {TEXT -1 22 "Definition of Function" }}{PARA 0 "" 0 "" {TEXT -1 113 "I n this worksheet we are interested in exploring Maple's capabilities \+ for visualizing the graph of the function " }{XPPEDIT 18 0 "z=f(x,y)" "6#/%\"zG-%\"fG6$%\"xG%\"yG" }{TEXT -1 1 "." }}{EXCHG {PARA 0 "" 0 "" {TEXT -1 46 "Define some functions and a rectangular domain" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 328 "f := (x,y) -> sin(x^2*y)*cos(x*y^2);\nxf := x=-Pi/2..Pi/2:\nyf := y=-Pi/2..Pi/2:\ng := (x,y) -> exp(-x^2)*(y^2 +1);\nxg := x=-4..4:\nyg := y=-4..4:\nh := (x,y) -> 3/4*exp(-((9*x-2)^ 2+(9*y-2)^2)/4) + 3/4*exp(-(9*x+1)^2/49-(9*y+1)^2/10) + 1/2*exp(-((9*x -7)^2+(9*y-3)^2)/4) - 1/5*exp(-((9*x-4)^2+(9*y-7)^2));\nxh := x=0..1: \nyh := y=0..1:\n\n" }}}}{SECT 1 {PARA 257 "" 0 "" {TEXT -1 12 "Level \+ Curves" }}{EXCHG {PARA 0 "" 0 "" {TEXT -1 61 "The easiest way to obtai n level curves is to use the command " }{HYPERLNK 17 "contourplot" 2 " contourplot" "" }{TEXT -1 1 "." }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 200 " contourplot(f(x,y), xf, yf, contours=10, thickness=2, axes=boxed);\nco ntourplot(g(x,y), xg, yg, contours=15, thickness=2, axes=boxed);\ncont ourplot(h(x,y), xh, yh, contours=25, thickness=2, axes=boxed);" }}}} {SECT 1 {PARA 257 "" 0 "" {TEXT -1 23 "Contour Lines and Color" }} {EXCHG {PARA 0 "" 0 "" {TEXT -1 13 "The commands " }{HYPERLNK 17 "cont ourplot3d" 2 "contourplot3d" "" }{TEXT -1 88 " and the plot3d command \+ with option style=contour are equivalent. We'll use plot3d here." }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 194 "plot3d(f(x,y), xf, yf, style=conto ur, thickness=2, contours=15);\nplot3d(g(x,y), xg, yg, style=contour, \+ thickness=2, contours=15);\nplot3d(h(x,y), xh, yh, style=contour, thic kness=2, contours=25);" }}}}{SECT 1 {PARA 257 "" 0 "" {TEXT -1 15 "Sha ded 3D-Plots" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 128 "plot3d(f(x, y), xf, yf, style=patchnogrid);\nplot3d(g(x,y), xg, yg, style=patchnog rid);\nplot3d(h(x,y), xh, yh, style=patchnogrid);" }}}{EXCHG {PARA 0 " " 0 "" {TEXT -1 28 "Or with some fancier options" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 234 "plot3d(f(x,y), xf, yf, style=patchnogrid, color=gold , lightmodel=light4, grid=[60,60]);\nplot3d(g(x,y), xg, yg, style=patc hcontour, color=red, lightmodel=light1);\nplot3d(h(x,y), xh, yh, style =patch, gridstyle=triangular, grid=[30,30]);" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "6" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }