A = (-0.4789877829022963, 2.174636063053907)
B = (-1.82496572487894, 2.0998595107218714)
C = (-0.38551709248725163, 4.698344704260097)
BC = Distance(B, C)
CA = Distance(C, A)
AB = Distance(A, B)
eq3: ((x(C) - (x(A) + x(B) + x(C) + x) / 4)^(2) + (y(C) - (y(A) + y(B) + y(C) + y) / 4)^(2))^(2) = (1 / 16 * ((AB^(2) + (x(A) - x)^(2) + (y(A) - y)^(2) + (x(B) - x)^(2) + (y(B) - y)^(2))^(2) - (12 * ((x(A) * y(B)) - (x(B) * y(A)) + (x(B) * y) - (x * y(B)) + (x * y(A)) - (x(A) * y))^(2))))
AC = Distance(A, C)
eq4: ((x - (x(A) + x(B) + x(C) + x) / 4)^(2) + (y - (y(A) + y(B) + y(C) + y) / 4)^(2))^(2) = (1 / 16 * ((AB^(2) + BC^(2) + CA^(2))^(2) - (48 * Area[A, B, C]^(2))))
D, E, F, H = Intersect(eq3, eq4)
CD = Distance(C, D)
DB = Distance(D, B)
DA = Distance(D, A)
BD = Distance(B, D)
X_{1340} = TriangleCenter(A, B, C, 1340)
X_{1349} = TriangleCenter(A, B, C, 1349)
f = Line(X_{1340}, X_{1349})
G: (A + B + C) / 3