{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 }{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 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 82 "x:=(u,v)->(R+r*cos(v ))*cos(u):\ny:=(u,v)->(R+r*cos(v))*sin(u):\nz:=(u,v)->r*sin(v):\n" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 164 "R:=1:r:=1.5:plot3d([x,y,z],-Pi..Pi ,0..2*Pi,style=patchnogrid,scaling=constrained,lightmodel =light2,grid =[100,100],orientation=[163,30],view=[-0.5..4,-4..4,-4..4]);" }{TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "0 1 0 " 164 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }