{VERSION 3 0 "IBM INTEL NT" "3.0" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 0 0 0 0 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 
0 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 }
{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 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Maple Output" 0 11 1 
{CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 3 0 -1 -1 -1 0 0 
0 0 0 0 -1 0 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart:" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "with(plots):with(plottools):" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "x:=cos(t);" }}{PARA 11 "" 1 
"" {XPPMATH 20 "6#>%\"xG-%$cosG6#%\"tG" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 10 "y:=sin(t);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"yG-
%$sinG6#%\"tG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 5 "u:=x;" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"uG-%$cosG6#%\"tG" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 19 "z:=(1-s)*u+s*(1.5);" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%\"zG,&*&,&\"\"\"F(%\"sG!\"\"F(-%$cosG6#%\"tGF(F(F)$\"
#:F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 72 "a:=plot3d([x,y,z],t
=-Pi/2..Pi/2,s=0..1,scaling=constrained,grid=[20,8]):" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "b:=rotate(a,0,0,Pi):" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "c:=display(a,b):" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 40 "d:=reflect(c,[[0,0,0],[1,0,1],[1,1,1]]):
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "e:=display(c,d):" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 42 "f:=reflect(e,[[0,0,0],[1,0,-
1],[1,1,-1]]):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "h:=displa
y(e,f):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 65 "vrml(h,\"f:/data
/chuan/exp99/10/2cyl.wrl\",background_color=white);" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "14 0 0" 0 }{VIEWOPTS 1 1 0 1 
1 1803 }