Let A(1, 2, 3) be a point; d1: (x-2)/2 = (y+2)/(-1) = (z - 3) / 1
d2: (x--)/(-1) = (y - 1)/2 = (z + 1) / 1.
Write the equation of the line passing through the point A, perpendicular to d1 and cut d2.
This is my code
restart;with(LinearAlgebra): with(geom3d):
A:=<1,2,3>:
B:=[2*t+2,-t-2,t+3]:
M:=<-m+1, 2*m+1,m-1>:
line(d1,B,t):
a:=convert(ParallelVector(d1),Vector):
v:=M-A:
solve(DotProduct(v,a,conjugate=false)=0,{m}): assign(%):
'M'=M: N:=<x,y,z>:
[seq(N[i]=(A + (M-A)*t)[i],i=1..3)];
Please comment to me. Thank you very much.
