//Johnbarto.bvr\n\n//Parametric surface\nsphere=parametricSurface\nsphere.setMinMax=s,0,3.3\nsphere.setMinMax=t,0,6.6\nsphere.setEquation=x,(4*cos(t)*sin(s))\nsphere.setEquation=y,(4*sin(t)*sin(s))\nsphere.setEquation=z,(4*cos(s))\nsphere.setSegmentCount=30\nsphere.color=blue\nsphere.spawn\n\n//Parametric plane\nplane=parametricSurface\nplane.setMinMax=s,-5,5\nplane.setMinMax=t,-5,5\nplane.setEquation=x,(3)\nplane.setEquation=y,(t)\nplane.setEquation=z,(s)\nplane.setSegmentCount=30\nplane.color=green\nplane.spawn\n\n//Parametric curve\nline=parametricCurve\nline.setMinMax=t,0,6.6\nline.setEquation=x,(3)\nline.setEquation=y,(2.5*sin(t))\nline.setEquation=z,(2.5*cos(t))\nline.setSegmentCount=30\nline.setThickness=0.3\nline.color=magenta\nline.spawn\n