T614

A = (3, -1)
B = (-1, 1)
u = Vector(A, B)
v = Translate(Vector[(1 / 2 * u)], (4, 1))
w: (-u)
a = Translate(w, (-3, 1))