The plot3d example is taken from Maple Help. c1 := [cos(x)-2*cos(.4*y), sin(x)-2*sin(.4*y), y]; c2 := [cos(x)+2*cos(.4*y), sin(x)+2*sin(.4*y), y]; c3 := [cos(x)+2*sin(.4*y), sin(x)-2*cos(.4*y), y]; c4 := [cos(x)-2*sin(.4*y), sin(x)+2*cos(.4*y), y]; opts:=grid = [25, 15], style = patch, color = [default, cyan, yellow], transparency = .5, plotlist: plot3d([c1, c2, c3], x = 0 .. 2*Pi, y = 0 .. 10, opts);