Working with Dot[..] or NonCommutativeMultiply[..]
- To: mathgroup at smc.vnet.net
- Subject: [mg6360] Working with Dot[..] or NonCommutativeMultiply[..]
- From: sergio at scisun.sci.ccny.cuny.edu (Sergio Rojas)
- Date: Thu, 13 Mar 1997 01:20:21 -0500 (EST)
- Organization: City College Of New York - Science
- Sender: owner-wri-mathgroup at wolfram.com
Hello guys,
Given:
f = a*x1 + b*x2 ;
g = c*y1 ;
where x1, x2, and y1 have non commutative product. The mathematica
output for:
Distribute[Dot[f,g,f]] (* Distribute[NonCommutativeMultiply[f,g,f]] *)
is:
Out[79]= (a x1) . (c y1) . (a x1) + (a x1) . (c y1) . (b x2) +
> (b x2) . (c y1) . (a x1) + (b x2) . (c y1) . (b x2)
How, using mathematica, Out[79] can be written in the form:
a^2*c*(x1.y1.x1) + a*b*c*((x1.y1.x2) + (x2.y1.x1)) + b^2*c(x2.y1.x2)
Regards,
Sergio
e-mail: sergio at scisun.sci.ccny.cuny.edu