1 Info<< "Reading thermophysical properties\n" << endl;
3 Info<< "Reading field T\n" << endl;
17 Info<< "Reading field p\n" << endl;
31 Info<< "Reading field U\n" << endl;
45 # include "createPhi.H"
47 # include "readTransportProperties.H"
49 Info<< "Creating turbulence model\n" << endl;
50 autoPtr<incompressible::RASModel> turbulence
52 incompressible::RASModel::New(U, phi, laminarTransport)
55 Info<< "Calculating field beta*(g.h)\n" << endl;
56 surfaceScalarField betaghf("betagh", beta*(g & mesh.Cf()));
59 scalar pRefValue = 0.0;
63 mesh.solutionDict().subDict("SIMPLE"),
69 // Kinematic density for buoyancy force