Problem defining transformation rules
- To: mathgroup@smc.vnet.net
- Subject: [mg12426] Problem defining transformation rules
- From: Joel Cannon <cannon@alpha.centenary.edu>
- Date: Thu, 14 May 1998 11:15:35 -0400
I wish to define a transformation rule in an input file that sets up the
following transformation (makes scalar commute with operator aR):
aR**(a_*ket[m_])->a*aR**ket[m]
However, I have not been able to accomplish this with either
1. ket/: aR**(a_*ket[m_]) := a*aR**ket[m]
I get an error message that says:
TagSetDelayed::"tagpos":
"Tag ket in (aR ** (ket[m_] a_) is too deep for an assigned rule to
be found."
2. ket/: aR**(a_*ket[m_])->a*aR**ket[m]
Can someone help me out? Thanks
cannon@centenary.edu
------------------------------------------------------------------------------
Joel W. Cannon | (318)869-5160 Dept. of
Physics | (318)869-5026 FAX Centenary College of
Louisiana | P. O. Box 41188 |
Shreveport, LA 71134-1188 |