[sci.math] Graph art

rafridri@aftermath.waterloo.edu (Robert A. Fridrich) (08/04/90)

I am compiling a list of 3 dimentional equations which produce
interesting surfaces when plotted.  Just send me your favorite graph
and I'll post the list in about two weeks.

To get things rolling, this is one of the better ones (it produces
three cylinders that intertwine):
c1:= [cos(x)-2*cos(0.4*y),sin(x)-2*sin(0.4*y),y];
c2:= [cos(x)+2*cos(0.4*y),sin(x)+2*sin(0.4*y),y];
c3:= [cos(x)+2*sin(0.4*y),sin(x)-2*cos(0.4*y),y];
c4:= [cos(x)-2*sin(0.4*y),sin(x)+2*cos(0.4*y),y];
plot3d({c1,c2,c3,c4},x=0..2*Pi,y=0..10,grid=[25,15],style=HIDDEN);

Of course this is the MAPLE format, but it can be easily converted.

Thanks in advance,
Robert Fridrich
-- 

Robert Fridrich            	"E' molto pericoloso, signorina."
Hardware Design Lab 	   	"Oh speak it, SPEAK IT!!"
University of Waterloo