git://www.ginac.de
/
ginac.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
0f617ea
)
fixed a bug in the dummy index symmetrization [Chris Dams]
author
Christian Bauer
<Christian.Bauer@uni-mainz.de>
Thu, 21 Nov 2002 19:22:39 +0000
(19:22 +0000)
committer
Christian Bauer
<Christian.Bauer@uni-mainz.de>
Thu, 21 Nov 2002 19:22:39 +0000
(19:22 +0000)
ginac/indexed.cpp
patch
|
blob
|
history
diff --git
a/ginac/indexed.cpp
b/ginac/indexed.cpp
index a52d6d77dc52b58b3e44f19531faac6ee7cc749e..e32f4c7a103f047cc09a5332665b7ef0e6c91ef8 100644
(file)
--- a/
ginac/indexed.cpp
+++ b/
ginac/indexed.cpp
@@
-820,13
+820,13
@@
public:
symminfo(const ex & symmterm_, const ex & orig_)
{
- if (is_a<mul>(orig_)) {
+ if (is_a<mul>(orig_)
&& is_a<numeric>(orig_.op(orig_.nops()-1))
) {
ex tmp = orig_.op(orig_.nops()-1);
orig = orig_ / tmp;
} else
orig = orig_;
- if (is_a<mul>(symmterm_)) {
+ if (is_a<mul>(symmterm_)
&& is_a<numeric>(symmterm_.op(symmterm_.nops()-1))
) {
coeff = symmterm_.op(symmterm_.nops()-1);
symmterm = symmterm_ / coeff;
} else {