// HARRISON.bvr\n\n// Parametric Surface\na=parametricSurface\na.setMinMax=s,0,3.14\na.setMinMax=t,0,6.6\na.color=green\na.setEquation=x, (4*cos(t)*sin(s))\na.setEquation=y, (4*sin(t)*sin(s))\na.setEquation=z, (4*cos(s))\na.setSegmentCount=20\na.setThickness=.2\na.spawn\n\n// Parametric Surface\nb=parametricSurface\nb.setMinMax=s, -4,4\nb.setMinMax=t, -4,4\nb.setEquation=x, (3)\nb.setEquation=y, (s)\nb.setEquation=z, (t)\nb.setSegmentCount=20\nb.setThickness=1\nb.color=blue\nb.spawn\n\n// Parametric Curve\nc=parametricCurve\nc.setMinMax=t, 0, 6.6\nc.color=red\nc.setSegmentCount=20\nc.setThickness=.2\nc.setEquation=x, (3)\nc.setEquation=y, (2.6458*cos(t))\nc.setEquation=z, (2.6458*sin(t))\nc.spawn\n\n\n