1/25/13

plot3d-Moebius-band

maxima maxima_plot3d-Moebius-band

plot3d-Moebius-band

plot3d ([
 cos(x)*(3 + y*cos(x/2)), 
 sin(x)*(3 + y*cos(x/2)),
 y*sin(x/2)], 
 [x, -%pi, %pi], [y, -1, 1],
 ['grid, 50, 15]);


maxima maxima_plot3d-Moebius-band