θ

θ

2θ

2θ

θ

α

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

Ha 2016

a = 2
O = Intersect(xAxis, yAxis)
α = 0.9424777960769379 rad (slider from 0 to 6.283185307179586, step °)
A: (a, 0)
A' = Rotate(A, α, O)
f: x = a
g = Ray(O, A')
C = Intersect(g, f)
c = Segment(C, O)
k: (2 * c)
b: ((x^(2) + y^(2)) * (x - a)^(2)) = (k^(2) * x^(2))
h = Line(C, xAxis)
D, E, F, P = Intersect(b, h)
i = Segment(P, O)
Q = Intersect(i, f)
M = Midpoint(Q, P)
j = Segment(C, M)
l = Segment(P, M)
δ = Angle(C, P, M)
ε = Angle(M, C, P)
m = Segment(C, P)
ζ = Angle(C, M, O)
η = Angle(M, O, C)
B = Point(xAxis)
γ = Angle(B, O, M)
B' = Rotate(B, α, O)
β = Angle(B, O, B')
n = Segment(Q, M)
p = Ray(Q, O)
G, H, P' = Intersect(b, p)
q = Segment(Q, P')
d = false