Klein Bottle

Generate a Klein bottle by revolving the figure-eight curve defined by XYKLEIN.

Thanks to C. Henry Edwards, Dept. of Mathematics, Univerity of Georgia, 6/20/93.

ab = [0 2*pi];
rtr = [2 0.5 1];
pq = [40 40];
box = [-3 3 -3 3 -2 2];
vue = [55 60];

tube('xyklein',ab,rtr,pq,box,vue);
shading interp
colormap(pink);