X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?p=ginac.git;a=blobdiff_plain;f=ginac%2Fmatrix.cpp;h=46d7a64cd9faa2330cca7a035e9782c2cb334da6;hp=eaf4468a33742248ea252add319d5a522e6bc5d3;hb=bf82f5b1d41738936afe763e1fa6aa347c81ba2c;hpb=729d30ae80fa9fdcdbafd7a29e8671083130f69c diff --git a/ginac/matrix.cpp b/ginac/matrix.cpp index eaf4468a..46d7a64c 100644 --- a/ginac/matrix.cpp +++ b/ginac/matrix.cpp @@ -1418,11 +1418,11 @@ int matrix::pivot(unsigned ro, unsigned co, bool symbolic) ++k; } else { // search largest element in column co beginning at row ro - GINAC_ASSERT(is_a(this->m[k*col+co])); + GINAC_ASSERT(is_exactly_a(this->m[k*col+co])); unsigned kmax = k+1; numeric mmax = abs(ex_to(m[kmax*col+co])); while (kmax(this->m[kmax*col+co])); + GINAC_ASSERT(is_exactly_a(this->m[kmax*col+co])); numeric tmp = ex_to(this->m[kmax*col+co]); if (abs(tmp) > mmax) { mmax = tmp;