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 0 0 255
parameter p 0 3.14 20
parameter q 0 6.28 20
parameter r 0 1 1
variable x cos(p)*q
variable y sin(q)*p
variable z cos(q)*sin(p)*p*q
generateSurface