A = (4.285, 6.5925)
B = (14.82, 1.6641666666666641)
C = (23.455, 13.1025)
poly1, c, a, b = Polygon(A, B, C)
d = LineBisector(c)
e = LineBisector(b)
E = Intersect(d, e)
D = Midpoint(A, C)
I = (38.70659321461448, 16.936061513898558)
distanceIE = Distance(I, E)
distanceID = Distance(I, D)
TexteIH: "" + (LaTeX[Name[I] + (Name[D])]) + " \, = \, " + (LaTeX[distanceID]) + ""
TexteIG: "" + (LaTeX[Name[I] + (Name[E])]) + " \, = \, " + (LaTeX[distanceIE]) + ""