{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 26 "u:=[cos(t),sin(t),si
n(t)];" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"uG7%-%$cosG6#%\"tG-%$sin
GF(F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "v:=[cos(t),sin(t),
-sin(t)];" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"vG7%-%$cosG6#%\"tG-%$
sinGF(,$F*!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "w:=expan
d((1-s)*u+s*v);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"wG7%-%$cosG6#%
\"tG-%$sinGF(,&*&F*\"\"\"%\"sGF.!\"#F*F." }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 62 "h:=plot3d(w,s=0..1,t=0..2*Pi,scaling=constrained,colo
r=green):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 80 "h1:=plot3d([w[
1],-w[3],w[2]],s=0..1,t=0..2*Pi,scaling=constrained,color=yellow):" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "with(plots):" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "k:=display(h,h1):" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 16 "with(plottools):" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 64 "vrml(k,\"g:/data/chuan/history/2cyl.wrl\",backgr
ound_color=white);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}
{MARK "0 0 0" 3 }{VIEWOPTS 1 1 0 1 1 1803 }