zhyang-dev/openfoam
1
0
Fork 0
mirror of https://develop.openfoam.com/Development/openfoam.git synced 2025-11-28 03:28:01 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

BUG: Fix to source in energy Eq for solid

Browse Source
This commit is contained in:
sergio
2012-05-22 16:29:41 +01:00
parent 3f8aefc470
commit 3fc8c16b0d
4 changed files with 8 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
applications/solvers/heatTransfer/chtMultiRegionFoam/chtMultiRegionSimpleFoam/porousSolid/setPorousRegionSolidFields.H
View File

@ -15,6 +15,9 @@
const volScalarField& kappa = tkappa(); const volScalarField& kappa = tkappa();
//const volSymmTensorField& K = tK(); //const volSymmTensorField& K = tK();
tmp<volScalarField> trhoCp = cp*rho;
const volScalarField& rhoCp = trhoCp();
volScalarField& T = thermo.T(); volScalarField& T = thermo.T();
IObasicSourceList& sources = solidHeatSources[i]; IObasicSourceList& sources = solidHeatSources[i];

2
applications/solvers/heatTransfer/chtMultiRegionFoam/chtMultiRegionSimpleFoam/porousSolid/solvePorousSolid.H
View File

@ -4,7 +4,7 @@
tmp<fvScalarMatrix> TEqn tmp<fvScalarMatrix> TEqn
( (
- fvm::laplacian(betav*kappa, T, "laplacian(K,T)") - fvm::laplacian(betav*kappa, T, "laplacian(K,T)")
+ sources(rho, T) + sources(rhoCp, T)
); );
TEqn().relax(); TEqn().relax();

3
applications/solvers/heatTransfer/chtMultiRegionFoam/porousSolid/setPorousRegionSolidFields.H
View File

@ -15,6 +15,9 @@
const volScalarField& kappa = tkappa(); const volScalarField& kappa = tkappa();
//const volSymmTensorField& K = tK(); //const volSymmTensorField& K = tK();
tmp<volScalarField> trhoCp = cp*rho;
const volScalarField& rhoCp = trhoCp();
volScalarField& T = thermo.T(); volScalarField& T = thermo.T();
IObasicSourceList& sources = solidHeatSources[i]; IObasicSourceList& sources = solidHeatSources[i];

2
applications/solvers/heatTransfer/chtMultiRegionFoam/porousSolid/solvePorousSolid.H
View File

@ -10,7 +10,7 @@ if (finalIter)
( (
fvm::ddt(betav*rho*cp, T) fvm::ddt(betav*rho*cp, T)
- fvm::laplacian(betav*kappa, T, "laplacian(K,T)") - fvm::laplacian(betav*kappa, T, "laplacian(K,T)")
+ sources(rho, T) + sources(rhoCp, T)
); );
TEqn().relax(); TEqn().relax();