ortocetntro

C = Intersect(xAxis, yAxis)
D = Point(yAxis)
E = (2.46, 2.18)
c = Line(D, E)
d = Segment(C, D)
distanzaCD = Distance(C, D)
e = OrthogonalLine(D, d)
A = (1.02, 4.6000000000000005)
B = (0.8200000000000001, 3.04)
F = (3.2525925925925923, 3.725185185185185)
poli1, f, a, b = Polygon(A, B, F)
g = OrthogonalLine(A, a)
h = OrthogonalLine(B, b)
i = OrthogonalLine(F, f)
G = Intersect(i, g)
j = true
k = OrthogonalLine(A, i)
H = Intersect(i, k)
l = Segment(H, F)