Bugfix: clean-up

This commit is contained in:
Hrvoje Jasak 2016-04-20 12:55:08 +01:00
parent 89dd971095
commit 25ac1973ca
4 changed files with 9 additions and 10 deletions

View file

@ -81,17 +81,17 @@ int main(int argc, char *argv[])
// Update thermal conductivity in the solid
solidThermo.correct();
ksolid = solidThermo.k();
kSolid = solidThermo.k();
// Coupled patches
# include "attachPatches.H"
kappaEff.correctBoundaryConditions();
ksolid.correctBoundaryConditions();
kSolid.correctBoundaryConditions();
// Interpolate to the faces and add thermal resistance
surfaceScalarField ksolidf = fvc::interpolate(ksolid);
solidThermo.modifyResistance(ksolidf);
surfaceScalarField kSolidf = fvc::interpolate(kSolid);
solidThermo.modifyResistance(kSolidf);
# include "solveEnergy.H"

View file

@ -100,7 +100,9 @@
(
"rhok",
runTime.timeName(),
mesh
mesh,
IOobject::READ_IF_PRESENT,
IOobject::AUTO_WRITE
),
1.0 - beta*(T - TRef)
);

View file

@ -16,7 +16,7 @@
thermalModel solidThermo(Tsolid);
Info<< "Reading solid diffusivity k\n" << endl;
volScalarField ksolid
volScalarField kSolid
(
IOobject
(

View file

@ -20,19 +20,16 @@
+ 3.0*radiation->Rp()*pow4(T)
);
//Called automatically in 1.6.1-ext
//TFluidEqn->boundaryManipulate(T.boundaryField());
TFluidEqn->relax();
fvScalarMatrix* TSolidEqn = new fvScalarMatrix
(
- fvm::laplacian(ksolidf, Tsolid, "laplacian(k,T)")
- fvm::laplacian(kSolidf, Tsolid, "laplacian(k,T)")
+ fvm::SuSp(-solidThermo.S()/Tsolid, Tsolid)
);
TSolidEqn->relax();
// Add fluid equation
TEqns.set(0, TFluidEqn);