Go to the documentation of this file.00001 Info<< "Reading thermophysical properties\n" << endl;
00002
00003 autoPtr<basicPsiThermo> pThermo
00004 (
00005 basicPsiThermo::New(mesh)
00006 );
00007 basicPsiThermo& thermo = pThermo();
00008
00009 volScalarField rho
00010 (
00011 IOobject
00012 (
00013 "rho",
00014 runTime.timeName(),
00015 mesh,
00016 IOobject::NO_READ,
00017 IOobject::AUTO_WRITE
00018 ),
00019 thermo.rho()
00020 );
00021
00022 volScalarField& p = thermo.p();
00023 const volScalarField& psi = thermo.psi();
00024 volScalarField& h = thermo.h();
00025 const volScalarField& T = thermo.T();
00026
00027
00028 Info<< "\nReading field U\n" << endl;
00029 volVectorField U
00030 (
00031 IOobject
00032 (
00033 "U",
00034 runTime.timeName(),
00035 mesh,
00036 IOobject::MUST_READ,
00037 IOobject::AUTO_WRITE
00038 ),
00039 mesh
00040 );
00041
00042 #include <finiteVolume/compressibleCreatePhi.H>
00043
00044
00045 Info<< "Creating turbulence model\n" << endl;
00046 autoPtr<compressible::turbulenceModel> turbulence
00047 (
00048 compressible::turbulenceModel::New
00049 (
00050 rho,
00051 U,
00052 phi,
00053 thermo
00054 )
00055 );
00056
00057 Info<< "Creating field DpDt\n" << endl;
00058 volScalarField DpDt =
00059 fvc::DDt(surfaceScalarField("phiU", phi/fvc::interpolate(rho)), p);