applications/utilities/postProcessing/scalarField/pPrime2/pPrime2.C

   1 /*---------------------------------------------------------------------------*\
   2   =========                 |
   3   \\      /  F ield         | OpenFOAM: The Open Source CFD Toolbox
   4    \\    /   O peration     |
   5     \\  /    A nd           | Copyright (C) 2004-2010 OpenCFD Ltd.
   6      \\/     M anipulation  |
   7 -------------------------------------------------------------------------------
   8 License
   9     This file is part of OpenFOAM.
  10
  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
  13     the Free Software Foundation, either version 3 of the License, or
  14     (at your option) any later version.
  15
  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
  19     for more details.
  20
  21     You should have received a copy of the GNU General Public License
  22     along with OpenFOAM.  If not, see <http://www.gnu.org/licenses/>.
  23
  24 Application
  25     pPrime2
  26
  27 Description
  28     Calculates and writes the scalar field of pPrime2 (sqr(p - pMean)) at
  29     each time
  30
  31 \*---------------------------------------------------------------------------*/
  32
  33 #include "fvCFD.H"
  34
  35
  36 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
  37
  38 int main(int argc, char *argv[])
  39 {
  40     timeSelector::addOptions();
  41
  42 #   include "setRootCase.H"
  43 #   include "createTime.H"
  44
  45     instantList timeDirs = timeSelector::select0(runTime, args);
  46
  47 #   include "createMesh.H"
  48
  49     runTime.setTime(timeDirs.last(), timeDirs.size()-1);
  50
  51     volScalarField pMean
  52     (
  53         IOobject
  54         (
  55             "pMean",
  56             runTime.timeName(),
  57             mesh,
  58             IOobject::MUST_READ
  59         ),
  60         mesh
  61     );
  62
  63     forAll(timeDirs, timeI)
  64     {
  65         runTime.setTime(timeDirs[timeI], timeI);
  66
  67         Info<< "Time = " << runTime.timeName() << endl;
  68
  69         IOobject pheader
  70         (
  71             "p",
  72             runTime.timeName(),
  73             mesh,
  74             IOobject::MUST_READ
  75         );
  76
  77         // Check p exists
  78         if (pheader.headerOk())
  79         {
  80             mesh.readUpdate();
  81
  82             Info<< "    Reading p" << endl;
  83             volScalarField p(pheader, mesh);
  84
  85             Info<< "    Calculating pPrime2" << endl;
  86             volScalarField pPrime2
  87             (
  88                 IOobject
  89                 (
  90                     "pPrime2",
  91                     runTime.timeName(),
  92                     mesh,
  93                     IOobject::NO_READ
  94                 ),
  95                 sqr(p - pMean)
  96             );
  97             pPrime2.write();
  98         }
  99         else
 100         {
 101             Info<< "    No p" << endl;
 102         }
 103
 104         Info<< endl;
 105     }
 106
 107     return 0;
 108 }
 109
 110
 111 // ************************************************************************* //