glstr
Author: Andreas Brinken

k_2

k_1

M_1 = (-2.22, 0.74)
M_2 = (3.08, 0.8)
a_1 = Segment(M_1, M_2)
Radius_{Kreis 1} = 1.9000000000000001 (slider from 0 to 5.316276892713547, step 0.1)
k = Circle(M_1, Radius_{Kreis 1})
A = Intersect(k, a_1, 1.0)
k_3 = Circle(M_2, A)
M = Midpoint(a_1)
e = CircleSector(M, M_2, M_1)
P_1 = Intersect(k, e, 1.0)
P_2 = Intersect(k_3, e, 1.0)
g = Line(P_1, P_2)
Q_1 = Intersect(k, g, 2.0)
Q_2 = Intersect(k_3, g, 2.0)
a = Segment(Q_1, P_1)
b = Segment(P_2, Q_2)
B = Point(k)
C = Point(k_3)