A: (-1, 2)
B: (5, 3)
f = Segment(A, B)
C = Midpoint(f)
g = OrthogonalLine(C, f)
D = Point(g)
α = Angle(B, C, D)
E = (3, 4)
h = OrthogonalLine(E, f)
t1, b, a, e = Polygon(A, E, B)
β = Angle(B, A, E)
γ = Angle(A, E, B)
δ = Angle(E, B, A)
F = Intersect(h, f)
distanceAC = Distance(A, C)
TexteAC: Name[A] + (Name[C]) + " = " + distanceAC
distanceAF = Distance(A, F)
Midpoint(A, F)
TexteAF: Name[A] + (Name[F]) + " = " + distanceAF