Bugfix: clean-up
This commit is contained in:
parent
89dd971095
commit
25ac1973ca
4 changed files with 9 additions and 10 deletions
|
@ -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"
|
||||
|
||||
|
|
|
@ -100,7 +100,9 @@
|
|||
(
|
||||
"rhok",
|
||||
runTime.timeName(),
|
||||
mesh
|
||||
mesh,
|
||||
IOobject::READ_IF_PRESENT,
|
||||
IOobject::AUTO_WRITE
|
||||
),
|
||||
1.0 - beta*(T - TRef)
|
||||
);
|
||||
|
|
|
@ -16,7 +16,7 @@
|
|||
thermalModel solidThermo(Tsolid);
|
||||
|
||||
Info<< "Reading solid diffusivity k\n" << endl;
|
||||
volScalarField ksolid
|
||||
volScalarField kSolid
|
||||
(
|
||||
IOobject
|
||||
(
|
||||
|
|
|
@ -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);
|
||||
|
||||
|
|
Reference in a new issue