A = (19.649545454545432, 33.810909090909156)
B = (-29.932272727272725, -16.13909090909097)
C = (38.672272727272684, -24.545909090909173)
a = Segment(B, C)
b = Segment(C, A)
c = Segment(A, B)
k = Line(A, B)
i = Line(B, C)
j = Line(C, A)
A_2 = Barycenter({A, B, C}, {(2 * a), (-((b * csc(π / 6 - Angle[A, C, B] / 3)))), (-((c * csc(π / 6 - Angle[C, B, A] / 3))))})
B_2 = Barycenter({A, B, C}, {(-((a * csc(π / 6 - Angle[A, C, B] / 3)))), (2 * b), (-((c * csc(π / 6 - Angle[B, A, C] / 3))))})
C_2 = Barycenter({A, B, C}, {(-((a * csc(π / 6 - Angle[C, B, A] / 3)))), (-((b * csc(π / 6 - Angle[B, A, C] / 3)))), (2 * c)})
f = Segment(B_2, C_2)
g = Segment(C_2, A_2)
l = Segment(A_2, B_2)
A_b = Barycenter({A, B, C}, {0, a^(4) - ((2 * a^(2)) * b^(2)) + b^(4) - ((2 * a^(2)) * c^(2)) - ((2 * b^(2)) * c^(2)) + c^(4) - ((sqrt(3) * a^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) - ((sqrt(3) * b^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) + ((sqrt(3) * c^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) + ((((sqrt(3) * a) * b) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) * csc(π / 6 - Angle[A, C, B] / 3)), (-a^(4)) + ((2 * a^(2)) * b^(2)) - b^(4) + ((2 * a^(2)) * c^(2)) + ((2 * b^(2)) * c^(2)) - c^(4) - ((sqrt(3) * a^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) + ((sqrt(3) * b^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) - ((sqrt(3) * c^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) + ((((sqrt(3) * a) * c) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) * csc(π / 6 - Angle[C, B, A] / 3))})
A_c = Barycenter({A, B, C}, {0, a^(4) - ((2 * a^(2)) * b^(2)) + b^(4) - ((2 * a^(2)) * c^(2)) - ((2 * b^(2)) * c^(2)) + c^(4) + ((sqrt(3) * a^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) + ((sqrt(3) * b^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) - ((sqrt(3) * c^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) - ((((sqrt(3) * a) * b) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) * csc(π / 6 - Angle[A, C, B] / 3)), (-a^(4)) + ((2 * a^(2)) * b^(2)) - b^(4) + ((2 * a^(2)) * c^(2)) + ((2 * b^(2)) * c^(2)) - c^(4) + ((sqrt(3) * a^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) - ((sqrt(3) * b^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) + ((sqrt(3) * c^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) - ((((sqrt(3) * a) * c) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) * csc(π / 6 - Angle[C, B, A] / 3))})
h = Segment(A_b, A_c)
m = Segment(A_c, A_2)
n = Segment(A_2, A_b)
B_c = Barycenter({A, B, C}, {(-a^(4)) + ((2 * a^(2)) * b^(2)) - b^(4) + ((2 * a^(2)) * c^(2)) + ((2 * b^(2)) * c^(2)) - c^(4) - ((sqrt(3) * a^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) - ((sqrt(3) * b^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) + ((sqrt(3) * c^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) + ((((sqrt(3) * a) * b) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) * csc(π / 6 - Angle[A, C, B] / 3)), 0, a^(4) - ((2 * a^(2)) * b^(2)) + b^(4) - ((2 * a^(2)) * c^(2)) - ((2 * b^(2)) * c^(2)) + c^(4) + ((sqrt(3) * a^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) - ((sqrt(3) * b^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) - ((sqrt(3) * c^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) + ((((sqrt(3) * b) * c) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) * csc(π / 6 - Angle[B, A, C] / 3))})
B_a = Barycenter({A, B, C}, {(-a^(4)) + ((2 * a^(2)) * b^(2)) - b^(4) + ((2 * a^(2)) * c^(2)) + ((2 * b^(2)) * c^(2)) - c^(4) + ((sqrt(3) * a^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) + ((sqrt(3) * b^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) - ((sqrt(3) * c^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) - ((((sqrt(3) * a) * b) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) * csc(π / 6 - Angle[A, C, B] / 3)), 0, a^(4) - ((2 * a^(2)) * b^(2)) + b^(4) - ((2 * a^(2)) * c^(2)) - ((2 * b^(2)) * c^(2)) + c^(4) - ((sqrt(3) * a^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) + ((sqrt(3) * b^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) + ((sqrt(3) * c^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) - ((((sqrt(3) * b) * c) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) * csc(π / 6 - Angle[B, A, C] / 3))})
p = Segment(B_2, B_c)
q = Segment(B_c, B_a)
r = Segment(B_a, B_2)
C_a = Barycenter({A, B, C}, {a^(4) - ((2 * a^(2)) * b^(2)) + b^(4) - ((2 * a^(2)) * c^(2)) - ((2 * b^(2)) * c^(2)) + c^(4) - ((sqrt(3) * a^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) + ((sqrt(3) * b^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) - ((sqrt(3) * c^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) + ((((sqrt(3) * a) * c) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) * csc(π / 6 - Angle[C, B, A] / 3)), (-a^(4)) + ((2 * a^(2)) * b^(2)) - b^(4) + ((2 * a^(2)) * c^(2)) + ((2 * b^(2)) * c^(2)) - c^(4) + ((sqrt(3) * a^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) - ((sqrt(3) * b^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) - ((sqrt(3) * c^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) + ((((sqrt(3) * b) * c) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) * csc(π / 6 - Angle[B, A, C] / 3)), 0})
C_b = Barycenter({A, B, C}, {a^(4) - ((2 * a^(2)) * b^(2)) + b^(4) - ((2 * a^(2)) * c^(2)) - ((2 * b^(2)) * c^(2)) + c^(4) + ((sqrt(3) * a^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) - ((sqrt(3) * b^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) + ((sqrt(3) * c^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) - ((((sqrt(3) * a) * c) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) * csc(π / 6 - Angle[C, B, A] / 3)), (-a^(4)) + ((2 * a^(2)) * b^(2)) - b^(4) + ((2 * a^(2)) * c^(2)) + ((2 * b^(2)) * c^(2)) - c^(4) - ((sqrt(3) * a^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) + ((sqrt(3) * b^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) + ((sqrt(3) * c^(2)) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) - ((((sqrt(3) * b) * c) * sqrt(((((a + b - c) * (a - b + c)) * ((-a) + b + c)) * (a + b + c)))) * csc(π / 6 - Angle[B, A, C] / 3)), 0})
s = Segment(C_2, C_a)
t = Segment(C_a, C_b)
d = Segment(C_b, C_2)
D = Midpoint(C_a, B_a)
E = Midpoint(C_b, A_b)
F = Midpoint(A_c, B_c)
e = Segment(E, F)
f_1 = Segment(F, D)
g_1 = Segment(D, E)
h_1 = Segment(C_a, B_a)
i_1 = Segment(B_c, A_c)
j_1 = Segment(A_b, C_b)
k_1 = Line(D, A)
l_1 = Line(E, B)
m_1 = Line(F, C)
X16840 = Intersect(l_1, m_1)
text1 = Text("A_2B_2C_2 is the 2nd Morley Adjunct triangle
A_2A_bA_c form an equilateral triangle on BC
D is the midpoint of BaCa.")