a

\sqrt[3]{2}\,a

https://www.geogebra.org/haftendorn
Haftendorn, Buch (Springer):
Kurven erkunden und verstehen
Kap 6.3: S. 170
www.kurven-erkunden-und-verstehen.de

Ha 2016

a = 1.5 (slider from 0 to 5, step 0.1)
c = 2 (slider from -5 to 5, step 1)
A: ((2 * c), 0)
f = OrthogonalLine(A, xAxis)
O: (0, 0)
M: (c, 0)
c_1 = Circle(M, A)
B: (0, (-c))
b: (y^(2) * ((2 * c) - x)) = x^(3)
g = Segment(B, A)
P = Intersect(b, g)
h = Line(O, P)
D_1 = Intersect(f, h)
H: (0, a)
m = Line(H, xAxis)
D = Intersect(m, h)
n = OrthogonalLine(D, xAxis)
J = Intersect(n, xAxis)
o: (y(H) * 2^(1 / 3))
p = Segment(D, H)
i = Segment(H, O)
j = Segment(B, (c, c))
C: (x(P), 0)
k = Segment(P, C)
d = false
l = OrthogonalLine(A, xAxis)
q = OrthogonalLine(B, yAxis)
E = Intersect(l, q)
r = Segment(B, E)
s = Segment(A, E)