E = (4.96, 2.68)
D = (5.76, -0.58)
C = (1.5, -2.12)
B = (-0.9, 2.24)
A = (3.04, 4.58)
F: (A + B + C + D + E) / 5.0
t = 0 (slider from 0 to 0.999, step 0.01)
z = If(x < 0.0, 0.0, If[x > 1.0, 1.0, x])
a_1 = Line(B, A)
b_1 = Line(B, C)
c = Line(C, D)
d_1 = Line(D, E)
e_1 = Line(E, A)
polígono1, a, d, e, f, g_1 = Polygon(A, B, C, D, E)
ζ = Angle(C, B, A)
η = Angle(D, C, B)
θ = Angle(E, D, C)
ι = Angle(A, E, D)
κ = Angle(B, A, E)
G: A + z(t) * (F - A)
H: B + z(t) * (F - B)
I: C + z(t) * (F - C)
J: D + z(t) * (F - D)
K: E + z(t) * (F - E)
polígono2, g, h, i, j, k = Polygon(G, H, I, J, K)
H' = Mirror(H, G)
I' = Mirror(I, H)
J' = Mirror(J, I)
K' = Mirror(K, J)
G' = Mirror(G, K)
λ = Angle(K, G, H')
μ = Angle(G, H, I')
ν = Angle(H, I, J')
ξ = Angle(I, J, K')
ο = Angle(J, K, G')
λ1 = CircleSector(G, G + (K - G) / abs(K - G) * 0.6, H')
μ1 = CircleSector(H, H + (G - H) / abs(G - H) * 0.6, I')
ν1 = CircleSector(I, I + (H - I) / abs(H - I) * 0.6, J')
ξ1 = CircleSector(J, J + (I - J) / abs(I - J) * 0.6, K')
ο1 = CircleSector(K, K + (J - K) / abs(J - K) * 0.6, G')