Αθανασιος Γεωργακοπουλος

Α = (1.8, 4.96)
Β = (1.98, -3.86)
a = Segment(Α, Β)
b = OrthogonalLine(Α, a)
c = OrthogonalLine(Β, a)
Γ = Point(b)
d = Line(Γ, a)
Δ = Intersect(c, d)
e = Segment(Α, Γ)
f = Segment(Γ, Δ)
g = Segment(Δ, Β)