Changed the PivTol in SMPreorder with PivRel
This commit is contained in:
parent
0b7dc09fc1
commit
1110019ff2
|
|
@ -573,7 +573,7 @@ SMPcReorder (SMPmatrix *Matrix, double PivTol, double PivRel, int *NumSwaps)
|
||||||
{
|
{
|
||||||
if (Matrix->CKTkluMODE)
|
if (Matrix->CKTkluMODE)
|
||||||
{
|
{
|
||||||
Matrix->SMPkluMatrix->KLUmatrixCommon->tol = PivTol ;
|
Matrix->SMPkluMatrix->KLUmatrixCommon->tol = PivRel ;
|
||||||
|
|
||||||
if (Matrix->SMPkluMatrix->KLUmatrixNumeric != NULL) {
|
if (Matrix->SMPkluMatrix->KLUmatrixNumeric != NULL) {
|
||||||
klu_free_numeric (&(Matrix->SMPkluMatrix->KLUmatrixNumeric), Matrix->SMPkluMatrix->KLUmatrixCommon) ;
|
klu_free_numeric (&(Matrix->SMPkluMatrix->KLUmatrixNumeric), Matrix->SMPkluMatrix->KLUmatrixCommon) ;
|
||||||
|
|
@ -619,7 +619,7 @@ SMPreorder (SMPmatrix *Matrix, double PivTol, double PivRel, double Gmin)
|
||||||
if (Matrix->CKTkluMODE)
|
if (Matrix->CKTkluMODE)
|
||||||
{
|
{
|
||||||
LoadGmin_CSC (Matrix->SMPkluMatrix->KLUmatrixDiag, Matrix->SMPkluMatrix->KLUmatrixN, Gmin) ;
|
LoadGmin_CSC (Matrix->SMPkluMatrix->KLUmatrixDiag, Matrix->SMPkluMatrix->KLUmatrixN, Gmin) ;
|
||||||
Matrix->SMPkluMatrix->KLUmatrixCommon->tol = PivTol ;
|
Matrix->SMPkluMatrix->KLUmatrixCommon->tol = PivRel ;
|
||||||
|
|
||||||
if (Matrix->SMPkluMatrix->KLUmatrixNumeric != NULL) {
|
if (Matrix->SMPkluMatrix->KLUmatrixNumeric != NULL) {
|
||||||
klu_free_numeric (&(Matrix->SMPkluMatrix->KLUmatrixNumeric), Matrix->SMPkluMatrix->KLUmatrixCommon) ;
|
klu_free_numeric (&(Matrix->SMPkluMatrix->KLUmatrixNumeric), Matrix->SMPkluMatrix->KLUmatrixCommon) ;
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue