applications/solvers/incompressible/shallowWaterFoam/CourantNo.H

   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 Global
  25     CourantNo
  26
  27 Description
  28     Calculates and outputs the maximum Courant Number.
  29
  30 \*---------------------------------------------------------------------------*/
  31
  32
  33 scalar CoNum = 0.0;
  34 scalar meanCoNum = 0.0;
  35 scalar waveCoNum = 0.0;
  36
  37 if (mesh.nInternalFaces())
  38 {
  39     scalarField sumPhi
  40     (
  41         fvc::surfaceSum(mag(phi))().internalField()
  42       / h.internalField()
  43     );
  44
  45     CoNum = 0.5*gMax(sumPhi/mesh.V().field())*runTime.deltaTValue();
  46
  47     meanCoNum =
  48         0.5*(gSum(sumPhi)/gSum(mesh.V().field()))*runTime.deltaTValue();
  49
  50     // Gravity wave Courant number
  51     waveCoNum = 0.25*gMax
  52     (
  53         fvc::surfaceSum
  54         (
  55             fvc::interpolate(sqrt(h))*mesh.magSf()
  56         )().internalField()/mesh.V().field()
  57     )*sqrt(magg).value()*runTime.deltaTValue();
  58 }
  59
  60 Info<< "Courant number mean: " << meanCoNum
  61     << " max: " << CoNum << endl;
  62
  63 Info<< "Gravity wave Courant number max: " << waveCoNum
  64     << endl;
  65
  66
  67 // ************************************************************************* //