1 /*---------------------------------------------------------------------------*\
3 \\ / F ield | OpenFOAM: The Open Source CFD Toolbox
5 \\ / A nd | Copyright (C) 1991-2008 OpenCFD Ltd.
7 -------------------------------------------------------------------------------
9 This file is part of OpenFOAM.
11 OpenFOAM is free software; you can redistribute it and/or modify it
12 under the terms of the GNU General Public License as published by the
13 Free Software Foundation; either version 2 of the License, or (at your
14 option) any later version.
16 OpenFOAM is distributed in the hope that it will be useful, but WITHOUT
17 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
18 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
21 You should have received a copy of the GNU General Public License
22 along with OpenFOAM; if not, write to the Free Software Foundation,
23 Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
29 Calculates and writes the scalar fields of the six components of the stress
30 tensor sigma for each time.
32 \*---------------------------------------------------------------------------*/
35 #include "incompressible/singlePhaseTransportModel/singlePhaseTransportModel.H"
36 #include "zeroGradientFvPatchFields.H"
39 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
41 int main(int argc, char *argv[])
44 # include "addTimeOptions.H"
45 # include "setRootCase.H"
47 # include "createTime.H"
50 instantList Times = runTime.times();
52 // set startTime and endTime depending on -time and -latestTime options
53 # include "checkTimeOptions.H"
55 runTime.setTime(Times[startTime], startTime);
57 # include "createMesh.H"
59 for (label i=startTime; i<endTime; i++)
61 runTime.setTime(Times[i], i);
63 Info<< "Time = " << runTime.timeName() << endl;
74 if (Uheader.headerOk())
78 Info<< " Reading U" << endl;
79 volVectorField U(Uheader, mesh);
81 # include "createPhi.H"
83 singlePhaseTransportModel laminarTransport(U, phi);
85 volSymmTensorField sigma
95 laminarTransport.nu()*2*dev(symm(fvc::grad(U)))
99 volScalarField sigmaxx
108 sigma.component(tensor::XX)
112 volScalarField sigmayy
121 sigma.component(tensor::YY)
125 volScalarField sigmazz
134 sigma.component(tensor::ZZ)
138 volScalarField sigmaxy
147 sigma.component(tensor::XY)
151 volScalarField sigmaxz
160 sigma.component(tensor::XZ)
164 volScalarField sigmayz
173 sigma.component(tensor::YZ)
187 zeroGradientFvPatchVectorField::typeName
189 Ub.correctBoundaryConditions();
192 volScalarField sigmaUn
201 0.0*sigma.component(tensor::YZ)
204 forAll(sigmaUn.boundaryField(), patchI)
206 sigmaUn.boundaryField()[patchI] =
208 mesh.boundary()[patchI].nf()
209 & sigma.boundaryField()[patchI]
210 )().component(vector::X);
217 Info<< " No U" << endl;
223 Info<< "End" << endl;
229 // ************************************************************************* //