Section delicate.
Variable a : Point.
Variable l : Line.
Variable H : ConLn l (ort (ort l a) a).
Let t : Twolines := Twol l (ort (ort l a) a) H.
Let b : Point := pt t.

Theorem thm8_10 :
forall (l : Line) (a : Point), EqLn (par l a) (ort (ort l a) a).