FreeFOAM The Cross-Platform CFD Toolkit
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) 1991-2010 OpenCFD Ltd.
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 
58 
59 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
60 
61 namespace Foam
62 {
63 
64 /*---------------------------------------------------------------------------*\
65  Class NSRDSfunc14 Declaration
66 \*---------------------------------------------------------------------------*/
67 
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
87  NSRDSfunc14(scalar Tc, scalar a, scalar b, scalar c, scalar d)
88  :
89  Tc_(Tc),
90  a_(a),
91  b_(b),
92  c_(c),
93  d_(d)
94  {}
95 
96  //- Construct from Istream
98  :
99  Tc_(readScalar(is)),
100  a_(readScalar(is)),
101  b_(readScalar(is)),
102  c_(readScalar(is)),
103  d_(readScalar(is))
104  {}
105 
106 
107  // Member Functions
108 
109  //- Evaluate the function and return the result
110  scalar f(scalar, scalar T) const
111  {
112  scalar t = 1.0 - T/Tc_;
113  return a_*a_/t + b_ - t*(2.0*a_*c_ + t*(a_*d_ + t*(c_*c_/3.0 + t*(0.5*c_*d_ + 0.2*d_*d_*t))));
114  }
115 
116 
117  //- Write the function coefficients
118  void writeData(Ostream& os) const
119  {
120  os << Tc_ << token::SPACE
121  << a_ << token::SPACE
122  << b_ << token::SPACE
123  << c_ << token::SPACE
124  << d_;
125  }
126 
127 
128  // Ostream Operator
129 
130  friend Ostream& operator<<(Ostream& os, const NSRDSfunc14& f)
131  {
132  f.writeData(os);
133  return os;
134  }
135 };
136 
137 
138 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
139 
140 } // End namespace Foam
141 
142 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
143 
144 #endif
145 
146 // ************************ vim: set sw=4 sts=4 et: ************************ //