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 104
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 NSRDSfunc4 Declaration
66 \*---------------------------------------------------------------------------*/
70 public thermophysicalFunction
74 // NSRDS function 104 coefficients
75 scalar a_, b_, c_, d_, e_;
80 //- Runtime type information
81 TypeName("NSRDSfunc4");
86 //- Construct from components
96 //- Construct from Istream
97 NSRDSfunc4(Istream& is);
99 //- Construct from dictionary
100 NSRDSfunc4(const dictionary& dict);
105 //- Evaluate the function and return the result
106 scalar f(scalar, scalar T) const
108 return a_ + b_/T + c_/pow(T, 3) + d_/pow(T, 8) + e_/pow(T, 9);
111 //- Write the function coefficients
112 void writeData(Ostream& os) const
114 os << a_ << token::SPACE
115 << b_ << token::SPACE
116 << c_ << token::SPACE
117 << d_ << token::SPACE
124 friend Ostream& operator<<(Ostream& os, const NSRDSfunc4& f)
132 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
134 } // End namespace Foam
136 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
140 // ************************************************************************* //