{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 }{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 Plot
" 0 13 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 0 0 -1 
-1 -1 0 0 0 0 0 0 -1 0 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 688 "#Klein kancs\363 (S
zab\363 J\363zsef modellje, BGYTF, Ny\355regyh\341za)\nrestart: with(p
lots):with(plottools):\n         teteje   := [(2.5+1.5*cos(v))*cos(u),
 \n                      (2.5+1.5*cos(v))*sin(u),\n                   \+
    -2.5*sin(v)]:\n         kozepe   := [(2.5+1.5*cos(v))*cos(u), \n  \+
                    (2.5+1.5*cos(v))*sin(u),\n                       3
*v -6*Pi ]:\n         fogantyu := [ 2 - 2*cos(v) + sin(u), \n         \+
             cos(u), 3*v -6*Pi ]:\n         alja     := [2 +(2+cos(u))
*cos(v), \n                      sin(u),\n                      -3*Pi+
(2+cos(u))*sin(v)]:\n  palack:=plot3d( \{teteje,kozepe,fogantyu,alja\}
,\n           u=0..2*Pi,v=Pi..2*Pi,grid=[19,11],\nscaling=CONSTRAINED)
:" }{TEXT -1 0 "" }}}{PARA 13 "" 1 "" {TEXT -1 0 "" }}{EXCHG {PARA 0 "
> " 0 "" {MPLTEXT 1 0 7 "palack;" }{TEXT -1 0 "" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 172 "vrml(display3d(palack,color=COLOR(RGB,0.6,0.5
,0),\nstyle=PATCHNOGRID),`palack.wrl`,\nbackground_color=COLOR(RGB,0,1
,1), shininess=0.5, specular_color=COLOR(RGB,0.5,0.5,0.5));" }}}}
{MARK "3 0 0" 133 }{VIEWOPTS 1 1 0 1 1 1803 }