GRAPH3D.BOX := true
GRAPH3D.TRANSPARENCY := 0.5
GRAPH3D.STEPSU := 40
GRAPH3D.STEPSV := 20
GRAPH3D.MINIMUMU := 0
GRAPH3D.MAXIMUMU := 4*PI
GRAPH3D.MINIMUMV := 0
GRAPH3D.MAXIMUMV := PI
GRAPH3D( ( SPHERICAL(.2*U ,U*sin(time/4),V) ) )