initial commit for version 1.5.x patch release
[OpenFOAM-1.5.x.git] / applications / solvers / multiphase / interFoam / createFields.H
blob887bcbdead1a56701f879de1d94aafdf4da40463
1     Info<< "Reading field pd\n" << endl;
2     volScalarField pd
3     (
4         IOobject
5         (
6             "pd",
7             runTime.timeName(),
8             mesh,
9             IOobject::MUST_READ,
10             IOobject::AUTO_WRITE
11         ),
12         mesh
13     );
15     Info<< "Reading field gamma\n" << endl;
16     volScalarField gamma
17     (
18         IOobject
19         (
20             "gamma",
21             runTime.timeName(),
22             mesh,
23             IOobject::MUST_READ,
24             IOobject::AUTO_WRITE
25         ),
26         mesh
27     );
29     Info<< "Reading field U\n" << endl;
30     volVectorField U
31     (
32         IOobject
33         (
34             "U",
35             runTime.timeName(),
36             mesh,
37             IOobject::MUST_READ,
38             IOobject::AUTO_WRITE
39         ),
40         mesh
41     );
43 #   include "createPhi.H"
46     Info<< "Reading transportProperties\n" << endl;
47     twoPhaseMixture twoPhaseProperties(U, phi, "gamma");
49     const dimensionedScalar& rho1 = twoPhaseProperties.rho1();
50     const dimensionedScalar& rho2 = twoPhaseProperties.rho2();
53     // Need to store rho for ddt(rho, U)
54     volScalarField rho
55     (
56         IOobject
57         (
58             "rho",
59             runTime.timeName(),
60             mesh,
61             IOobject::READ_IF_PRESENT
62         ),
63         gamma*rho1 + (scalar(1) - gamma)*rho2,
64         gamma.boundaryField().types()
65     );
66     rho.oldTime();
69     // Mass flux
70     // Initialisation does not matter because rhoPhi is reset after the
71     // gamma solution before it is used in the U equation.
72     surfaceScalarField rhoPhi
73     (
74         IOobject
75         (
76             "rho*phi",
77             runTime.timeName(),
78             mesh,
79             IOobject::NO_READ,
80             IOobject::NO_WRITE
81         ),
82         rho1*phi
83     );
86     Info<< "Calculating field g.h\n" << endl;
87     volScalarField gh("gh", g & mesh.C());
88     surfaceScalarField ghf("gh", g & mesh.Cf());
91     volScalarField p
92     (
93         IOobject
94         (
95             "p",
96             runTime.timeName(),
97             mesh,
98             IOobject::NO_READ,
99             IOobject::AUTO_WRITE
100         ),
101         pd + rho*gh
102     );
105     label pdRefCell = 0;
106     scalar pdRefValue = 0.0;
107     setRefCell(pd, mesh.solutionDict().subDict("PISO"), pdRefCell, pdRefValue);
110     // Construct interface from gamma distribution
111     interfaceProperties interface(gamma, U, twoPhaseProperties);