A = (-2.12, 5.04)
B = (3.86, 5.0200000000000005)
C = (5.14, 2.18)
D = (-3.42, 2.22)
poli1, a, b, c, d = Polygon(A, B, C, D)
e = OrthogonalLine(A, c)
f = OrthogonalLine(B, c)
g = Line(A, B)
h = Line(C, D)
E = Intersect(c, h)
F = Intersect(h, e)
G = Intersect(f, h)
distanzaAF = Distance(A, F)
TestoAF: "\overline{" + (Name[A]) + (Name[F]) + "} \, = \, " + distanzaAF
distanzaBG = Distance(B, G)
TestoBG: "\overline{" + (Name[B]) + (Name[G]) + "} \, = \, " + distanzaBG
distanzaFD = Distance(F, D)
TestoFD: "\overline{" + (Name[F]) + (Name[D]) + "} \, = \, " + distanzaFD
distanzaGC = Distance(G, C)
TestoGC: "\overline{" + (Name[G]) + (Name[C]) + "} \, = \, " + distanzaGC