113 lines
2.2 KiB
C
113 lines
2.2 KiB
C
|
Info<< "Reading transportProperties\n" << endl;
|
||
|
|
|
||
|
|
IOdictionary transportProperties
|
||
|
|
(
|
||
|
|
IOobject
|
||
|
|
(
|
||
|
|
"transportProperties",
|
||
|
|
runTime.constant(),
|
||
|
|
mesh,
|
||
|
|
IOobject::MUST_READ,
|
||
|
|
IOobject::NO_WRITE
|
||
|
|
)
|
||
|
|
);
|
||
|
|
|
||
|
|
Info<< "Calculating field g.h\n" << endl;
|
||
|
|
volScalarField gh("gh", g & mesh.C());
|
||
|
|
surfaceScalarField ghf("ghf", g & mesh.Cf());
|
||
|
|
|
||
|
|
Info<< "Reading field p_rgh\n" << endl;
|
||
|
|
volScalarField p_rgh
|
||
|
|
(
|
||
|
|
IOobject
|
||
|
|
(
|
||
|
|
"p_rgh",
|
||
|
|
runTime.timeName(),
|
||
|
|
mesh,
|
||
|
|
IOobject::MUST_READ,
|
||
|
|
IOobject::AUTO_WRITE
|
||
|
|
),
|
||
|
|
mesh
|
||
|
|
);
|
||
|
|
|
||
|
|
Info<< "Reading field U\n" << endl;
|
||
|
|
volVectorField U
|
||
|
|
(
|
||
|
|
IOobject
|
||
|
|
(
|
||
|
|
"U",
|
||
|
|
runTime.timeName(),
|
||
|
|
mesh,
|
||
|
|
IOobject::MUST_READ,
|
||
|
|
IOobject::AUTO_WRITE
|
||
|
|
),
|
||
|
|
mesh
|
||
|
|
);
|
||
|
|
|
||
|
|
Info<< "Reading field T\n" << endl;
|
||
|
|
volScalarField T
|
||
|
|
(
|
||
|
|
IOobject
|
||
|
|
(
|
||
|
|
"T",
|
||
|
|
runTime.timeName(),
|
||
|
|
mesh,
|
||
|
|
IOobject::MUST_READ,
|
||
|
|
IOobject::AUTO_WRITE
|
||
|
|
),
|
||
|
|
mesh
|
||
|
|
);
|
||
|
|
|
||
|
|
# include "createPhi.H"
|
||
|
|
|
||
|
|
# include "readTransportProperties.H"
|
||
|
|
|
||
|
|
label pRefCell = 0;
|
||
|
|
scalar pRefValue = 0.0;
|
||
|
|
setRefCell
|
||
|
|
(
|
||
|
|
p_rgh,
|
||
|
|
mesh.solutionDict().subDict("SIMPLE"),
|
||
|
|
pRefCell,
|
||
|
|
pRefValue
|
||
|
|
);
|
||
|
|
|
||
|
|
autoPtr<incompressible::RASModel> turbulence
|
||
|
|
(
|
||
|
|
incompressible::RASModel::New(U, phi, laminarTransport)
|
||
|
|
);
|
||
|
|
|
||
|
|
# include "attachPatches.H"
|
||
|
|
|
||
|
|
Info<< "Reading field kappaEff\n" << endl;
|
||
|
|
volScalarField kappaEff
|
||
|
|
(
|
||
|
|
IOobject
|
||
|
|
(
|
||
|
|
"kappaEff",
|
||
|
|
runTime.timeName(),
|
||
|
|
mesh,
|
||
|
|
IOobject::MUST_READ,
|
||
|
|
IOobject::AUTO_WRITE
|
||
|
|
),
|
||
|
|
mesh
|
||
|
|
);
|
||
|
|
|
||
|
|
// Kinematic density for buoyancy force
|
||
|
|
volScalarField rhok
|
||
|
|
(
|
||
|
|
IOobject
|
||
|
|
(
|
||
|
|
"rhok",
|
||
|
|
runTime.timeName(),
|
||
|
|
mesh
|
||
|
|
),
|
||
|
|
1.0 - beta*(T - TRef)
|
||
|
|
);
|
||
|
|
|
||
|
|
Info<< "Creating radiation model\n" << endl;
|
||
|
|
autoPtr<radiation::radiationModel> radiation
|
||
|
|
(
|
||
|
|
radiation::radiationModel::New(T)
|
||
|
|
);
|