Maybe this will get you started:
(%i1) load(vect)$
(%i2) r : [r1,r2,r3]$
(%i3) w : [w1,w2,w3]$
(%i4) v : [v1,v2,v3]$
(%i5) express(v - w ~ r);
(%o5) [r2*w3-r3*w2+v1,-r1*w3+r3*w1+v2,r1*w2-r2*w1+v3]
(%i6) algsys(%,[w1,w2,w3,r3]);
(%o6)
[[w1=%r1,w2=(%r1*r2-v3)/r1,w3=-(%r1*(r2*v2+r1*v1)-v2*v3)/(r1*v3),r3=-(r2*v2+r1*v1)/v3]]
If r1 or v3 vanishes, that's another case.
Barton
-----maxima-bounces at math.utexas.edu wrote: -----
>To: maxima at math.utexas.edu
>From: "Devrim Erdem" <devrim.erdem at gmail.com>
>Sent by: maxima-bounces at math.utexas.edu
>Date: 01/20/2007 09:48AM
>Subject: Solving a Cross Product
>
>Hello,
>
>
>I have tried to solve a cross product equation
>with maxima. I have tried:
>
>
>w: []
>
>r: []
>
>v=cross_product(w,r)
>
>
>solve( [v], [w] )
>
>
>This didn't get me anywhere. Could anyone give me
>some hints (search keywords will also be fine, I
>was lost in the manual ).
>
>
>Thanks in advance,
>
>
>Devrim
>
>
>
>_______________________________________________
>Maxima mailing list
>Maxima at math.utexas.edu
>http://www.math.utexas.edu/mailman/listinfo/maxim
>a