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