A = (-8, -13)
J = Point(Segment[A, (x(A) + 7, y(A))])
c = Circle(A, J)
g: x = x(A)
K = Intersect(c, g, 1)
E = Intersect(c, g, 2)
L = Point(Segment[E, K])
r: y = y(L)
M, N = Intersect(c, r)
p = CircleArc(A, N, E)
l = Segment(M, L)
I = (-14.168992316565928, -17.54361285990126)
k = Segment(L, N)
β = Angle(E, L, N)
α = Angle(E, L, M)
j = Segment(N, E)
i = Segment(E, M)
e = CircleArc(A, E, M)
h = Segment(L, E)
stap = 5 (slider from 0 to 5, step 1)
f = Segment(M, N)