1 /*---------------------------------------------------------------------------*\
3 \\ / F ield | OpenFOAM: The Open Source CFD Toolbox
5 \\ / A nd | Copyright held by original author
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 optionally writes the local Mach number from the velocity
32 The -nowrite option just outputs the max value without writing the field.
34 \*---------------------------------------------------------------------------*/
37 #include "basicPsiThermo.H"
39 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
40 void Foam::calc(const argList& args, const Time& runTime, const fvMesh& mesh)
42 bool writeResults = !args.optionFound("noWrite");
60 // Check U and T exists
61 if (Uheader.headerOk() && Theader.headerOk())
63 autoPtr<volScalarField> MachPtr;
65 volVectorField U(Uheader, mesh);
67 if (isFile(runTime.constantPath()/"thermophysicalProperties"))
69 // thermophysical Mach
70 autoPtr<basicPsiThermo> thermo
72 basicPsiThermo::New(mesh)
75 volScalarField Cp = thermo->Cp();
76 volScalarField Cv = thermo->Cv();
88 mag(U)/(sqrt((Cp/Cv)*(Cp - Cv)*thermo->T()))
95 IOdictionary thermoProps
99 "thermodynamicProperties",
107 dimensionedScalar R(thermoProps.lookup("R"));
108 dimensionedScalar Cv(thermoProps.lookup("Cv"));
110 volScalarField T(Theader, mesh);
122 mag(U)/(sqrt(((Cv + R)/Cv)*R*T))
127 Info<< "Mach max : " << max(MachPtr()).value() << endl;
136 Info<< " Missing U or T" << endl;
139 Info<< "\nEnd\n" << endl;
143 // ************************************************************************* //