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