92 lines
2.1 KiB
C
92 lines
2.1 KiB
C
|
// write time values to case file
|
||
|
|
{
|
||
|
|
scalar timeCorrection = 0;
|
||
|
|
if (timeDirs[0].value() < 0)
|
||
|
|
{
|
||
|
|
timeCorrection = - timeDirs[0].value();
|
||
|
|
Info<< "Correcting time values. Adding " << timeCorrection << endl;
|
||
|
|
}
|
||
|
|
|
||
|
|
caseFile.setf(ios_base::scientific, ios_base::floatfield);
|
||
|
|
caseFile.precision(5);
|
||
|
|
|
||
|
|
// time set 1 - geometry and volume fields
|
||
|
|
if (fieldFileNumbers.size())
|
||
|
|
{
|
||
|
|
caseFile
|
||
|
|
<< "time set: " << 1 << nl
|
||
|
|
<< "number of steps: " << fieldFileNumbers.size() << nl
|
||
|
|
<< "filename numbers:" << nl;
|
||
|
|
|
||
|
|
label count = 0;
|
||
|
|
forAll (fieldFileNumbers, i)
|
||
|
|
{
|
||
|
|
caseFile
|
||
|
|
<< " " << setw(12) << fieldFileNumbers[i];
|
||
|
|
|
||
|
|
if (++count % 6 == 0)
|
||
|
|
{
|
||
|
|
caseFile << nl;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
caseFile
|
||
|
|
<< nl << "time values:" << nl;
|
||
|
|
|
||
|
|
count = 0;
|
||
|
|
forAll (fieldFileNumbers, i)
|
||
|
|
{
|
||
|
|
caseFile
|
||
|
|
<< " " << setw(12)
|
||
|
|
<< timeIndices[fieldFileNumbers[i]] + timeCorrection;
|
||
|
|
|
||
|
|
if (++count % 6 == 0)
|
||
|
|
{
|
||
|
|
caseFile << nl;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
caseFile << nl << nl;
|
||
|
|
}
|
||
|
|
|
||
|
|
// time set 2 - lagrangian fields
|
||
|
|
if (hasLagrangian && sprayFileNumbers.size())
|
||
|
|
{
|
||
|
|
caseFile
|
||
|
|
<< "time set: " << 2 << nl
|
||
|
|
<< "number of steps: " << sprayFileNumbers.size() << nl
|
||
|
|
<< "filename numbers:" << nl;
|
||
|
|
|
||
|
|
label count = 0;
|
||
|
|
forAll (sprayFileNumbers, i)
|
||
|
|
{
|
||
|
|
caseFile
|
||
|
|
<< " " << setw(12) << sprayFileNumbers[i];
|
||
|
|
|
||
|
|
if (++count % 6 == 0)
|
||
|
|
{
|
||
|
|
caseFile << nl;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
caseFile
|
||
|
|
<< nl << "time values:" << nl;
|
||
|
|
|
||
|
|
count = 0;
|
||
|
|
forAll (sprayFileNumbers, i)
|
||
|
|
{
|
||
|
|
caseFile
|
||
|
|
<< " " << setw(12)
|
||
|
|
<< timeIndices[sprayFileNumbers[i]] + timeCorrection;
|
||
|
|
|
||
|
|
if (++count % 6 == 0)
|
||
|
|
{
|
||
|
|
caseFile << nl;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
caseFile << nl << nl;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
caseFile << "# end" << nl;
|
||
|
|
}
|