Moebius-band (Maple)

M�bius-band

Hieronder staat een implementatie van de M�bius-band in Maple V.
Anders dan bij de Rhino-afbeelding is er hier inderdaad sprake van een oppervlak.

> restart: 
> with(plots): 
> xc := 6+x*cos(1/2*y): 
> yc := y: 
> zc := x*sin(1/2*y): 
> moebius := 
    plot3d([xc,yc,zc], x=-Pi..Pi, y=0..2*Pi,
    coords=cylindrical, 
    style=patchnogrid, grid=[60,60],
    orientation=[180,-120], 
    lightmodel=light4, shading=zhue, scaling=constrained): 
> display(moebius);

[ geen bewegend beeld, helaas ]

[moebius3.htm] laatste wijziging op: 18-01-18