helix.position=0\n//Parametric surface\nt=parametricSurface\nt.setMinMax=s,0,6.5\nt.setMinMax=t,0,6.5\nt.setEquation=x,((2.5+1.2*cos(s))*cos(t))\nt.setEquation=y,((2.5+1.2*cos(s))*sin(t))\nt.setEquation=z,(sin(s))\nt.setSegmentCount=30 \nt.spawn\n\n// Parametric surface\ncyl=parametricSurface\ncyl.setMinMax=s,-10,10\ncyl.setMinMax=t,0,6.6\ncyl.setEquation=x,(cos(t))\ncyl.setEquation=y,(sin(t))\ncyl.setEquation=z,(.3*s)\ncyl.setSegmentCount=20\ncyl.color=blue\ncyl.spawn\n\n//Parametric sphere\ntip=parametricSurface\ntip.setMinMax=s,0,3.3\ntip.setMinMax=t,0,6.6\ntip.setEquation=x,(cos(t)*sin(s))\ntip.setEquation=y,(sin(t)*sin(s))\ntip.setEquation=z,(cos(s))\ntip.setSegmentCount=30\ntip.color=blue\ntip.spawn\ntip.position=0,0,3\n\n//Parametric sphere\nball=parametricSurface\nball.setMinMax=s,0,3.3\nball.setMinMax=t,0.6.6\nball.setEquation=x,(cos(t)*sin(s))\nball.setEquation=y,(sin(t)*sin(s))\nball.setEquation=z,(cos(s))\nball.setSegmentCount=30\nball.color=blue\nball.spawn\nball.position=1,0,-3\n\n//Vector\nz=vectorDraw\nz.setTail=0,0,0\nz.setHead=0,0,2\nz.color=blue\nz.setRadius=0.25\nz.spawn\n\n//Text\ntxt=text\ntxt.text=Pubic Hair\ntxt.color=blue\ntxt.position=0,0,4.5\n\njohnbarto.bvr