From: Christian Bauer Date: Tue, 4 Mar 2003 22:08:26 +0000 (+0000) Subject: *** empty log message *** X-Git-Tag: release_1-0-15~42 X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?a=commitdiff_plain;h=af6809f55c95cf6ea6ef80bd1d19637a06f32e5a;p=ginac.git *** empty log message *** --- diff --git a/ginac/indexed.cpp b/ginac/indexed.cpp index d6371104..81230c4d 100644 --- a/ginac/indexed.cpp +++ b/ginac/indexed.cpp @@ -809,7 +809,7 @@ contraction_done: // zero. This detects things like eps.i.j.k * p.j * p.k = 0. if (local_dummy_indices.size() >= 2) { lst dummy_syms; - for (int i=0; i {sym((b/a)^x), 1} return (new lst(replace_with_symbol(power(n_basis.op(1) / n_basis.op(0), -n_exponent), sym_lst, repl_lst), _ex1))->setflag(status_flags::dynallocated); } - - } else { // n_exponent not numeric - - // (a/b)^x -> {sym((a/b)^x, 1} - return (new lst(replace_with_symbol(power(n_basis.op(0) / n_basis.op(1), n_exponent), sym_lst, repl_lst), _ex1))->setflag(status_flags::dynallocated); } } + + // (a/b)^x -> {sym((a/b)^x, 1} + return (new lst(replace_with_symbol(power(n_basis.op(0) / n_basis.op(1), n_exponent), sym_lst, repl_lst), _ex1))->setflag(status_flags::dynallocated); } diff --git a/ginac/tensor.cpp b/ginac/tensor.cpp index f786c4a1..48393665 100644 --- a/ginac/tensor.cpp +++ b/ginac/tensor.cpp @@ -501,8 +501,8 @@ bool tensepsilon::contract_with(exvector::iterator self, exvector::iterator othe // Contraction of two epsilon tensors is a determinant bool variance = is_a(self->op(1)); matrix M(num, num); - for (int i=0; iop(i+1), other->op(j+1), pos_sig); else if (variance)