dimension in dirac gamma contractions was miscalculated

diff --git a/ginac/clifford.cpp b/ginac/clifford.cpp
index 352ee194e99e001271900ee23952dec8cd5d271f..b6dd31ef9d09e7765ba36fec1be0c5b0fd7c1a6c 100644 (file)
--- a/ginac/clifford.cpp
+++ b/ginac/clifford.cpp
@@ -211,7 +211,7 @@ bool diracgamma::contract_with(exvector::iterator self, exvector::iterator other
 
        ex dim = ex_to<idx>(self->op(1)).get_dim();
        if (other->nops() > 1)
-               dim = minimal_dim(dim, ex_to<idx>(self->op(1)).get_dim());
+               dim = minimal_dim(dim, ex_to<idx>(other->op(1)).get_dim());
 
        if (is_a<clifford>(*other)) {