...tes arbitrary commutation relations. As part of this code is the following module that performs the associative part of the algebra:
Associate[list__] := Module[{ps, ic, l2, mlist},
...tes arbitrary commutation relations. As part of this code is the following module that performs the associative part of the algebra:
Associate[list__] := Module[{ps, ic, l2, mlist},
... <tt>NormalOrder</tt> (see [[Blog:Notes/NormalOrder module|here]] for this module itself).
Here is a module that does the commutation directly, computing <math>:[elem_1,elem_2]:</math