songtianlun/openfoam
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

BUG: LUscalarMatrix: incorrect debug control

Browse Source
This commit is contained in:
mattijs 2013-04-16 15:38:33 +01:00
parent dd4a5564a4
commit cf4e70612e
1 changed files with 24 additions and 19 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

43
src/OpenFOAM/matrices/LUscalarMatrix/LUscalarMatrix.C
View File

@ -142,38 +142,43 @@ Foam::LUscalarMatrix::LUscalarMatrix
convert(ldum, interfaceCoeffs, interfaces);
}
if (debug && Pstream::master(comm_))
if (Pstream::master(comm_))
{
label nRows = n();
label nColumns = m();
Pout<< "LUscalarMatrix : size:" << nRows << endl;
for (label rowI = 0; rowI < nRows; rowI++)
if (debug)
{
const scalar* row = operator[](rowI);
Pout<< "cell:" << rowI << " diagCoeff:" << row[rowI] << endl;
Pout<< " connects to upper cells :";
for (label columnI = rowI+1; columnI < nColumns; columnI++)
Pout<< "LUscalarMatrix : size:" << nRows << endl;
for (label rowI = 0; rowI < nRows; rowI++)
{
if (mag(row[columnI]) > SMALL)
const scalar* row = operator[](rowI);
Pout<< "cell:" << rowI << " diagCoeff:" << row[rowI] << endl;
Pout<< " connects to upper cells :";
for (label columnI = rowI+1; columnI < nColumns; columnI++)
{
Pout<< ' ' << columnI << " (coeff:" << row[columnI] << ")";
if (mag(row[columnI]) > SMALL)
{
Pout<< ' ' << columnI << " (coeff:" << row[columnI]
<< ")";
}
}
}
Pout<< endl;
Pout<< " connects to lower cells :";
for (label columnI = 0; columnI < rowI; columnI++)
{
if (mag(row[columnI]) > SMALL)
Pout<< endl;
Pout<< " connects to lower cells :";
for (label columnI = 0; columnI < rowI; columnI++)
{
Pout<< ' ' << columnI << " (coeff:" << row[columnI] << ")";
if (mag(row[columnI]) > SMALL)
{
Pout<< ' ' << columnI << " (coeff:" << row[columnI]
<< ")";
}
}
Pout<< endl;
}
Pout<< endl;
}
Pout<< endl;
pivotIndices_.setSize(n());
LUDecompose(*this, pivotIndices_);