1 /*---------------------------------------------------------------------------*\
3 \\ / F ield | OpenFOAM: The Open Source CFD Toolbox
5 \\ / A nd | Copyright (C) 2004-2011 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
13 the Free Software Foundation, either version 3 of the License, or
14 (at your 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, see <http://www.gnu.org/licenses/>.
28 NSRDS function number 102
33 Data Compilation Tables
37 Design Institute for Physical Property Data
38 American Institute of Chemical Engineers
40 New York, New York 10017
42 National Standard Reference Data System
43 American Institute of Chemical Engineers
45 T.E. Daubert - R.P. Danner
47 Department of Chemical Engineering
48 The Pennsylvania State University
49 University Park, PA 16802
52 \*---------------------------------------------------------------------------*/
57 #include "thermophysicalFunction.H"
59 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
64 /*---------------------------------------------------------------------------*\
65 Class NSRDSfunc2 Declaration
66 \*---------------------------------------------------------------------------*/
70 public thermophysicalFunction
74 // NSRDS function 102 coefficients
75 scalar a_, b_, c_, d_;
80 //- Runtime type information
81 TypeName("NSRDSfunc2");
86 //- Construct from components
95 //- Construct from Istream
96 NSRDSfunc2(Istream& is);
98 //- Construct from dictionary
99 NSRDSfunc2(const dictionary& dict);
104 //- Evaluate the function and return the result
105 scalar f(scalar, scalar T) const
107 return a_*pow(T, b_)/(1.0 + c_/T + d_/sqr(T));
110 //- Write the function coefficients
111 void writeData(Ostream& os) const
113 os << a_ << token::SPACE
114 << b_ << token::SPACE
115 << c_ << token::SPACE
122 friend Ostream& operator<<(Ostream& os, const NSRDSfunc2& f)
130 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
132 } // End namespace Foam
134 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
138 // ************************************************************************* //