OGS
DensityCook.cpp
Go to the documentation of this file.
1
10#include "DensityCook.h"
11
12namespace
13{
14// NaX_Dean_polyfrac_CC.pickle
15// date extracted 2015-06-23 15:38:35 file mtime 2015-06-23 15:19:42
16const double DensityCook_c[] = {
17 0.3632627555646154, /* a0 */
18 -0.0014090624975800715, /* a1 */
19 -0.0007717609035743321, /* a2 */
20 5.03634836561135e-09, /* a3 */
21 5.478509959282738e-07, /* a4 */
22 6.36458510620815e-10, /* a5 */
23 -1.037977321231462e-10 /* a6 */
24};
25
26} // namespace
27
28namespace Adsorption
29{
30double DensityCook::getAdsorbateDensity(const double T_Ads) const
31{
32 return rhoWaterDean(T_Ads);
33}
34
35double DensityCook::getAlphaT(const double T_Ads) const
36{
37 return alphaTWaterDean(T_Ads);
38}
39
40// Characteristic curve. Return W (A)
41double DensityCook::characteristicCurve(const double A) const
42{
43 double W = curvePolyfrac(DensityCook_c, A); // cm^3/g
44
45 if (W < 0.0)
46 {
47 W = 0.0; // TODO [CL] debug output
48 }
49
50 return W / 1.e3; // m^3/kg
51}
52
53double DensityCook::dCharacteristicCurve(const double A) const
54{
55 return dCurvePolyfrac(DensityCook_c, A);
56}
57
58} // namespace Adsorption
double getAlphaT(const double T_Ads) const override
double dCharacteristicCurve(const double A) const override
double getAdsorbateDensity(const double T_Ads) const override
double characteristicCurve(const double A) const override
double curvePolyfrac(const double *coeffs, const double x)
Definition Adsorption.h:52
double dCurvePolyfrac(const double *coeffs, const double x)
Definition Adsorption.h:61
double rhoWaterDean(const double T_Ads)
Definition DensityCook.h:26
double alphaTWaterDean(const double T_Ads)
Definition DensityCook.h:41