a

a

a

a

b

a

b

a

α

β

γ

δ

a = 5 (slider from 1 to 5)
A = (-20, 0)
B = Point(Circle[A, a])
f = Segment(A, B)
C = Point(Circle[B, a])
g = Segment(B, C)
D = Point(Circle[C, a])
h = Segment(C, D)
E = Point(Circle[D, a])
i = Segment(D, E)
F = (-10, -2)
G = (-6, -2)
c = Circle(F, a)
d = Circle(G, a)
H, I = Intersect(c, d)
α = Angle(D, E, B)
β = Angle(E, B, C)
γ = Angle(B, C, D)
δ = Angle(C, D, E)
b = 10 (slider from 1 to 10)
J = (-10, 0)
K = Point(Circle[J, b])
j = Segment(J, K)
L = Point(Circle[J, a])
k = Segment(J, L)
l = OrthogonalLine(L, k)
m = OrthogonalLine(K, l)
M = Intersect(m, l)
n = Segment(L, M)
p = Segment(M, K)
ε = Angle(L, J, K)
ζ = Angle(J, K, M)
η = Angle(K, M, L)
θ = Angle(M, L, J)