NSRDSfunc14.H
Go to the documentation of this file.
1 /*---------------------------------------------------------------------------*\
2  ========= |
3  \\ / F ield | OpenFOAM: The Open Source CFD Toolbox
4  \\ / O peration |
5  \\ / A nd | Copyright (C) 2011 OpenFOAM Foundation
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 Class
25  Foam::NSRDSfunc14
26 
27 Description
28  NSRDS function number 114
29 
30  Source:
31  \verbatim
32  NSRDS - AICHE
33  Data Compilation Tables
34  of Properties of
35  Pure Compounds
36 
37  Design Institute for Physical Property Data
38  American Institute of Chemical Engineers
39  345 East 47th Street
40  New York, New York 10017
41 
42  National Standard Reference Data System
43  American Institute of Chemical Engineers
44 
45  T.E. Daubert - R.P. Danner
46 
47  Department of Chemical Engineering
48  The Pennsylvania State University
49  University Park, PA 16802
50  \endverbatim
51 
52 \*---------------------------------------------------------------------------*/
53 
54 #ifndef NSRDSfunc14_H
55 #define NSRDSfunc14_H
56 
57 #include "thermophysicalFunction.H"
58 
59 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
60 
61 namespace Foam
62 {
63 
64 /*---------------------------------------------------------------------------*\
65  Class NSRDSfunc14 Declaration
66 \*---------------------------------------------------------------------------*/
67 
68 class NSRDSfunc14
69 :
71 {
72  // Private data
73 
74  // NSRDS function 114 coefficients
75  scalar Tc_, a_, b_, c_, d_;
76 
77 
78 public:
79 
80  //- Runtime type information
81  TypeName("NSRDSfunc14");
82 
83 
84  // Constructors
85 
86  //- Construct from components
88  (
89  const scalar Tc,
90  const scalar a,
91  const scalar b,
92  const scalar c,
93  const scalar d
94  );
95 
96  //- Construct from Istream
97  NSRDSfunc14(Istream& is);
98 
99  //- Construct from dictionary
100  NSRDSfunc14(const dictionary& dict);
101 
102 
103  // Member Functions
104 
105  //- Evaluate the function and return the result
106  scalar f(scalar, scalar T) const
107  {
108  scalar Tdash = min(T, Tc_ - ROOTVSMALL);
109 
110  scalar t = 1.0 - Tdash/Tc_;
111  return
112  a_*a_/(t + ROOTVSMALL) + b_ - t
113  *(
114  2.0*a_*c_
115  + t*(a_*d_ + t*(c_*c_/3.0 + t*(0.5*c_*d_ + 0.2*d_*d_*t)))
116  );
117  }
118 
119  //- Write the function coefficients
120  void writeData(Ostream& os) const
121  {
122  os << Tc_ << token::SPACE
123  << a_ << token::SPACE
124  << b_ << token::SPACE
125  << c_ << token::SPACE
126  << d_;
127  }
128 
129 
130  // Ostream Operator
132  friend Ostream& operator<<(Ostream& os, const NSRDSfunc14& f)
133  {
134  f.writeData(os);
135  return os;
136  }
137 };
138 
139 
140 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
141 
142 } // End namespace Foam
143 
144 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
145 
146 #endif
147 
148 // ************************************************************************* //
TypeName("NSRDSfunc14")
Runtime type information.
dictionary dict
NSRDS function number 114.
Definition: NSRDSfunc14.H:67
void writeData(Ostream &os) const
Write the function coefficients.
Definition: NSRDSfunc14.H:119
A list of keyword definitions, which are a keyword followed by any number of values (e...
Definition: dictionary.H:137
friend Ostream & operator<<(Ostream &os, const NSRDSfunc14 &f)
Definition: NSRDSfunc14.H:131
An Istream is an abstract base class for all input systems (streams, files, token lists etc)...
Definition: Istream.H:57
scalar f(scalar, scalar T) const
Evaluate the function and return the result.
Definition: NSRDSfunc14.H:105
NSRDSfunc14(const scalar Tc, const scalar a, const scalar b, const scalar c, const scalar d)
Construct from components.
Definition: NSRDSfunc14.C:46
Abstract base class for thermo-physical functions.
const dimensionedScalar b
Wien displacement law constant: default SI units: [m.K].
Definition: createFields.H:27
An Ostream is an abstract base class for all output systems (streams, files, token lists...
Definition: Ostream.H:53
void T(FieldField< Field, Type > &f1, const FieldField< Field, Type > &f2)
dimensioned< Type > min(const dimensioned< Type > &, const dimensioned< Type > &)
const dimensionedScalar c
Speed of light in a vacuum.
Namespace for OpenFOAM.