A = (-6.899160036933367, -14.966482059744704)
B = (5.295220363253596, -15.134294634059204)
poly1, a, b, c, d, e, f, g, C, D, E, F, G = Polygon(A, B, 7)
h = CircleArc(E, A, B)
k = CircleArc(F, B, C)
p = CircleArc(G, C, D)
q = CircleArc(A, D, E)
r = CircleArc(B, E, F)
s = CircleArc(C, F, G)
t = CircleArc(D, G, A)
i = OrthogonalLine(A, d)
j = OrthogonalLine(B, e)
H = Intersect(i, j)
α = 0 rad (slider from 0 to 6.283185307179586, step 1*°)
E' = Rotate(E, α, H)
β = Angle(E, H, E')
l = Segment(E', H)
I = Intersect(r, l, 1)
K = Intersect(t, l, 1)
L = Intersect(h, l, 1)
M = Intersect(k, l, 1)
N = Intersect(p, l, 1)
O = Intersect(q, l, 1)
m = Line(E', B)
n = OrthogonalLine(I, m)
c_1 = Line(B, n)
A' = Rotate(A, α, H)
γ = Angle(A, H, A')
a_1 = Segment(H, A')
J = Intersect(k, a_1, 1)
b_1 = Line(F, J)
d_1 = OrthogonalLine(J, b_1)
e_1 = Line(F, d_1)
D' = Rotate(D, α, H)
δ = Angle(D, H, D')
f_1 = Segment(D', H)
P = Intersect(s, f_1, 1)
g_1 = Line(P, C)
h_1 = OrthogonalLine(P, g_1)
i_1 = Line(C, h_1)
G' = Rotate(G, α, H)
ε = Angle(G, H, G')
j_1 = Line(H, G')
Q = Intersect(p, j_1, 1)
k_1 = Line(G, Q)
l_1 = OrthogonalLine(Q, k_1)
m_1 = Line(G, l_1)
C' = Rotate(C, α, H)
ζ = Angle(C, H, C')
n_1 = Segment(H, C')
R = Intersect(t, n_1, 1)
p_1 = Line(R, D)
q_1 = OrthogonalLine(R, p_1)
r_1 = Line(D, q_1)
F' = Rotate(F, α, H)
η = Angle(F, H, F')
s_1 = Segment(F', H)
S = Intersect(q, s_1, 1)
t_1 = Line(S, A)
a_2 = OrthogonalLine(S, t_1)
b_2 = Line(A, a_2)
B' = Rotate(B, α, H)
θ = Angle(B, H, B')
c_2 = Segment(H, B')
T = Intersect(h, c_2, 1)
d_2 = Line(T, E)
e_2 = OrthogonalLine(T, d_2)
f_2 = Line(E, e_2)
U = (-14.65080654820242, -16.066255403175806)
V = (12.993194588357591, -16.066255403175806)
B'_1 = Rotate(G, α, H)
ι = Angle(B, H, B'_1)
g_2 = Segment(H, B'_1)
W = Intersect(p, g_2, 1)
h_2 = Line(W, G)
i_2 = OrthogonalLine(W, h_2)
j_2 = Line(G, i_2)