src/thermophysicalModels/thermophysicalFunctions/NSRDSfunctions/NSRDSfunc6/NSRDSfunc6.H

   1 /*---------------------------------------------------------------------------*\
   2   =========                 |
   3   \\      /  F ield         | OpenFOAM: The Open Source CFD Toolbox
   4    \\    /   O peration     |
   5     \\  /    A nd           | Copyright (C) 2004-2011 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::NSRDSfunc6
  26
  27 Description
  28     NSRDS function number 106
  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 NSRDSfunc6_H
  55 #define NSRDSfunc6_H
  56
  57 #include "thermophysicalFunction.H"
  58
  59 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
  60
  61 namespace Foam
  62 {
  63
  64 /*---------------------------------------------------------------------------*\
  65                            Class NSRDSfunc6 Declaration
  66 \*---------------------------------------------------------------------------*/
  67
  68 class NSRDSfunc6
  69 :
  70     public thermophysicalFunction
  71 {
  72     // Private data
  73
  74         // NSRDS function 106 coefficients
  75         scalar Tc_, a_, b_, c_, d_, e_;
  76
  77
  78 public:
  79
  80     //- Runtime type information
  81     TypeName("NSRDSfunc6");
  82
  83
  84     // Constructors
  85
  86         //- Construct from components
  87         NSRDSfunc6
  88         (
  89             const scalar Tc,
  90             const scalar a,
  91             const scalar b,
  92             const scalar c,
  93             const scalar d,
  94             const scalar e
  95         );
  96
  97         //- Construct from Istream
  98         NSRDSfunc6(Istream& is);
  99
 100         //- Construct from dictionary
 101         NSRDSfunc6(const dictionary& dict);
 102
 103
 104     // Member Functions
 105
 106         //- Evaluate the function and return the result
 107         scalar f(scalar, scalar T) const
 108         {
 109             scalar Tr = T/Tc_;
 110             return a_*pow(1 - Tr, ((e_*Tr + d_)*Tr + c_)*Tr + b_);
 111         }
 112
 113         //- Write the function coefficients
 114         void writeData(Ostream& os) const
 115         {
 116             os  << Tc_ << token::SPACE
 117                 << a_ << token::SPACE
 118                 << b_ << token::SPACE
 119                 << c_ << token::SPACE
 120                 << d_ << token::SPACE
 121                 << e_;
 122         }
 123
 124
 125     // Ostream Operator
 126
 127         friend Ostream& operator<<(Ostream& os, const NSRDSfunc6& f)
 128         {
 129             f.writeData(os);
 130             return os;
 131         }
 132 };
 133
 134
 135 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
 136
 137 } // End namespace Foam
 138
 139 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
 140
 141 #endif
 142
 143 // ************************************************************************* //