A = Intersect(zAxis, xAxis)
B = Point(xAxis)
a = Sphere(A, B)
t = 7.28 (slider from 0 to (6 * π), step 0.01)
P: (cos(t)^(2), (cos(t) * sin(t)), sin(t))
S: ((cos(t) * abs(cos(t))), (sin(t) * abs(cos(t))), sin(t))
D: ((cos(t) * abs(cos((3 * t)))), (sin(t) * abs(cos((3 * t)))), sin((3 * t)))
W: ((cos(t) * abs(cos(t / 3))), (sin(t) * abs(cos(t / 3))), sin(t / 3))