{VERSION 6 0 "IBM INTEL NT" "6.0" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 1 12 255 0 0 1 2 1 2 
2 1 2 0 0 0 1 }{CSTYLE "2D Output" -1 20 "Times" 1 12 0 0 255 1 2 2 2 
2 2 2 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 2 0 2 0 2 2 0 1 }{PSTYLE "Map
le Output" -1 11 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 2 0 2 0 2 2 0 1 }{PSTYLE "Left Justified Maple Ou
tput" -1 12 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 2 0 2 0 2 2 0 1 }{PSTYLE "Maple Plot" -1 13 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 2 0 2 0 
2 2 0 1 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "with(plots);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#7en%(animateG%*animate3dG%-animatecurv
eG%&arrowG%-changecoordsG%,complexplotG%.complexplot3dG%*conformalG%,c
onformal3dG%,contourplotG%.contourplot3dG%*coordplotG%,coordplot3dG%,d
ensityplotG%(displayG%-dualaxisplotG%*fieldplotG%,fieldplot3dG%)gradpl
otG%+gradplot3dG%,graphplot3dG%-implicitplotG%/implicitplot3dG%(inequa
lG%,interactiveG%2interactiveparamsG%.intersectplotG%-listcontplotG%/l
istcontplot3dG%0listdensityplotG%)listplotG%+listplot3dG%+loglogplotG%
(logplotG%+matrixplotG%)multipleG%(odeplotG%'paretoG%,plotcompareG%*po
intplotG%,pointplot3dG%*polarplotG%,polygonplotG%.polygonplot3dG%4poly
hedra_supportedG%.polyhedraplotG%*rootlocusG%,semilogplotG%*setcolorsG
%+setoptionsG%-setoptions3dG%+spacecurveG%1sparsematrixplotG%)surfdata
G%)textplotG%+textplot3dG%)tubeplotG" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 75 "plot3d(
[sqrt(x^2+y^2),4],x=-10..10,y=-10..10,axes=normal,color=[red,blue]);" 
}}{PARA 13 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 203 "g1:=implicitplot3d([z=x^2+y^2,z=7,z=9],x=0..3,y=0..3,z=0..18,
axes=normal,color=[red,green,yellow]):\ng2:=implicitplot3d((x-2)^2+(y-
2)^2=1/4,x=0..3,y=0..3,z=0..18,color=blue,numpoints=400):\ndisplay(g1,
g2);" }}{PARA 13 "" 0 "" {TEXT -1 0 "" }}{PARA 13 "" 0 "" {TEXT -1 0 "
" }}{PARA 13 "" 0 "" {TEXT -1 0 "" }}{PARA 13 "" 0 "" {TEXT -1 0 "" }}
{PARA 13 "" 0 "" {TEXT -1 0 "" }}{PARA 13 "" 0 "" {TEXT -1 0 "" }}
{PARA 13 "" 0 "" {TEXT -1 0 "" }}{PARA 13 "" 0 "" {TEXT -1 0 "" }}
{PARA 13 "" 0 "" {TEXT -1 0 "" }}{PARA 13 "" 0 "" {TEXT -1 0 "" }}
{PARA 13 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}
{PARA 13 "" 0 "" {TEXT -1 0 "" }}{PARA 13 "" 1 "" {TEXT -1 0 "" }}}
{EXCHG {PARA 0 "" 0 "" {TEXT -1 12 "#12 page 877" }{MPLTEXT 1 0 0 "" }
}{PARA 0 "> " 0 "" {MPLTEXT 1 0 57 "\nplot3d(6*x^3*y/(2*x^4+y^4),x=-1.
.1,y=-1..1,axes=normal);" }}{PARA 13 "" 1 "" {TEXT -1 0 "" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 63 "f:=(x,y)->6*x^3*y/(2*x^4+y^4);\nfor
 n to 10 do f(0,0+(.1/n)) od;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#f*6$%
\"xG%\"yG6\"6$%)operatorG%&arrowGF',$*(9$\"\"$9%\"\"\",&*$F-\"\"%\"\"#
*$F/F3F0!\"\"\"\"'F'F'F'" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"\"!F$" 
}}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"\"!F$" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#$\"\"!F$" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"\"!F$" }
}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"\"!F$" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#$\"\"!F$" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"\"!F$" }
}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"\"!F$" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#$\"\"!F$" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"\"!F$" }
}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 68 "f:=(x,y)->6*x^3*y/(2*x^4+y
^4);\nfor n to 10 do f(0+.1/n,0+(.1/n)) od;" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#f*6$%\"xG%\"yG6\"6$%)operatorG%&arrowGF',$*(9$\"\"$9%\"
\"\",&*$F-\"\"%\"\"#*$F/F3F0!\"\"\"\"'F'F'F'" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#$\"+++++?!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+++
++?!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+++++?!\"*" }}{PARA 11 "
" 1 "" {XPPMATH 20 "6#$\"+++++?!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6
#$\"+++++?!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+********>!\"*" }
}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+++++?!\"*" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#$\"+++++?!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+++
++?!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+++++?!\"*" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 157 "g1:=plot3d((x^2+4*y^2)/30,x=-4..4,
y=-4..4,color=blue,scaling=constrained):\ng2:=implicitplot3d(\{x=1,y=1
\},x=-4..4,y=-4..4,z=0..2,axes=normal):\ndisplay(g1,g2);\n" }}{PARA 
13 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 174 
"g1:=implicitplot3d(z=-(x^2+y^2/8)+7,x=-4..4,y=-6..6,z=2..7,color=blue
,scaling=constrained):\ng2:=implicitplot3d(\{x=1,y=1\},x=-4..4,y=-4..4
,z=2..6,axes=normal):\ndisplay(g1,g2);\n" }}{PARA 13 "" 1 "" {TEXT -1 
0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 172 "g1:=implicitplot3d(
z=(x^2-y^2)+3,x=-4..4,y=-6..6,z=-2..7,color=blue,scaling=constrained):
\ng2:=implicitplot3d(\{x=0,y=0\},x=-4..4,y=-4..4,z=2..4,axes=normal):
\ndisplay(g1,g2);\n" }}{PARA 13 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "11" 0 }{VIEWOPTS 1 1 0 15 10 
1804 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }