c

a

c

b

a

b

\overline{FG}= \frac{\overline{DA_1}+\overline{A_1A_2}}{2}- \frac{\overline{A_1A_2}}{2}= \frac{\overline{DA_1}}{2}

\overline{DE}= \frac{\overline{DA_1}}{2}

K = 49 (slider from 0 to 100, step 0.1)
c = 21 (slider from 0 to 100, step 0.1)
γ = 1.3264502315156905 rad (slider from 0 to 3.141592653589793, step 0.017453292519943295)
B = (14.448158792819058, 47.17035324664804)
d = Circle(B, K - c)
D = Point(d)
a = Line(B, D)
a' = Rotate(a, -(γ) / 2.0, D)
e = Circle(B, c)
A_2, A_1 = Intersect(e, a')
a'' = Rotate(a', -(γ) / 2.0, A_1)
C = Intersect(a, a'')
a''_1 = Rotate(a', -(γ) / 2.0, A_2)
H = Intersect(a, a''_1)
poligon1, c_1, a_1, b = Polygon(A_1, B, C)
poligon2, h, a_2, b_1 = Polygon(A_2, B, H)
f = Segment(D, A_2)
g = Segment(D, C)
i = OrthogonalLine(B, f)
j = OrthogonalLine(H, f)
F = Intersect(j, f)
G = Intersect(i, f)
k = OrthogonalLine(C, f)
E = Intersect(k, f)
p = Circle(B, A_1)
A = Point(p)
I = Point(p)
q = CircleArc(B, A, I)
l = Segment(B, G)
m = Segment(H, F)
n = Segment(F, G)
r = Segment(D, E)
poligon3, h_1, f_1, g_1, b_2 = Polygon(H, F, G, B)
poligon4, d_1, c_2, e_1 = Polygon(C, E, D)
s = Segment(C, E)