ComplexevlakReIm
Author: John Val

u = (1, 4)
v = (3, 2)
α = Angle(v, u)
e_1 = (10, 0)
a = OrthogonalLine(Point[v], e_1)
A = (1, 4)
B = (3, 2)
b = OrthogonalLine(B, e_1)
d = OrthogonalLine(A, e_1)
w = Vector(A, B)
O = Point(u)