Changeset 13036 for issm/trunk-jpl/src/c/shared/Matrix/MatrixUtils.cpp
- Timestamp:
- 08/14/12 16:58:21 (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
TabularUnified issm/trunk-jpl/src/c/shared/Matrix/MatrixUtils.cpp ¶
r12493 r13036 36 36 if (!itrnb) { 37 37 if (nrowb != idimb) { 38 _error 2_("Matrix A and B inner vectors not equal size.");38 _error_("Matrix A and B inner vectors not equal size."); 39 39 } 40 40 idimc=ncolb; … … 42 42 else { 43 43 if (ncolb != idimb) { 44 _error 2_("Matrix A and B inner vectors not equal size.");44 _error_("Matrix A and B inner vectors not equal size."); 45 45 } 46 46 idimc=nrowb; … … 49 49 if (!itrnc) { 50 50 if (nrowc != idimc) { 51 _error 2_("Matrix B and C inner vectors not equal size.");51 _error_("Matrix B and C inner vectors not equal size."); 52 52 } 53 53 idimd=ncolc; … … 55 55 else { 56 56 if (ncolc != idimc) { 57 _error 2_("Matrix B and C inner vectors not equal size.");57 _error_("Matrix B and C inner vectors not equal size."); 58 58 } 59 59 idimd=nrowc; … … 124 124 125 125 if (ntrma != ntrmb) { 126 _error 2_("Matrix A and B inner vectors not equal size");126 _error_("Matrix A and B inner vectors not equal size"); 127 127 noerr=0; 128 128 return noerr; … … 175 175 176 176 if (!b && nvec) { 177 _error 2_("No right-hand side for nvec=" << nvec << ".");177 _error_("No right-hand side for nvec=" << nvec << "."); 178 178 noerr=0; 179 179 return noerr; … … 214 214 xDelete<int>(pivrc2); 215 215 xDelete<int>(pindx); 216 _error 2_("Pivot " << pivot << " less than machine epsilon");216 _error_("Pivot " << pivot << " less than machine epsilon"); 217 217 noerr=0; 218 218 return noerr; … … 349 349 /*Compute determinant*/ 350 350 Matrix2x2Determinant(&det,A); 351 if (fabs(det) < DBL_EPSILON) _error 2_("Determinant smaller that machine epsilon");351 if (fabs(det) < DBL_EPSILON) _error_("Determinant smaller that machine epsilon"); 352 352 353 353 /*Compute invert*/ … … 374 374 /*Compute determinant*/ 375 375 Matrix3x3Determinant(&det,A); 376 if (fabs(det) < DBL_EPSILON) _error 2_("Determinant smaller that machine epsilon");376 if (fabs(det) < DBL_EPSILON) _error_("Determinant smaller that machine epsilon"); 377 377 378 378 /*Compute invert*/
Note:
See TracChangeset
for help on using the changeset viewer.