A = (-5.9383245684722334, 2.9377898196746326)
C = (-1.588825868834104, 3.2484682982202133)
B = (-6.607478214570405, 7.072203418781205)
poly1, c, a, b = Polygon(A, B, C)
F = Point(c)
E = Point(a)
P = Point(c)
R = Point(a)
S = Point(b)
poly8, s_3, r_2, e_1 = Polygon(R, E, S)
poly7, s_2, p_2, f_1 = Polygon(P, F, S)
poly3, s_1, p_1, r_1 = Polygon(P, R, S)
A' = (-0.3867391403077425, 4.393198999938162)
d = Line(A, A')
f = Line(B, d)
i = Line(S, f)
h = Line(P, f)
g = Line(R, f)
e = Line(C, d)
q = AngularBisector(e, f)
B' = Point(f)
C' = Point(e)
poly2, c', a', b' = Polygon(A', B', C')
S' = Intersect(b', i)
P' = Intersect(c', h)
R' = Intersect(a', g)
poly4, s', p', r' = Polygon(P', R', S')
razón: (poly3 + poly7 + poly8) / poly1
text1: "razón = " + razón
k = Line(F, f)
l = Line(E, k)
G = Intersect(c', k)
K = Intersect(a', l)
poly9, s'_1, r'_1, k_1 = Polygon(R', K, S')
poly10, s'_2, p'_1, g_1 = Polygon(P', G, S')