https://www.geogebra.org/haftendorn
Haftendorn, Buch (Springer):
Kurven erkunden und verstehen
Kap 4.4.6.4: S. 129

Ha 2016

O = (0.018519456434863014, -0.006666666666665158)
M = (0.638519409234529, -2.0466666666666677)
c = Circle(M, O)
H = Point(c)
G = Point(c)
p = CircleArc(M, G, H)
k = 0.2
a = 4
b = 7
d = Circle(O, (k * a))
Q = Point(p)
e = Circle(Q, (k * b))
A_1, A = Intersect(d, e)
f = Line(O, A)
g = Line(A, Q)
h = Circle(O, ((1 - k) * a))
D, D_1 = Intersect(h, f)
s = Circle(A, b)
B_1, B = Intersect(s, g)
i = Line(O, Q)
j = Line(D, B)
q = Circle(D, b)
r = Circle(B, a)
C, E = Intersect(r, q)
l = Segment(A, D)
m = Segment(D, C)
n = Segment(C, B)
s_1 = Segment(B, A)
P = Intersect(m, i)
F = Point(c)
t = Segment(D, B)
a_1 = Segment(A, C)
b_1 = Segment(Q, M)
o = false