A = (0.06, 1.2)
B = (10.38, -0.7)
d = Line(A, B)
C = (9.62, 4.6)
d' = Line(A, C)
M = Point(d)
f = OrthogonalLine(M, d')
M_1 = Intersect(f, d')
g = OrthogonalLine(M_1, d)
M_2 = Intersect(d, g)
h = OrthogonalLine(M_2, d')
M_3 = Intersect(h, d')
i = OrthogonalLine(M_3, d)
M_4 = Intersect(d, i)
j = PolyLine(M, M_1, M_2, M_3, M_4)
Pointj_1 = Point(j)
Pointj = Point(j)
texte1: "L = " + j + ""
distanceAM = Distance(A, M)
Midpoint(A, M)
TexteAM: Name[A] + (Name[M]) + " = " + distanceAM
α = Angle(d, d')