A = (-1.7, -1.84)
B = (3.96, 2.9)
C = (-1.62, 4.46)
poli1, c, a, b = Polygon(A, B, C)
D = Midpoint(c)
E = Midpoint(a)
d = Segment(E, A)
e = Segment(C, D)
G = Intersect(d, e)
f = OrthogonalLine(A, a)
g = OrthogonalLine(C, c)
H = Intersect(f, g)
h = LineBisector(a)
i = LineBisector(c)
O = Intersect(h, i)
j = Line(H, G)
distanzaGO = Distance(G, O)
TestoGO: "\overline{" + (Name[G]) + (Name[O]) + "} \, = \, " + distanzaGO
distanzaHG = Distance(H, G)
TestoHG: "\overline{" + (Name[H]) + (Name[G]) + "} \, = \, " + distanzaHG