#---------------------------------------------------------------
#
#      Sample code
#                ----------- The torus
#
#---------------------------------------------------------------

X(x,y) = cos(y) * (10.0 + 6.0 * cos(x))
TorusX(x,y) = ( X(x,y) <= 12.0? X(x,y): 12.0);
TorusY(x,y) = sin(y) * (10.0 + 6.0 * cos(x))	
TorusZ(x,y) = 6.0*sin(x)

torus = surf{[TorusX(x,y),TorusY(x,y),TorusZ(x,y)]
	[x= -pi:pi][y= -pi:pi][samp=30:60]};

#---------------------------------------------------------------
plot torus;
#---------------------------------------------------------------

