Return to Answer

deleted 5 characters in body

Source Link

edited Oct 2, 2018 at 17:29

With the teaching assistants help, we were able to procure the following form for noncommutative expand, which works (when applied as a replacement):

noncomexpand := {x_^n_x_^{n_?IntegerQ} /; \[Not] ConstQ[x] \[And]&& n > 0 :> CenterDot @@ ConstantArray[x, n]};

Hope this helps!

With the teaching assistants help, we were able to procure the following form for noncommutative expand, which works (when applied as a replacement):

noncomexpand := {x_^n_?IntegerQ /; \[Not] ConstQ[x] \[And] n > 0 :> CenterDot @@ ConstantArray[x, n]};

Hope this helps!

With the teaching assistants help, we were able to procure the following form for noncommutative expand, which works (when applied as a replacement):

noncomexpand:={x_^{n_?IntegerQ} /; \[Not] ConstQ[x] && n > 0 :> CenterDot @@ ConstantArray[x, n]}

Hope this helps!

Source Link

created Oct 2, 2018 at 17:23

With the teaching assistants help, we were able to procure the following form for noncommutative expand, which works (when applied as a replacement):

noncomexpand := {x_^n_?IntegerQ /; \[Not] ConstQ[x] \[And] n > 0 :> CenterDot @@ ConstantArray[x, n]};

Hope this helps!