00001 Info<< "Reading field alpha\n" << endl;
00002 volScalarField alpha
00003 (
00004 IOobject
00005 (
00006 "alpha",
00007 runTime.timeName(),
00008 mesh,
00009 IOobject::MUST_READ,
00010 IOobject::AUTO_WRITE
00011 ),
00012 mesh
00013 );
00014
00015 volScalarField beta
00016 (
00017 IOobject
00018 (
00019 "beta",
00020 runTime.timeName(),
00021 mesh,
00022 IOobject::NO_READ,
00023 IOobject::NO_WRITE
00024 ),
00025 scalar(1) - alpha
00026
00027 );
00028
00029 Info<< "Reading field p\n" << endl;
00030 volScalarField p
00031 (
00032 IOobject
00033 (
00034 "p",
00035 runTime.timeName(),
00036 mesh,
00037 IOobject::MUST_READ,
00038 IOobject::AUTO_WRITE
00039 ),
00040 mesh
00041 );
00042
00043 Info<< "Reading field Ua\n" << endl;
00044 volVectorField Ua
00045 (
00046 IOobject
00047 (
00048 "Ua",
00049 runTime.timeName(),
00050 mesh,
00051 IOobject::MUST_READ,
00052 IOobject::AUTO_WRITE
00053 ),
00054 mesh
00055 );
00056
00057 Info<< "Reading field Ub\n" << endl;
00058 volVectorField Ub
00059 (
00060 IOobject
00061 (
00062 "Ub",
00063 runTime.timeName(),
00064 mesh,
00065 IOobject::MUST_READ,
00066 IOobject::AUTO_WRITE
00067 ),
00068 mesh
00069 );
00070
00071 volVectorField U
00072 (
00073 IOobject
00074 (
00075 "U",
00076 runTime.timeName(),
00077 mesh,
00078 IOobject::NO_READ,
00079 IOobject::AUTO_WRITE
00080 ),
00081 alpha*Ua + beta*Ub
00082 );
00083
00084
00085 Info<< "Reading transportProperties\n" << endl;
00086
00087 IOdictionary transportProperties
00088 (
00089 IOobject
00090 (
00091 "transportProperties",
00092 runTime.constant(),
00093 mesh,
00094 IOobject::MUST_READ,
00095 IOobject::NO_WRITE
00096 )
00097 );
00098
00099 dimensionedScalar rhoa
00100 (
00101 transportProperties.lookup("rhoa")
00102 );
00103
00104 dimensionedScalar rhob
00105 (
00106 transportProperties.lookup("rhob")
00107 );
00108
00109 dimensionedScalar nua
00110 (
00111 transportProperties.lookup("nua")
00112 );
00113
00114 dimensionedScalar nub
00115 (
00116 transportProperties.lookup("nub")
00117 );
00118
00119 dimensionedScalar da
00120 (
00121 transportProperties.lookup("da")
00122 );
00123
00124 dimensionedScalar db
00125 (
00126 transportProperties.lookup("db")
00127 );
00128
00129 dimensionedScalar Cvm
00130 (
00131 transportProperties.lookup("Cvm")
00132 );
00133
00134 dimensionedScalar Cl
00135 (
00136 transportProperties.lookup("Cl")
00137 );
00138
00139 dimensionedScalar Ct
00140 (
00141 transportProperties.lookup("Ct")
00142 );
00143
00144 #include "createPhia.H"
00145 #include "createPhib.H"
00146
00147 surfaceScalarField phi
00148 (
00149 IOobject
00150 (
00151 "phi",
00152 runTime.timeName(),
00153 mesh
00154 ),
00155 fvc::interpolate(alpha)*phia
00156 + fvc::interpolate(beta)*phib
00157 );
00158
00159 volScalarField rho
00160 (
00161 IOobject
00162 (
00163 "rho",
00164 runTime.timeName(),
00165 mesh
00166 ),
00167 alpha*rhoa + beta*rhob
00168 );
00169
00170 #include "createRASTurbulence.H"
00171
00172 Info<< "Calculating field DDtUa and DDtUb\n" << endl;
00173
00174 volVectorField DDtUa =
00175 fvc::ddt(Ua)
00176 + fvc::div(phia, Ua)
00177 - fvc::div(phia)*Ua;
00178
00179 volVectorField DDtUb =
00180 fvc::ddt(Ub)
00181 + fvc::div(phib, Ub)
00182 - fvc::div(phib)*Ub;
00183
00184
00185 Info<< "Calculating field g.h\n" << endl;
00186 volScalarField gh("gh", g & mesh.C());
00187
00188
00189 label pRefCell = 0;
00190 scalar pRefValue = 0.0;
00191 setRefCell(p, mesh.solutionDict().subDict("PISO"), pRefCell, pRefValue);
00192
00193