Esfera = Point(xAxis)
A = Intersect(zAxis, xAxis)
a = Sphere(A, Esfera)
O = (-4.3689108537980825, -1.6441367725556404, 5.185447686219224)
f = Segment(A, O)
b = OrthogonalPlane(A, f)
g = IntersectPath(b, xOyPlane)
B, C = Intersect(g, a)
c = Plane(O, A, C)
d = IntersectPath(c, a)
h, i = Tangent(O, d)
D, E = Intersect(h, d)
e = Plane(D, b)
k = IntersectPath(e, a)
F = Intersect(f, e)
j = Segment(F, O)
l, p, m = Cone(k, j)