A = (3.513756097560975, 11.265375609756097)
B = (5.96, 10.06)
poly1, a, b, c, d, e, E, D, C = Polygon(B, A, 5)
J = Midpoint(e)
I = Midpoint(d)
H = Midpoint(c)
F_1 = Midpoint(a)
R = Midpoint(b)
poly11, r_1, f_3, j_6, i_2, h_6 = Polygon(R, F_1, J, I, H)
razon = 0.6545084971874737
k = 0.5 (slider from 0 to 0.5, step 0.1)
α = 1.2566370614359172 rad
F = (-2.1478634146341484, 8.096946341463415)
f = Ray(F, A)
g = Ray(F, B)
h = Ray(F, C)
i = Ray(F, D)
j = Ray(F, E)
A' = Point(f)
B' = Point(g)
C' = Point(h)
D' = Point(i)
E' = Point(j)
poly2, n, g_1, k_1, l, m = Polygon(E', A', B', C', D')
G = Midpoint(n)
K = Midpoint(g_1)
L = Midpoint(k_1)
M = Midpoint(l)
O = Midpoint(m)
poly3, g_2, k_2, l_1, m_1, o = Polygon(G, K, L, M, O)
razon2: poly3 / poly2
p = Ray(F, R)
q = Ray(F, F_1)
r = Ray(F, J)
s = Ray(F, I)
t = Ray(F, H)
text1: "razón pentágonos regulares  = " + razon + "
razón pentágonos = " + razon2