wireMath20010101
besides the header, coordinates, color, parameter, variable, and generateSurface lines, all other lines are comments.
link http://organic.chemistry.utep.edu
coordinates off
color 255 0 255
parameter p 0 6.28 30
parameter q 0 6.28 30
parameter r 0 1 1
variable x cos(q)*abs(sin(0.5*q))*cos(p)
variable y cos(q)*abs(sin(0.5*q))*sin(p)
variable z 1.5*cos(q)
generateSurface