//IntersectingPlanes.bvr\n\n//Parametricsurface\nM=parametricSurface\nM.setMinMax=t,0,6.28318\nM.setMinMax=s,-1,1\nM.setEquation=x,((3+s*cos(t/2))*cos(t))\nM.setEquation=y,((3+s*cos(t/2))*sin(t))\nM.setEquation=z,(s*sin(t/2))\nM.setSegmentCount=20\nM.color=magenta\nM.spawn\n\n//ParametricCurve\nC=parametricCurve\nC.setMinMax=t,0,13\nC.setEquation=x,(3*cos(t)-(1/5)*sin(t/2)*cos(t))\nC.setEquation=y,(3*sin(t)-(1/5)*sin(t/2)*sin(t))\nC.setEquation=z,((1/5)*cos(t/2))\nC.setSegmentCount=200\nC.setThickness=0.2\nC.color=blue\nC.spawn