O = Intersect(xAxis, yAxis)
Q: (1, 2)
P: (4, 3)
q = Vector(O, Q)
p = Vector(O, P)
f = OrthogonalLine(P, xAxis)
N = Intersect(f, xAxis)
g = Segment(N, P)
a: x(P)
r: (a * q)
R = Point(r)
S = Rotate(Q, 90°)
b: y(P)
s = Vector(O, S)
t: (b * s)
T = Point(t)
u: r + t
U = Point(u)
h = Segment(R, U)
i = Segment(U, T)