{VERSION 5 0 "DEC ALPHA UNIX" "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 }{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 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "with(plots):" }}}
{EXCHG {PARA 0 "" 0 "" {TEXT -1 0 "" }{TEXT -1 47 "First, consider thi
s plot of the two cylinders." }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 123 "im
plicitplot3d(\{x^2 + z^2 = 7,y^2 + z^2 = 7\}, x=0..sqrt(7), y=0..sqrt(
7), z=0..sqrt(7),style=PATCHNOGRID, grid=[21,21,21]);" }}}{EXCHG 
{PARA 0 "" 0 "" {TEXT -1 0 "" }{TEXT -1 169 "Since the ``wings'' comin
g out of the top of the plot are not part of the bounding surface, the
y should be deleted to see the actual region whose volume you are seek
ing." }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 139 "implicitplot3d(max(x^2 + z
^2 - 7,y^2 + z^2 - 7), x=0..sqrt(7), y=0..sqrt(7), z=0..sqrt(7), grid=
[21,21,21],style=PATCHCONTOUR,axes=normal);" }}}}{MARK "2 0 1" 169 }
{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }