EEqn.H
Go to the documentation of this file.
1
20if (thermo.he().name()=="T")
21{
22 fvScalarMatrix TEqn
23 (
24 (porosity*rho*Cp+(1.0-porosity)*rho_rock*cp_rock)*fvm::ddt(T)
25 +fvm::div(phi*fvc::interpolate(Cp),T)
26 ==
27 fvm::laplacian(kr,T)
28 +
29 fvm::Sp(fvc::div(phi*fvc::interpolate(Cp)),T)
30 +
31 mu/permeability*magSqr(U)
32 +
33 fvm::Sp(alphaP*(porosity*fvc::ddt(p)+(U & fvc::grad(p))),T)
34 );
35
36 TEqn.solve();
37 // T.correctBoundaryConditions();
38}else
39{
40 FatalErrorInFunction
41 << "The energy equation in terms of enthalpy is still under developing\n"
42 << "Please use keyword of temperture for energy entry in thermophysicalProperties."
43 << abort(FatalError);
44}
dimensionedScalar rho_rock
Definition: createFields.H:45
volScalarField & p
Definition: createFields.H:10
dimensionedScalar kr
Definition: createFields.H:48
hydroThermo & thermo
Definition: createFields.H:4
dimensionedScalar cp_rock
Definition: createFields.H:46
volScalarField porosity(IOobject("porosity", runTime.timeName(), mesh, IOobject::READ_IF_PRESENT, IOobject::AUTO_WRITE), mesh, porosity0)
volVectorField U(IOobject("U", runTime.timeName(), mesh, IOobject::READ_IF_PRESENT, IOobject::AUTO_WRITE), mesh, dimensionedVector("U", dimensionSet(0, 1,-1, 0, 0, 0, 0), vector::zero))
volScalarField & T
Definition: createFields.H:12
volScalarField permeability(IOobject("permeability", runTime.timeName(), mesh, IOobject::MUST_READ, IOobject::AUTO_WRITE), mesh)
mu
Definition: updateProps.H:3
alphaP
Definition: updateProps.H:5
rho
Definition: updateProps.H:2
Cp
Definition: updateProps.H:4