Construction de la figure par étapes :

a=1 : construction de A et de d
a=2 : construction de B et de d'
a=3 : construction de H 

Déplacer H pour obtenir le point H qui
minimise la distance entre H et d'.

a=4 : construction de H'.

Déplacer H' pour obtenir le point H' qui
minimise la distance entre H' et d.

a=5 Construction des points cherchés L et L'
et des angles ALL' et BL'L

L' = (3, 0, -4)
L = (-3, 3, 5)
A = (-2, 8, 4)
u = (1, 5, -1)
d = Line(A, u)
B = (5, 1, -3)
v = (2, 1, 1)
d' = Line(B, v)
H = Point(d)
distanceHd' = Distance(H, d')
TexteHd': Name[H] + (Name[d']) + " = " + distanceHd'
H' = Point(d')
distanceH'd = Distance(H', d)
b = Segment(L', L)
TexteH'd: Name[H'] + (Name[d]) + " = " + distanceH'd
a = 0 (slider from 0 to 5, step 1)
α = Angle(A, L, L')
β = Angle(B, L', L)