1 /*---------------------------------------------------------------------------*\
3 \\ / F ield | OpenFOAM: The Open Source CFD Toolbox
5 \\ / A nd | Copyright (C) 1991-2008 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 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 NSRDS function number 100
34 Data Compilation Tables
38 Design Institute for Physical Property Data
39 American Institute of Chemical Engineers
41 New York, New York 10017
43 National Standard Reference Data System
44 American Institute of Chemical Engineers
46 T.E. Daubert - R.P. Danner
48 Department of Chemical Engineering
49 The Pennsylvania State University
50 University Park, PA 16802
53 \*---------------------------------------------------------------------------*/
58 #include "thermophysicalFunction.H"
60 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
65 /*---------------------------------------------------------------------------*\
66 Class NSRDSfunc0 Declaration
67 \*---------------------------------------------------------------------------*/
71 public thermophysicalFunction
75 // NSRDS function 100 coefficients
76 scalar a_, b_, c_, d_, e_, f_;
81 //- Runtime type information
82 TypeName("NSRDSfunc0");
87 //- Construct from components
88 NSRDSfunc0(scalar a, scalar b, scalar c, scalar d, scalar e, scalar f)
98 //- Construct from Istream
99 NSRDSfunc0(Istream& is)
112 //- Evaluate the function and return the result
113 scalar f(scalar, scalar T) const
115 return ((((f_*T + e_)*T + d_)*T + c_)*T + b_)*T + a_;
119 //- Write the function coefficients
120 void writeData(Ostream& os) const
122 os << a_ << token::SPACE
123 << b_ << token::SPACE
124 << c_ << token::SPACE
125 << d_ << token::SPACE
126 << e_ << token::SPACE
133 friend Ostream& operator<<(Ostream& os, const NSRDSfunc0& f)
141 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
143 } // End namespace Foam
145 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
149 // ************************************************************************* //