A = (-3.6460056667740095, 1.4077361615025754)
B = (5.654576727709949, 6.327052469328796)
C = (0.3765602724380606, -3.4603372681171227)
t1, c, a, b = Polygon(A, B, C)
D_{1} = Midpoint(b)
E_{1} = Midpoint(c)
F_{1} = Midpoint(a)
f = OrthogonalLine(D_{1}, b)
g = OrthogonalLine(E_{1}, c)
h = OrthogonalLine(F_{1}, a)
D = Intersect(f, g)
i = Segment(D_{1}, B)
j = Segment(F_{1}, A)
k = Segment(C, E_{1})
E = Intersect(i, j)
l = OrthogonalLine(B, b)
m = OrthogonalLine(C, c)
n = OrthogonalLine(A, a)
F = Intersect(l, m)
p = Line(F, D)
kaugusDE = Distance(D, E)
Midpoint(D, E)
TekstDE: Name[D] + (Name[E]) + " = " + kaugusDE
kaugusEF = Distance(E, F)
Midpoint(E, F)
TekstEF: Name[E] + (Name[F]) + " = " + kaugusEF