A = Intersect(xAxis, yAxis)
B = (1, 3)
C = Point(xAxis)
D = (2, 3)
a = Segment(A, B)
b = Segment(C, D)
Q = (0.8333, 2.5)
c = OrthogonalLine(Q, b)
E = Intersect(c, b)
F = Point(a)
G = Point(b)
d = Segment(F, G)