#include "region2.h"
#include "steamcalculator.h"
#include "steamcalculator_macros.h"
#include "isinfnan.h"
#include <cstdlib>
#include <cmath>
#include <cstdio>
Defines | |
#define | REG2I_COUNT 9 |
#define | REG2R_COUNT 43 |
#define | LOOP_REG2I(FUNC, EXPR) LOOP_SUM_FUNC_OBJ(Region2,FUNC,EXPR,REG2I_COUNT) |
#define | LOOP_REG2R(FUNC, EXPR) LOOP_SUM_FUNC_OBJ(Region2,FUNC,EXPR,REG2R_COUNT) |
#define | EVAL_REG2(FUNC, EXPR) EXPR_FUNC_OBJ(Region2,FUNC,EXPR,Num) |
Functions | |
EVAL_REG2 (gam, gam0(c)+gamr(c)) EVAL_REG2(gamtau | |
gamtau0 (c)+gamtaur(c)) EVAL_REG2(gampi | |
gampi0 (c)+gampir(c)) EVAL_REG2(gamtautau | |
gamtautau0 (c)+gamtautaur(c)) EVAL_REG2(gampipi | |
gampipi0 (c)+gampipir(c)) EVAL_REG2(gampitau | |
gampitau0 (c)+gampitaur(c)) EVAL_REG2(gam0 | |
log (c.pi)+gam0sum(c)) EVAL_REG2(gampipi0 | |
sq (c.pi)) LOOP_REG2I(gam0sum | |
REGION2_N0 *[i] | pow (c.tau, REGION2_J0[i])) |
LOOP_REG2I (gamtau0, REGION2_N0[i]*REGION2_J0[i]*pow(c.tau, REGION2_J0[i]-1)) | |
LOOP_REG2I (gamtautau0, REGION2_N0[i]*REGION2_J0[i]*(REGION2_J0[i]-1)*pow(c.tau, REGION2_J0[i]-2)) | |
LOOP_REG2I (gampitau0, 0) | |
LOOP_REG2R (gamr, REGION2_N[i]*pow(c.pi, REGION2_I[i])*pow(c.tau-0.5, REGION2_J[i])) | |
LOOP_REG2R (gampir, REGION2_N[i]*REGION2_I[i]*pow(c.pi, REGION2_I[i]-1)*pow(c.tau-0.5, REGION2_J[i])) | |
LOOP_REG2R (gampipir, REGION2_N[i]*REGION2_I[i]*(REGION2_I[i]-1)*pow(c.pi, REGION2_I[i]-2)*pow(c.tau-0.5, REGION2_J[i])) | |
LOOP_REG2R (gamtaur, REGION2_N[i]*pow(c.pi, REGION2_I[i])*REGION2_J[i]*pow(c.tau-0.5, REGION2_J[i]-1)) | |
LOOP_REG2R (gamtautaur, REGION2_N[i]*pow(c.pi, REGION2_I[i])*REGION2_J[i]*(REGION2_J[i]-1)*pow(c.tau-0.5, REGION2_J[i]-2)) | |
LOOP_REG2R (gampitaur, REGION2_N[i]*REGION2_I[i]*pow(c.pi, REGION2_I[i]-1)*REGION2_J[i]*pow(c.tau-0.5, REGION2_J[i]-1)) | |
Variables | |
const int | REGION2_J0 [REG2I_COUNT] = { 0, 1, -5, -4, -3, -2, -1, 2, 3 } |
const Num | REGION2_N0 [REG2I_COUNT] |
const int | REGION2_I [REG2R_COUNT] |
const int | REGION2_J [REG2R_COUNT] |
const Num | REGION2_N [REG2R_COUNT] |
#define LOOP_REG2I | ( | FUNC, | |||
EXPR | ) | LOOP_SUM_FUNC_OBJ(Region2,FUNC,EXPR,REG2I_COUNT) |
#define LOOP_REG2R | ( | FUNC, | |||
EXPR | ) | LOOP_SUM_FUNC_OBJ(Region2,FUNC,EXPR,REG2R_COUNT) |
#define REG2I_COUNT 9 |
#define REG2R_COUNT 43 |
EVAL_REG2 | ( | gam | , | |
gam0(c)+gamr(c) | ||||
) |
gampi0 | ( | c | ) |
gampipi0 | ( | c | ) |
gampitau0 | ( | c | ) |
gamtau0 | ( | c | ) |
gamtautau0 | ( | c | ) |
log | ( | c. | pi | ) |
Referenced by IAPWS95::phi0().
LOOP_REG2I | ( | gampitau0 | , | |
0 | ||||
) |
LOOP_REG2I | ( | gamtautau0 | , | |
REGION2_N0 *REGION2_J0 * | (REGION2_J0[i]-1)*pow(c.tau, REGION2_J0[i]-2)[i][i] | |||
) |
LOOP_REG2I | ( | gamtau0 | , | |
REGION2_N0 *REGION2_J0 * | pow(c.tau, REGION2_J0[i]-1)[i][i] | |||
) |
LOOP_REG2R | ( | gampitaur | , | |
REGION2_N *REGION2_I * | pow(c.pi, REGION2_I[i]-1)*REGION2_J *pow(c.tau-0.5, REGION2_J[i]-1)[i][i][i] | |||
) |
LOOP_REG2R | ( | gamtautaur | , | |
REGION2_N * | pow(c.pi, REGION2_I[i])*REGION2_J *(REGION2_J[i]-1)*pow(c.tau-0.5, REGION2_J[i]-2)[i][i] | |||
) |
LOOP_REG2R | ( | gamtaur | , | |
REGION2_N * | pow(c.pi, REGION2_I[i])*REGION2_J *pow(c.tau-0.5, REGION2_J[i]-1)[i][i] | |||
) |
LOOP_REG2R | ( | gampipir | , | |
REGION2_N *REGION2_I * | (REGION2_I[i]-1)*pow(c.pi, REGION2_I[i]-2)*pow(c.tau-0.5, REGION2_J[i])[i][i] | |||
) |
LOOP_REG2R | ( | gampir | , | |
REGION2_N *REGION2_I * | pow(c.pi, REGION2_I[i]-1)*pow(c.tau-0.5, REGION2_J[i])[i][i] | |||
) |
LOOP_REG2R | ( | gamr | , | |
REGION2_N * | pow(c.pi, REGION2_I[i])*pow(c.tau-0.5, REGION2_J[i])[i] | |||
) |
REGION2_N0* [i] pow | ( | c. | tau, | |
REGION2_J0 | [i] | |||
) |
Referenced by Boundaries::getSatDensSteam_T(), Boundaries::getSatDensWater_T(), Boundaries::getSatPres_T(), Boundaries::getTbound_p(), Units< 0, 0, 0, 1 >::ipow(), SteamCalculator::lam2(), SteamCalculator::mu0(), SteamCalculator::mu1(), SteamCalculator::mu2(), IAPWS95::phir(), IAPWS95::phirdelta(), IAPWS95::phirdeltadelta(), IAPWS95::phirdeltatau(), IAPWS95::phirtau(), IAPWS95::phirtautau(), Region3::speccp(), and surfaceTension().
sq | ( | c. | pi | ) |
const int REGION2_I[REG2R_COUNT] |
Initial value:
{ 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 4, 4, 4, 5, 6, 6, 6, 7, 7, 7, 8, 8, 9, 10, 10, 10, 16, 16, 18, 20, 20, 20, 21, 22, 23, 24, 24, 24 }
const int REGION2_J[REG2R_COUNT] |
Initial value:
{ 0, 1, 2, 3, 6, 1, 2, 4, 7, 36, 0, 1, 3, 6, 35, 1, 2, 3, 7, 3, 16, 35, 0, 11, 25, 8, 36, 13, 4, 10, 14, 29, 50, 57, 20, 35, 48, 21, 53, 39, 26, 40, 58 }
const int REGION2_J0[REG2I_COUNT] = { 0, 1, -5, -4, -3, -2, -1, 2, 3 } |
Initial value:
{ -0.17731742473213E-02, -0.17834862292358E-01, -0.45996013696365E-01, -0.57581259083432E-01, -0.50325278727930E-01, -0.33032641670203E-04, -0.18948987516315E-03, -0.39392777243355E-02, -0.43797295650573E-01, -0.26674547914087E-04, 0.20481737692309E-07, 0.43870667284435E-06, -0.32277677238570E-04, -0.15033924542148E-02, -0.40668253562649E-01, -0.78847309559367E-09, 0.12790717852285E-07, 0.48225372718507E-06, 0.22922076337661E-05, -0.16714766451061E-10, -0.21171472321355E-02, -0.23895741934104E+02, -0.59059564324270E-17, -0.12621808899101E-05, -0.38946842435739E-01, 0.11256211360459E-10, -0.82311340897998E+01, 0.19809712802088E-07, 0.10406965210174E-18, -0.10234747095929E-12, -0.10018179379511E-08, -0.80882908646985E-10, 0.10693031879409E+00, -0.33662250574171E+00, 0.89185845355421E-24, 0.30629316876232E-12, -0.42002467698208E-05, -0.59056029685639E-25, 0.37826947613457E-05, -0.12768608934681E-14, 0.73087610595061E-28, 0.55414715350778E-16, -0.94369707241210E-06 }
const Num REGION2_N0[REG2I_COUNT] |
Initial value:
{ -0.96927686500217E+01, 0.10086655968018E+02, -0.56087911283020E-02, 0.71452738081455E-01, -0.40710498223928E+00, 0.14240819171444E+01, -0.43839511319450E+01, -0.28408632460772E+00, 0.21268463753307E-01 }