Mueve B

v

n

B = (2, 3)
A = (0, 2)
r = Line(A, B)
C = Point(r)
λ_C = AffineRatio(A, B, C)
v = Vector(A, B)
P = (0, -1)
s = Line(P, r)
t = OrthogonalLine(P, r)
C_s = Point(s)
C_t = Point(t)
w = Vector(A, P)
P' = Translate(P, v)
vP = Vector(P, P')
n = OrthogonalVector(v)
P'' = Translate(P, n)
nP = Vector(P, P'')