a = Line((1, 3, 4), Vector[(1, -2, 3)])
b = Line((8, 1, -3), Vector[(-7, 2, -5)])
u = Vector((1, -2, 3))
v = Vector((-7, 2, -5))
α = Angle(u, v)
A = Intersect(a, xOyPlane)
B = Intersect(b, xOyPlane)
siirtovektori = Vector((x(A) - x(B), y(A) - y(B), 0))
b' = Translate(b, siirtovektori)