Example #1
0
class Cis_2_butene(MEoS):
    """Multiparameter equation of state for cis-butene"""
    name = "cis-butene"
    CASNumber = "590-18-1"
    formula = "CH3-CH=CH-CH3"
    synonym = ""
    rhoc = unidades.Density(238.11522208)
    Tc = unidades.Temperature(435.75)
    Pc = unidades.Pressure(4225.5, "kPa")
    M = 56.10632  # g/mol
    Tt = unidades.Temperature(134.3)
    Tb = unidades.Temperature(276.87)
    f_acent = 0.202
    momentoDipolar = unidades.DipoleMoment(0.3, "Debye")
    id = 25

    Fi1 = {
        "ao_log": [1, 2.9687],
        "pow": [0, 1],
        "ao_pow": [0.2591542, 2.4189888],
        "ao_exp": [3.2375, 7.0437, 11.414, 7.3722],
        "titao": [248 / Tc, 1183 / Tc, 2092 / Tc, 4397 / Tc]
    }

    helmholtz1 = {
        "__type__": "Helmholtz",
        "__name__":
        "short Helmholtz equation of state for cis-butene of Lemmon and Ihmels (2005)",
        "__doi__": {
            "autor": "Lemmon, E.W., Ihmels, E.C.",
            "title":
            "Thermodynamic properties of the butenes: Part II. Short fundamental equations of state",
            "ref": "Fluid Phase Equilibria 228 – 229 (2004), 173 – 187.",
            "doi": "10.1016/j.fluid.2004.09.004"
        },
        "__test__": """
            >>> st=Cis_2_butene(T=350, rho=0)
            >>> print "%0.0f %0.1f %0.1f %0.5g %0.5g %0.5g %0.5g" % (st.T, st.rhoM, st.P.MPa, st.hM.kJkmol, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            350 0.0 0.0 29735 83.593 91.907 238.8
            >>> st=Cis_2_butene(T=350, rho=0.3*56.10632)
            >>> print "%0.0f %0.1f %.5g %.5g %0.5g %0.5g %0.5g %0.5g" % (st.T, st.rhoM, st.P.MPa, st.hM.kJkmol, st.sM.kJkmolK, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            350 0.3 0.74661 28294 84.888 89.258 106.34 209.87
            >>> st=Cis_2_butene(T=350, rho=10*56.10632)
            >>> print "%0.0f %0.1f %.5g %.5g %0.5g %0.5g %0.5g %0.5g" % (st.T, st.rhoM, st.P.MPa, st.hM.kJkmol, st.sM.kJkmolK, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            350 10.0 5.8051 9632.7 29.1 93.935 138.23 770.1
            >>> st=Cis_2_butene(T=440, rho=4*56.10632)
            >>> print "%0.0f %0.1f %.5g %.5g %0.5g %0.5g %0.5g %0.5g" % (st.T, st.rhoM, st.P.MPa, st.hM.kJkmol, st.sM.kJkmolK, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            440 4.0 4.5067 28321 75.755 126 1686.3 130.71
            """,  # Table 9, Pag 186
        "R": 8.314472,
        "cp": Fi1,
        "ref": "NBP",
        "Tmin": Tt,
        "Tmax": 525.,
        "Pmax": 50000.0,
        "rhomax": 14.09,
        "Pmin": 0.00026,
        "rhomin": 14.09,
        "nr1": [0.77827, -2.8064, 1.003, 0.013762, 0.085514, 0.00021268],
        "d1": [1, 1, 1, 2, 3, 7],
        "t1": [0.12, 1.3, 1.74, 2.1, 0.28, 0.69],
        "nr2": [0.22962, -0.072442, -0.23722, -0.074071, -0.026547, 0.012032],
        "d2": [2, 5, 1, 4, 3, 4],
        "t2": [0.75, 2., 4.4, 4.7, 15., 14.],
        "c2": [1, 1, 2, 2, 3, 3],
        "gamma2": [1] * 6
    }

    eq = helmholtz1,

    _vapor_Pressure = {
        "eq": 5,
        "ao": [-0.70022e1, 0.13695e1, -0.30509e1, 0.10012, -0.15577e1],
        "exp": [1.0, 1.5, 3.2, 3.46, 6.4]
    }
    _liquid_Density = {
        "eq": 1,
        "ao": [0.46849e1, -0.54614e1, 0.34718e1, 0.50511e1, -0.50389e1],
        "exp": [0.402, 0.54, 0.69, 6.6, 7.0]
    }
    _vapor_Density = {
        "eq":
        3,
        "ao": [
            -0.28918e1, -0.58582e1, -0.17443e2, -0.24566e2, -0.29413e2,
            -0.11392e3
        ],
        "exp": [0.4098, 1.174, 3.11, 6.1, 7.6, 14.8]
    }
Example #2
0
class mXylene(MEoS):
    """Multiparameter equation of state for m-xylene"""
    name = "m-xylene"
    CASNumber = "108-38-3"
    formula = "C8H10"
    synonym = "1,3-dimethylbenzene"
    rhoc = unidades.Density(282.929725)
    Tc = unidades.Temperature(616.89)
    Pc = unidades.Pressure(3534.6, "kPa")
    M = 106.165  # g/mol
    Tt = unidades.Temperature(225.3)
    Tb = unidades.Temperature(412.214)
    f_acent = 0.326
    momentoDipolar = unidades.DipoleMoment(0.3, "Debye")
    id = 43

    Fi1 = {
        "ao_log": [1, 1.169909],
        "pow": [0, 1],
        "ao_pow": [12.652887, -0.45975624],
        "ao_exp": [4.44312, 2.862794, 24.83298, 16.26077],
        "titao": [160 / Tc, 190 / Tc, 1333 / Tc, 3496 / Tc]
    }

    helmholtz1 = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for m-xylene of Zhou et al. (2012).",
        "__doi__": {
            "autor": "Zhou, Y., Lemmon, E.W., and Wu, J.",
            "title":
            "Thermodynamic Properties of o-Xylene, m-Xylene, p-Xylene, and Ethylbenzene",
            "ref": "J. Phys. Chem. Ref. Data 41, 023103 (2012).",
            "doi": "10.1063/1.3703506"
        },
        "R":
        8.314472,
        "cp":
        Fi1,
        "ref":
        "OTO",
        "Tmin":
        Tt,
        "Tmax":
        700.0,
        "Pmax":
        200000.0,
        "rhomax":
        8.677,
        "Pmin":
        0.003123,
        "rhomin":
        8.677,
        "nr1": [
            0.000012791017, 0.041063111, 1.505996, -2.3095875, -0.46969,
            0.171031
        ],
        "d1": [8, 4, 1, 1, 2, 3],
        "t1": [1.0, 0.91, 0.231, 0.772, 1.205, 0.323],
        "nr2": [-1.001728, -0.3945766, 0.6970578, -0.3002876, -0.024311],
        "d2": [1, 3, 2, 2, 7],
        "t2": [2.7, 3.11, 0.768, 4.1, 0.818],
        "c2": [2, 2, 1, 2, 1],
        "gamma2": [1] * 5,
        "nr3": [0.815488, -0.330647, -0.123393, -0.54661],
        "d3": [1, 1, 3, 3],
        "t3": [2.0, 2.9, 3.83, 0.5],
        "alfa3": [1.0244, 1.3788, 0.9806, 6.3563],
        "beta3": [1.66, 1.9354, 1.0323, 78],
        "gamma3": [1.1013, 0.6515, 0.4975, 1.26],
        "epsilon3": [0.713, 0.9169, 0.6897, 0.7245]
    }

    eq = helmholtz1,

    _surface = {"sigma": [0.0661], "exp": [1.29]}
    _vapor_Pressure = {
        "eq": 5,
        "ao": [-7.5635, 1.2857, -3.2346, -1.9018],
        "exp": [1.0, 1.5, 3.1, 5.6]
    }
    _liquid_Density = {
        "eq": 1,
        "ao": [0.43346, 3.8716, -3.0144, 1.619],
        "exp": [0.16, 0.6, 1.0, 1.5]
    }
    _vapor_Density = {
        "eq": 3,
        "ao": [-1.1597, -6.0358, -16.712, -45.482, -98.418],
        "exp": [0.26, 0.78, 2.6, 5.7, 11.7]
    }
Example #3
0
class mXylene(MEoS):
    """Multiparameter equation of state for m-xylene"""
    name = "m-xylene"
    CASNumber = "108-38-3"
    formula = "C8H10"
    synonym = "1,3-dimethylbenzene"
    _refPropName = "MXYLENE"
    _coolPropName = "m-Xylene"
    rhoc = unidades.Density(282.929725)
    Tc = unidades.Temperature(616.89)
    Pc = unidades.Pressure(3534.6, "kPa")
    M = 106.165  # g/mol
    Tt = unidades.Temperature(225.3)
    Tb = unidades.Temperature(412.214)
    f_acent = 0.326
    momentoDipolar = unidades.DipoleMoment(0.3, "Debye")
    id = 43

    Fi1 = {"ao_log": [1, 1.169909],
           "pow": [0, 1],
           "ao_pow": [12.652887, -0.45975624],
           "ao_exp": [4.44312, 2.862794, 24.83298, 16.26077],
           "titao": [160/Tc, 190/Tc, 1333/Tc, 3496/Tc]}

    zhou = {
        "__type__": "Helmholtz",
        "__name__": "Helmholtz equation of state for ethylbenzene of Zhou et "
                    "al. (2012).",
        "__doi__": {"autor": "Zhou, Y., Lemmon, E.W., and Wu, J.",
                    "title": "Thermodynamic Properties of o-Xylene, m-Xylene, "
                             "p-Xylene, and Ethylbenzene",
                    "ref": "J. Phys. Chem. Ref. Data 41, 023103 (2012).",
                    "doi": "10.1063/1.3703506"},

        "R": 8.314472,
        "cp": Fi1,
        "ref": "OTO",

        "Tmin": Tt, "Tmax": 700.0, "Pmax": 200000.0, "rhomax": 8.677,
        "Pmin": 0.003123, "rhomin": 8.677,

        "nr1": [0.000012791017, 0.041063111, 1.505996, -2.3095875, -0.46969,
                0.171031],
        "d1": [8, 4, 1, 1, 2, 3],
        "t1": [1.0, 0.91, 0.231, 0.772, 1.205, 0.323],

        "nr2": [-1.001728, -0.3945766, 0.6970578, -0.3002876, -0.024311],
        "d2": [1, 3, 2, 2, 7],
        "t2": [2.7, 3.11, 0.768, 4.1, 0.818],
        "c2": [2, 2, 1, 2, 1],
        "gamma2": [1]*5,

        "nr3": [0.815488, -0.330647, -0.123393, -0.54661],
        "d3": [1, 1, 3, 3],
        "t3": [2.0, 2.9, 3.83, 0.5],
        "alfa3": [1.0244, 1.3788, 0.9806, 6.3563],
        "beta3": [1.66, 1.9354, 1.0323, 78],
        "gamma3": [1.1013, 0.6515, 0.4975, 1.26],
        "epsilon3": [0.713, 0.9169, 0.6897, 0.7245]}

    eq = zhou,

    _surface = {"sigma": [0.0661], "exp": [1.29]}
    _vapor_Pressure = {
        "eq": 3,
        "n": [-7.5635, 1.2857, -3.2346, -1.9018],
        "t": [1.0, 1.5, 3.1, 5.6]}
    _liquid_Density = {
        "eq": 1,
        "n": [0.43346, 3.8716, -3.0144, 1.619],
        "t": [0.16, 0.6, 1.0, 1.5]}
    _vapor_Density = {
        "eq": 2,
        "n": [-1.1597, -6.0358, -16.712, -45.482, -98.418],
        "t": [0.26, 0.78, 2.6, 5.7, 11.7]}

    visco0 = {"__name__": "Cao (2016)",
              "__doi__": {
                  "autor": "Cao, F.L., Meng, X.Y., Wu, J.T., Vesovic, V.",
                  "title": "Reference Correlation of the Viscosity of "
                           "meta-Xylene from 273 to 673 K and up to 110 MPa",
                  "ref": "J. Phys. Chem. Ref. Data 45(1) (2016) 013103",
                  "doi": "10.1063/1.4941241"},

              "eq": 1, "omega": 3,
              "collision": [-1.4933, 473.2, -57033],

              "sigma": 1,
              "n_chapman": 0.22115/M**0.5,

              "Tref_res": 616.89, "rhoref_res": 2.665*M,
              "nr": [-0.26895, 0.320971, -0.0290018, 1.72866e-10, 14.7728,
                     -18.9852, 17.1128],
              "dr": [112/15, 112/15, 2/3+3.3, 68/3, 34/15, 19/15, 16/15],
              "tr": [-0.5, -0.2, -0.5, 2.7, -0.5, -1.5, -0.5],

              "special": "_vir"}

    def _vir(self, rho, T, fase):
        # The initial density dependence has a different expresion, without muo
        # and other normal method calculation so hardcoded here
        muB = 0
        if rho:
            for i, n in enumerate([13.2814, -10862.4, 1664060]):
                muB += n/T**i
        return muB*rho/self.M

    _viscosity = visco0,

    thermo0 = {"__name__": "Mylona (2014)",
               "__doi__": {
                   "autor": "Mylona, S.K., Antoniadis, K.D., Assael, M.J., "
                            "Huber, M.L., Perkins, R.A.",
                   "title": "Reference Correlations of the Thermal "
                            "Conductivity of o-Xylene, m-Xylene, p-Xylene, "
                            "and Moderate Pressures",
                   "ref": "J. Phys. Chem. Ref. Data 43(4) (2014) 043104",
                   "doi": "10.1063/1.4901166"},

               "eq": 1,

               "Toref": 616.89, "koref": 1e-3,
               "no_num": [0.242107, 13.522, -123.168, 296.882, -107.973,
                          18.686, -1.29167],
               "to_num": [0, 1, 2, 3, 4, 5, 6],
               "no_den": [-0.850118, 3.11646, 0.0001],
               "to_den": [0, 1, 2],

               "Tref_res": 616.89, "rhoref_res": 282.9297, "kref_res": 1e-3,
               "nr": [-6.79314e1, 2.25778e2, -1.85693e2, 6.19006e1, -7.11664,
                      5.92537e1, -1.62626e2, 1.33036e2, -4.49051e1, 5.6186],
               "tr": [0, 0, 0, 0, 0, -1, -1, -1, -1, -1],
               "dr": [1, 2, 3, 4, 5, 1, 2, 3, 4, 5],

               "critical": 3,
               "gnu": 0.63, "gamma": 1.239, "R0": 1.02, "Xio": 0.235e-9,
               "gam0": 0.057, "qd": 0.713e-9, "Tcref": 925.3}

    _thermal = thermo0,
Example #4
0
class R124(MEoS):
    """Multiparameter equation of state for R124"""
    name = "1-chloro-1,2,2,2-tetrafluoroethane"
    CASNumber = "2837-89-0"
    formula = "CHClFCF3"
    synonym = "R124"
    _refPropName = "R124"
    _coolPropName = "R124"
    rhoc = unidades.Density(560.)
    Tc = unidades.Temperature(395.425)
    Pc = unidades.Pressure(3624.295, "kPa")
    M = 136.4762  # g/mol
    Tt = unidades.Temperature(74.)
    Tb = unidades.Temperature(261.187)
    f_acent = 0.28810
    momentoDipolar = unidades.DipoleMoment(1.469, "Debye")
    # id = 1629

    CP1 = {"ao": 3.175638,
           "an": [14.77947*Tc, -5.2420986*Tc**2, 1.3381596*Tc**3],
           "pow": [1, 2, 3],
           "ao_exp": [], "exp": [],
           "ao_hyp": [], "hyp": []}

    CP2 = {"ao": 3.20532538,
           "an": [13.4403357*395.62, -2.32192933*395.62**2,
                  -0.422826803*395.62**3],
           "pow": [1, 2, 3],
           "ao_exp": [], "exp": [],
           "ao_hyp": [], "hyp": []}

    vries = {
        "__type__": "Helmholtz",
        "__name__": "Helmholtz equation of state for R-124 of de Vries (1995)",
        "__doi__": {"autor": "de Vries, B., Tillner-Roth, R., Baehr, H.D.",
                    "title": "Thermodynamic Properties of HCFC 124,",
                    "ref": "19th International Congress of Refrigeration, The "
                           "Hague, The Netherlands, IIR, IVa:582-589, 1995",
                    "doi":  ""},

        "R": 8.314471,
        "M": 136.475, "rhoc": 4.1033156,

        "cp": CP1,
        "ref": "IIR",

        "Tmin": 120.0, "Tmax": 470.0, "Pmax": 40000.0, "rhomax": 13.5758,
        "Pmin": 0.00000000032, "rhomin": 13.5758,

        "nr1": [-0.1262962e-1, 0.2168373e1, -0.3330033e1, 0.1610361,
                -0.9666145e-4, 0.1191310e-1, -0.2880217e-2, 0.1681346e-2,
                0.1594968e-4],
        "d1": [1, 1, 1, 2, 2, 3, 5, 6, 8],
        "t1": [2, 0.5, 1, 0.5, 2.5, -1, 1, 0, -0.5],

        "nr2": [0.1289674, 0.1182213e-4, -0.4713997, -0.2412873, 0.6868066,
                -0.8621095e-1, 0.4728645e-5, 0.1487933e-1, -0.3001338e-1,
                0.1849606e-2, 0.4126073e-3],
        "d2": [2, 12, 1, 1, 1, 1, 15, 3, 3, 4, 9],
        "t2": [1.5, 1, 2.5, -0.25, 1, 5, 2, 15, 20, 15, 45],
        "c2": [1, 1, 2, 2, 2, 2, 2, 3, 3, 4, 4],
        "gamma2": [1]*11}

    younglove = {
        "__type__": "MBWR",
        "__name__": "MBWR equation of state for R-124 of Younglove and "
                    "McLinden (1994)",
        "__doi__": {"autor": "McLinden, M.O., Younglove, B.A., Sandarusi, J.",
                    "title": "Measurement of the PVT properties and "
                             "formulation of an equation of state for "
                             "refrigerant 124 (1-chloro-1,2,2,2-"
                             "tetrafluoroethane)",
                    "ref": "1994. (unpublished manuscript)",
                    "doi": ""},

        "R": 8.314471,
        "M": 136.4762, "Tc": 395.62, "Pc": 3637., "rhoc": 4.101527,

        "cp": CP2,
        "ref": "IIR",

        "Tmin": 120.0, "Tmax": 475.0, "Pmax": 36000.0, "rhomax": 13.98,
        "Pmin": 0.00000000032, "rhomin": 14.54,

        "b": [None, -0.195111839846e-1, 0.299978502039e1, -0.845849168162e2,
              0.146720754658e5, -0.232549336572e7, 0.938866046628e-3,
              -0.425069993257e1, 0.304859131600e4, 0.221314829910e7,
              -0.601971995213e-4, 0.100335188373e1, -0.468461812962e3,
              -0.927654315163e-2, -0.125426962519e2, -0.228534445089e4,
              0.168197835599e1, -0.537322295315e-1, 0.157915168095e2,
              -0.550297175283, -0.244349954189e7, -0.625153016263e8,
              -0.156149231820e6, 0.344268154495e10, -0.289212955106e4,
              0.108351996828e6, -0.404809912845e2, -0.220587292481e7,
              -0.564677367857, 0.175581172016e3, -0.762146322899e-3,
              -0.210617958917e1, 0.319236066221e2]}

    eq = vries, younglove

    _surface = {"sigma": [0.05175], "exp": [1.197]}
    _vapor_Pressure = {
        "eq": 3,
        "n": [-0.75146e1, 0.37481e1, -0.30124e1, -0.37808e1, -0.53114],
        "t": [1.0, 1.5, 1.68, 3.8, 8.0]}
    _liquid_Density = {
        "eq": 1,
        "n": [0.19127e1, 0.67778, -0.35129e-1, 0.30407, 0.69503e-1],
        "t": [0.345, 0.74, 1.2, 2.6, 7.2]}
    _vapor_Density = {
        "eq": 2,
        "n": [-2.8551, -6.385, -17.616, -37.828, -23.785, -134.59],
        "t": [0.388, 1.17, 3.0, 6.0, 8.0, 15.0]}
Example #5
0
class Ethanol(MEoS):
    """Multiparameter equation of state for ethanol"""
    name = "ethanol"
    CASNumber = "64-17-5"
    formula = "C2H6O"
    synonym = ""
    rhoc = unidades.Density(273.1858492)
    Tc = unidades.Temperature(514.71)
    Pc = unidades.Pressure(6268., "kPa")
    M = 46.06844  # g/mol
    Tt = unidades.Temperature(159)
    Tb = unidades.Temperature(351.57)
    f_acent = 0.646
    momentoDipolar = unidades.DipoleMoment(1.6909, "Debye")
    id = 134

    Fi1 = {
        "ao_log": [1, 3.43069],
        "pow": [0, 1],
        "ao_pow": [-12.7531, 9.39094],
        "ao_exp": [2.14326, 5.09206, 6.60138, 5.70777],
        "titao": [420.4 / Tc, 1334 / Tc, 1958 / Tc, 4420 / Tc]
    }

    CP1 = {
        "ao": 6.4112,
        "an": [],
        "pow": [],
        "ao_exp": [1.95988750679, 7.60084166080, 3.89583440622, 4.23238091363],
        "exp": [694, 1549, 2911, 4659],
        "ao_hyp": [],
        "hyp": []
    }

    helmholtz1 = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for ethanol of Schroeder (2011).",
        "__doi__": {
            "autor": "Schroeder, J. A.; Penoncello, S. G.; Schroeder, J. S.",
            "title": "A Fundamental Equation of State for Ethanol",
            "ref": "J. Phys. Chem. Ref. Data 43, 043102 (2014)",
            "doi": "10.1063/1.4895394"
        },
        "__test__":
        """
            >>> st=Ethanol(T=300, rhom=18)
            >>> print "%0.1f %0.1f %0.8g %0.8g %0.8g %0.8g" % ( \
                st.T, st.rhoM, st.P.MPa, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            300.0 18.0 65.640781 94.211739 110.34295 1454.836
            >>> st=Ethanol(T=450, rhom=13.2)
            >>> print "%0.1f %0.1f %0.8g %0.8g %0.8g %0.8g" % ( \
                st.T, st.rhoM, st.P.MPa, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            450.0 13.2 2.921546 137.3679 191.28901 588.67833
            >>> st=Ethanol(T=450, rhom=0.5)
            >>> print "%0.1f %0.1f %0.8g %0.8g %0.8g %0.8g" % ( \
                st.T, st.rhoM, st.P.MPa, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            450.0 0.5 1.5540771 97.346133 125.53109 263.57231
            >>> st=Ethanol(T=550, rhom=6)
            >>> print "%0.1f %0.1f %0.8g %0.8g %0.8g %0.8g" % ( \
                st.T, st.rhoM, st.P.MPa, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            550.0 6.0 10.315533 151.00169 440.13187 207.74032
            >>> st=Ethanol(T=514.8, rhom=6)
            >>> print "%0.1f %0.1f %0.8g %0.8g %0.8g %0.8g" % ( \
                st.T, st.rhoM, st.P.MPa, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            514.8 6.0 6.2784176 163.95041 115623.88 159.34583
            """,  # Table 30, Pag 38
        "R":
        8.314472,
        "cp":
        Fi1,
        "ref": {
            "Tref": 273.15,
            "Pref": 1.,
            "ho": 52811.79,
            "so": 209.583
        },
        "Tmin":
        159.0,
        "Tmax":
        650.0,
        "Pmax":
        280000.0,
        "rhomax":
        19.74,
        "Pmin":
        0.00000088,
        "rhomin":
        19.731,
        "nr1": [
            0.58200796e-1, 0.94391227, -0.80941908, 0.55359038, -0.14269032e1,
            0.13448717
        ],
        "d1": [4, 1, 1, 2, 2, 3],
        "t1": [1, 1.04, 2.72, 1.174, 1.329, 0.195],
        "nr2": [
            0.42671978, -0.11700261e1, -0.92405872, 0.34891808, -0.9132772,
            0.22629481e-1, -0.15513423, 0.21055146, -0.2199769, -0.65857238e-2
        ],
        "d2": [1, 1, 1, 3, 3, 2, 2, 6, 6, 8],
        "t2": [2.43, 1.274, 4.16, 3.3, 4.177, 2.5, 0.81, 2.02, 1.606, 0.86],
        "c2": [1, 1, 2, 1, 2, 1, 2, 1, 1, 1],
        "gamma2": [1] * 10,
        "nr3": [
            .75564749, .1069411, -.69533844e-1, -.24947395, .27177891e-1,
            -0.9053953e-3, -0.12310953, -0.8977971e-1, -0.39512601
        ],
        "d3": [1, 1, 2, 3, 3, 2, 2, 2, 1],
        "t3": [2.5, 3.72, 1.19, 3.25, 3, 2, 2, 1, 1],
        "alfa3": [1.075, .463, .876, 1.108, .741, 4.032, 2.453, 2.3, 3.143],
        "beta3": [1.207, .0895, .581, .947, 2.356, 27.01, 4.542, 1.287, 3.09],
        "gamma3":
        [1.194, 1.986, 1.583, .756, .495, 1.002, 1.077, 1.493, 1.542],
        "epsilon3": [.779, .805, 1.869, .694, 1.312, 2.054, .441, .793, .313],
        "nr4": []
    }

    helmholtz2 = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for ethanol of Dillon and Penoncello (2004)",
        "__doi__": {
            "autor": "Dillon, H.E. and Penoncello, S.G.",
            "title":
            "A Fundamental Equation for Calculation of the Thermodynamic Properties of Ethanol",
            "ref": "Int. J. Thermophys., 25(2):321-335, 2004.",
            "doi": "10.1023/B:IJOT.0000028470.49774.14"
        },
        "__test__":
        """
            >>> st=Ethanol(T=350, P=1e5, eq=1)
            >>> print "%0.1f %0.0f %0.5g %0.5g %0.5g %0.5g %0.5g %0.5g" % (st.P.MPa, st.T, st.rho, st.h.kJkg, st.s.kJkgK, st.cv.kJkgK, st.cp.kJkgK, st.w)
            0.1 350 737.85 259.95 1.0363 2.6542 3.1707 964.32
            >>> st=Ethanol(T=650, P=1e5, eq=1)
            >>> print "%0.1f %0.0f %0.4g %0.5g %0.5g %0.5g %0.5g %0.5g" % (st.P.MPa, st.T, st.rho, st.h.kJkg, st.s.kJkgK, st.cv.kJkgK, st.cp.kJkgK, st.w)
            0.1 650 0.8534 1771.7 4.8011 2.3679 2.5512 355.1
            >>> st=Ethanol(T=450, P=1e6, eq=1)
            >>> print "%i %i %0.5g %0.5g %0.5g %0.5g %0.5g %0.5g" % (st.P.MPa, st.T, st.rho, st.h.kJkg, st.s.kJkgK, st.cv.kJkgK, st.cp.kJkgK, st.w)
            1 450 13.736 1270.3 3.4711 2.0217 2.3954 276.5
            >>> st=Ethanol(T=250, P=1e7, eq=1)
            >>> print "%i %i %0.5g %0.5g %0.5g %0.5g %0.5g %0.5g" % (st.P.MPa, st.T, st.rho, st.h.kJkg, st.s.kJkgK, st.cv.kJkgK, st.cp.kJkgK, st.w)
            10 250 831.84 9.4714 0.1625 1.6724 2.0325 1372.8
            >>> st=Ethanol(T=600, P=1e7, eq=1)
            >>> print "%i %i %0.5g %0.5g %0.5g %0.5g %0.5g %0.5g" % (st.P.MPa, st.T, st.rho, st.h.kJkg, st.s.kJkgK, st.cv.kJkgK, st.cp.kJkgK, st.w)
            10 600 129 1474.5 3.5258 2.7347 4.0688 273.66
            >>> st=Ethanol(T=400, P=1e8, eq=1)
            >>> print "%i %i %0.5g %0.5g %0.5g %0.5g %0.5g %0.5g" % (st.P.MPa, st.T, st.rho, st.h.kJkg, st.s.kJkgK, st.cv.kJkgK, st.cp.kJkgK, st.w)
            100 400 784.52 500.06 1.3279 2.8005 3.2736 1348.2
            """,  # Table IV, Pag 329
        "R":
        8.314472,
        "cp":
        CP1,
        "ref": {
            "Tref": 273.15,
            "Pref": 1.,
            "ho": 45800,
            "so": 180
        },
        "Tc":
        513.9,
        "rhoc":
        5.991,
        "Tmin":
        250.0,
        "Tmax":
        650.0,
        "Pmax":
        280000.0,
        "rhomax":
        19.4,
        "Pmin":
        0.00000088,
        "rhomin":
        19.4,
        "nr1": [
            0.114008942201e2, -0.395227128302e2, 0.413063408370e2,
            -0.188892923721e2, 0.472310314140e1, -0.778322827052e-2,
            0.171707850032, -0.153758307602e1, 0.142405508571e1,
            0.132732097050, -0.114231649761, 0.327686088736e-5,
            0.495699527725e-3, -0.701090149558e-4, -0.225019381648e-5
        ],
        "d1": [1, 1, 1, 1, 1, 1, 2, 2, 2, 3, 3, 6, 7, 8, 8],
        "t1": [-0.5, 0, 0.5, 1.5, 2, 5, -0.5, 1, 2, 0, 2.5, 6, 2, 2, 4],
        "nr2": [
            -0.255406026981, -0.632036870646e-1, -0.314882729522e-1,
            0.256187828185e-1, -0.308694499382e-1, 0.722046283076e-2,
            0.299286406225e-2, 0.972795913095e-3
        ],
        "d2": [1, 3, 3, 6, 7, 8, 2, 7],
        "t2": [5, 3, 7, 5.5, 4, 1, 22, 23],
        "c2": [2, 2, 2, 2, 2, 2, 4, 4],
        "gamma2": [1] * 8
    }

    helmholtz3 = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for ethanol of Sun and Ely (2004).",
        "__doi__": {
            "autor": "Sun, L. and Ely, J.F.",
            "title":
            "Universal equation of state for engineering application: Algorithm and  application to non-polar and polar fluids",
            "ref": "Fluid Phase Equilib., 222-223:107-118, 2004.",
            "doi": "10.1016/j.fluid.2004.06.028"
        },
        "R":
        8.314472,
        "cp":
        CP1,
        "ref": {
            "name": "CUSTOM",
            "Tref": 273.15,
            "Pref": 1.,
            "ho": 45800,
            "so": 180
        },
        "Tmin":
        Tt,
        "Tmax":
        650.0,
        "Pmax":
        280000.0,
        "rhomax":
        19.6,
        "Pmin":
        0.00000064,
        "rhomin":
        19.55,
        "nr1": [
            -2.95455387, 1.95055493, -1.31612955, -1.47547651e-2,
            1.39251945e-4, 5.04178939e-1
        ],
        "d1": [1, 1, 1, 3, 7, 2],
        "t1": [1.5, 0.25, 1.25, 0.25, 0.875, 1.375],
        "nr2": [
            2.52310166e-1, 1.97074652, 8.73146115e-1, 4.27767205e-2,
            9.68966545e-2, -8.39632113e-1, -7.71828521e-2, 1.63430744e-2
        ],
        "d2": [1, 1, 2, 5, 1, 1, 4, 2],
        "t2": [0, 2.375, 2., 2.125, 3.5, 6.5, 4.75, 12.5],
        "c2": [1, 1, 1, 1, 2, 2, 2, 3],
        "gamma2": [1] * 8
    }

    eq = helmholtz1, helmholtz2, helmholtz3
    _PR = 0.0043733

    _surface = {"sigma": [0.05], "exp": [0.952]}
    _vapor_Pressure = {
        "eq": 5,
        "ao": [-0.91043e1, 0.47263e1, -0.97145e1, 0.41536e1, -0.20739e1],
        "exp": [1, 1.5, 2.0, 2.55, 4.0]
    }
    _liquid_Density = {
        "eq": 1,
        "ao":
        [0.11632e2, -0.21866e3, 0.82694e3, -0.13512e4, 0.10517e4, -0.31809e3],
        "exp": [0.66, 1.5, 1.9, 2.3, 2.7, 3.1]
    }
    _vapor_Density = {
        "eq":
        3,
        "ao":
        [0.22543e1, -0.24734e2, 0.48993e2, -0.41689e2, -0.45104e2, -0.10732e3],
        "exp": [0.18, 0.44, 0.68, 0.95, 4.0, 10.0]
    }

    visco0 = {
        "eq":
        1,
        "omega":
        1,
        "__name__":
        "Kiselev (2005)",
        "__doi__": {
            "autor":
            "Kiselev, S. B., Ely, J. F., Abdulagatov, I. M., Huber, M. L.",
            "title":
            "Generalized SAFT-DFT/DMT Model for the Thermodynamic, Interfacial, and Transport Properties of Associating Fluids: Application for n-Alkanols",
            "ref": "Ind. Eng. Chem. Res., 2005, 44 (17), pp 6916–6927",
            "doi": "10.1021/ie050010e"
        },
        "ek":
        362.6,
        "sigma":
        0.453,
        "Tref":
        1.,
        "rhoref":
        1. * M,
        "n_chapman":
        0,
        "n_ideal": [-1.03116, 3.48379e-2, -6.50264e-6],
        "t_ideal": [0, 1, 2],
        "n_virial": [
            -0.19572881e2, 0.21973999e3, -0.10153226e4, 0.24710125e4,
            -0.33751717e4, 0.24916597e4, -0.78726086e3, 0.14085455e2,
            -0.34664158
        ],
        "t_virial": [0, -0.25, -0.5, -0.75, -1, -1.25, -1.5, -2.5, -5.5],
        "Tref_virial":
        362.6,
        "etaref_virial":
        0.0559816,
        "Tref_res":
        513.9,
        "rhoref_res":
        5.991 * M,
        "etaref_res":
        1000,
        "n_packed": [-3.38264465, 1.27568864e1],
        "t_packed": [0, 0.5],
        "n_poly": [
            1.31194057e-1, -8.05700894e-2, -3.82240694e-1, 1.53811778e-1, 0.0,
            -1.10578307e-1, -2.37222995e1
        ],
        "t_poly": [0, 0, -1, -1, -2, -2, 0],
        "d_poly": [2, 3, 2, 3, 2, 3, 1],
        "g_poly": [0, 0, 0, 0, 0, 0, -1],
        "c_poly": [0, 0, 0, 0, 0, 0, 1],
        "n_num": [2.37222995e1],
        "t_num": [0],
        "d_num": [1],
        "g_num": [0],
        "c_num": [0],
        "n_den": [1, -1],
        "t_den": [0, 0],
        "d_den": [0, 1],
        "g_den": [1, 0],
        "c_den": [0, 0]
    }

    _viscosity = visco0,

    thermo0 = {
        "eq":
        1,
        "__name__":
        "Assael (2013)",
        "__doi__": {
            "autor":
            "M. J. Assael, E. A. Sykioti, M. L. Huber, and R. A. Perkins",
            "title":
            "Reference Correlation of the Thermal Conductivity of Ethanol from the Triple Point to 600 K and up to 245 MPa",
            "ref": "J. Phys. Chem. Ref. Data 42, 023102 (2013)",
            "doi": "10.1063/1.4797368"
        },
        "__test__":
        """
                   >>> st=Ethanol(T=300, rho=850)
                   >>> print "%0.5g" % st.k.mWmK
                   209.68
                   >>> st=Ethanol(T=400, rho=2)
                   >>> print "%0.5g" % st.k.mWmK
                   26.108
                   >>> st=Ethanol(T=400, rho=690)
                   >>> print "%0.5g" % st.k.mWmK
                   149.21
                   >>> st=Ethanol(T=500, rho=10)
                   >>> print "%0.5g" % st.k.mWmK
                   39.594
                   >>> st=Ethanol(T=500, rho=10)
                   >>> print "%0.5g" % st.k.mWmK
                   40.755
                   """,  # Table 4, Pag 8
        "Tref":
        514.71,
        "kref":
        1e-3,
        "no":
        [-2.09575, 1.99045e1, -5.39640e1, 8.21223e1, -1.98864, -0.495513],
        "co": [0, 1, 2, 3, 4, 5],
        "noden": [0.17223, -0.078273, 1.0],
        "coden": [0, 1, 2],
        "Trefb":
        514.71,
        "rhorefb":
        5.93,
        "krefb":
        1.,
        "nb": [
            .267222E-01, .148279, -.130429, .346232E-01, -.244293E-02, .0,
            .177166E-01, -.893088E-01, .684664E-01, -.145702E-01, .809189E-03,
            .0
        ],
        "tb": [0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1],
        "db": [1, 2, 3, 4, 5, 6, 1, 2, 3, 4, 5, 6],
        "cb": [0] * 12,
        "critical":
        3,
        "gnu":
        0.63,
        "gamma":
        1.239,
        "R0":
        1.02,
        "Xio":
        0.164296e-9,
        "gam0":
        0.05885,
        "qd":
        0.53e-9,
        "Tcref":
        770.85
    }

    thermo1 = {
        "eq":
        1,
        "__name__":
        "Kiselev (2005)",
        "__doi__": {
            "autor":
            "Kiselev, S. B., Ely, J. F., Abdulagatov, I. M., Huber, M. L.",
            "title":
            "Generalized SAFT-DFT/DMT Model for the Thermodynamic, Interfacial, and Transport Properties of Associating Fluids: Application for n-Alkanols",
            "ref": "Ind. Eng. Chem. Res., 2005, 44 (17), pp 6916–6927",
            "doi": "10.1021/ie050010e"
        },
        "Tref":
        1,
        "kref":
        1,
        "no": [-10.109e-3],
        "co": [0.6475],
        "noden": [1.0, -7.332e3, -2.68e5],
        "coden": [0, -1, -2],
        "Trefb":
        513.9,
        "rhorefb":
        5.991,
        "krefb":
        1.,
        "nb": [
            1.06917458e-1, -5.95897870e-2, -8.65012441e-2, 6.14073818e-2,
            2.12220237e-2, -1.00317135e-2, 0, 0, 0, 0
        ],
        "tb": [0, 1, 0, 1, 0, 1, 0, 1, 0, 1],
        "db": [1, 1, 2, 2, 3, 3, 4, 4, 5, 5],
        "cb": [0] * 10,

        # TODO: Add critical crossover model from paper
        "critical":
        0
    }

    _thermal = thermo0, thermo1
Example #6
0
class R1234ze(MEoS):
    """Multiparameter equation of state for R1234ze"""
    name = "trans-1,3,3,3-tetrafluoropropene"
    CASNumber = "29118-24-9"
    formula = "CHF=CHCF3"
    synonym = "R-1234ze"
    rhoc = unidades.Density(489.238464)
    Tc = unidades.Temperature(382.513)
    Pc = unidades.Pressure(3634.9, "kPa")
    M = 114.0416  # g/mol
    Tt = unidades.Temperature(168.62)
    Tb = unidades.Temperature(254.177)
    f_acent = 0.313
    momentoDipolar = unidades.DipoleMoment(1.27, "Debye")
    id = 671

    CP1 = {
        "ao": 4.0,
        "an": [],
        "pow": [],
        "ao_exp": [9.3575, 10.717],
        "exp": [513, 1972],
        "ao_hyp": [],
        "hyp": []
    }

    CP2 = {
        "ao": 6.259,
        "an": [],
        "pow": [],
        "ao_exp": [7.303, 8.597, 2.333],
        "exp": [691, 1705, 4216],
        "ao_hyp": [],
        "hyp": []
    }

    CP3 = {
        "ao": 5.8887,
        "an": [],
        "pow": [],
        "ao_exp": [7.0804, 9.3371, 2.5577],
        "exp": [620, 1570, 3953],
        "ao_hyp": [],
        "hyp": []
    }

    Fi1 = {
        "ao_log": [1, 3],
        "pow": [0, 1],
        "ao_pow": [-10.8724711, -30.1326538],
        "ao_exp": [6.07536, 9.95795],
        "titao": [289 / Tc, 1303 / Tc],
        "ao_hyp": [],
        "hyp": []
    }

    helmholtz1 = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for R1234ze of Thol and Lemmon (2013).",
        "__doi__": {
            "autor": "Thol, M. and Lemmon, E.W.",
            "title": "to be published in Int. J. Thermophys., 2013.",
            "ref": "",
            "doi": ""
        },
        "R":
        8.314472,
        "cp":
        CP1,
        "ref":
        "IIR",
        "Tmin":
        Tt,
        "Tmax":
        420.0,
        "Pmax":
        20000.0,
        "rhomax":
        13.26,
        "Pmin":
        0.2187,
        "rhomin":
        13.26,
        "nr1": [0.03982797, 1.812227, -2.537512, -0.5333254, 0.1677031],
        "d1": [4, 1, 1, 2, 3],
        "t1": [1.0, 0.223, 0.755, 1.24, 0.44],
        "nr2": [-1.323801, -0.6694654, 0.8072718, -0.7740229, -0.01843846],
        "d2": [1, 3, 2, 2, 7],
        "t2": [2., 2.2, 1.2, 1.5, 0.9],
        "c2": [2, 2, 1, 2, 1],
        "gamma2": [1] * 5,
        "nr3": [
            1.407916, -0.4237082, -0.2270068, -0.805213, 0.00994318,
            -0.008798793
        ],
        "d3": [1, 1, 3, 3, 2, 1],
        "t3": [1.33, 1.75, 2.11, 1.0, 1.5, 1.0],
        "alfa3": [1.0, 1.61, 1.24, 9.34, 5.78, 3.08],
        "beta3": [1.21, 1.37, 0.98, 171, 47.4, 15.4],
        "gamma3": [0.943, 0.642, 0.59, 1.2, 1.33, 0.64],
        "epsilon3": [0.728, 0.87, 0.855, 0.79, 1.3, 0.71],
        "nr4": []
    }

    helmholtz2 = {
        "__type__": "Helmholtz",
        "__name__":
        "Helmholtz equation of state for R1234ze of McLinden et al. (2010).",
        "__doi__": {
            "autor": "McLinden, M.O., Thol, M., and Lemmon, E.W.",
            "title":
            "Thermodynamic Properties of trans-1,3,3,3-Tetrafluoropropene [R1234ze(E)]: Measurements of Density and Vapor Pressure and a Comprehensive Equation of State",
            "ref":
            "International Refrigeration and Air Conditioning Conference at Purdue, July 12-15, 2010.",
            "doi": "10.0000_docs.lib.purdue.edu_generic-99DA7EA2C877"
        },
        "R": 8.314472,
        "cp": CP2,
        "ref": "IIR",
        "Tmin": Tt,
        "Tmax": 420.0,
        "Pmax": 20000.0,
        "rhomax": 13.20,
        "Pmin": 0.23,
        "rhomin": 13.19,
        "nr1": [0.055563, 1.66927, -2.53408, -0.475075, 0.190055],
        "d1": [4, 1, 1, 2, 3],
        "t1": [1.0, 0.34, 0.91, 1.23, 0.46],
        "nr2": [-1.25154, -0.742195, 0.537902, -0.741246, -0.0355064],
        "d2": [1, 3, 2, 2, 7],
        "t2": [2.26, 2.50, 2.0, 2.24, 0.9],
        "c2": [2, 2, 1, 2, 1],
        "gamma2": [1] * 5,
        "nr3": [1.58506, -0.502086, -0.19136, -0.975576],
        "d3": [1, 1, 3, 3],
        "t3": [1.06, 1.79, 3.75, 0.92],
        "alfa3": [1.02, 1.34, 1.08, 6.41],
        "beta3": [1.19, 2.29, 1.15, 131.8],
        "gamma3": [1.14, 0.667, 0.505, 1.22],
        "epsilon3": [0.711, 0.914, 0.694, 0.731],
        "nr4": []
    }

    helmholtz3 = {
        "__type__": "Helmholtz",
        "__name__":
        "Helmholtz equation of state for R1234ze of McLinden et al. (2010).",
        "__doi__": {
            "autor": "McLinden, M.O., Thol, M., and Lemmon, E.W.",
            "title":
            "Thermodynamic Properties of trans-1,3,3,3-Tetrafluoropropene [R1234ze(E)]: Measurements of Density and Vapor Pressure and a Comprehensive Equation of State",
            "ref": "unpublished equation, similar to helmholtz2",
            "doi": ""
        },
        "R": 8.314472,
        "cp": CP3,
        "ref": "IIR",
        "Tmin": Tt,
        "Tmax": 420.0,
        "Pmax": 20000.0,
        "rhomax": 13.20,
        "Pmin": 0.23,
        "rhomin": 13.19,
        "nr1": [0.4434245e-1, 0.1646369e1, -0.2437488e1, -0.517056, 0.1815626],
        "d1": [4, 1, 1, 2, 3],
        "t1": [1.0, 0.31, 0.923, 1.06, 0.44],
        "nr2":
        [-0.1210104e1, -0.5944653, 0.7521992, -0.6747216, -0.2448183e-1],
        "d2": [1, 3, 2, 2, 7],
        "t2": [2.08, 2.32, 1.25, 2.0, 1.0],
        "c2": [2, 2, 1, 2, 1],
        "gamma2": [1] * 5,
        "nr3":
        [0.1379434e1, -0.4697024, -0.2036158, -0.8407447e-1, 0.5109529e-3],
        "d3": [1, 1, 3, 3, 2],
        "t3": [0.93, 1.93, 2.69, 1.0, 2.0],
        "alfa3": [1.0, 1.4, 1.134, 7.68, 24.],
        "beta3": [1.64, 1.57, 1.49, 257.0, 45.0],
        "gamma3": [1.13, 0.61, 0.65, 1.13, 1.34],
        "epsilon3": [0.711, 0.856, 0.753, 0.772, 1.88],
        "nr4": []
    }

    helmholtz4 = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for R1234yf of Akasaka (2011).",
        "__doi__": {
            "autor": "Akasaka, R.",
            "title":
            "New Fundamental Equations of State with a Common Functional Form for 2,3,3,3-Tetrafluoropropene (R-1234yf) and trans-1,3,3,3-Tetrafluoropropene (R-1234ze(E))",
            "ref": "Int J Thermophys (2011) 32:1125–1147",
            "doi": "10.1007/s10765-011-0992-0"
        },
        "R":
        8.314472,
        "cp":
        Fi1,
        "ref":
        "IIR",
        "Tmin":
        240.,
        "Tmax":
        420.0,
        "Pmax":
        15000.0,
        "rhomax":
        13.20,
        "Pmin":
        0.23,
        "rhomin":
        13.19,
        "nr1":
        [0.85579765e1, -0.94701332e1, -0.25013623, 0.13789870, 0.12177113e-1],
        "d1": [1, 1, 1, 2, 5],
        "t1": [0.66886, 0.83392, 1.6982, 1.8030, 0.36657],
        "nr2": [
            -0.14227996, 0.10096648, 0.17504319e-1, -0.17627303e-1,
            -0.14705120e-1, 0.37202269, -0.30138266, -0.92927274e-1,
            0.87051177e-1, 0.18113770e-1, -0.16018424e-1, 0.53809860e-2
        ],
        "d2": [1, 3, 5, 7, 1, 2, 2, 3, 4, 2, 3, 5],
        "t2": [
            3.8666, 1.0194, 0, 1.1655, 8.3101, 6.1459, 8.3495, 6.0422, 7.444,
            15.433, 21.543, 15.499
        ],
        "c2": [1, 1, 1, 1, 2, 2, 2, 2, 2, 3, 3, 3],
        "gamma2": [1] * 12
    }

    eq = helmholtz1, helmholtz2, helmholtz3, helmholtz4

    _surface = {
        "__doi__": {
            "autor": "Tanaka, K., Higashi, Y.",
            "title":
            "Surface Tension of trans-1,3,3,3-Tetrafluoropropene and trans-1,3,3,3-Tetrafluoropropene + Difluoromethane Mixture",
            "ref": "J. Chem. Eng. Japan, 2013",
            "doi": "10.1252/jcej.13we021"
        },
        "sigma": [0.05681],
        "exp": [1.23]
    }
    _vapor_Pressure = {
        "eq": 5,
        "ao": [-7.5888, 1.9696, -2.0827, -4.1238],
        "exp": [1.0, 1.5, 2.2, 4.6]
    }
    _liquid_Density = {
        "eq": 1,
        "ao": [1.1913, 2.2456, -1.7747, 1.3096],
        "exp": [0.27, 0.7, 1.25, 1.9]
    }
    _vapor_Density = {
        "eq": 3,
        "ao": [-1.0308, -5.0422, -11.5, -37.499, -77.945],
        "exp": [0.24, 0.72, 2.1, 4.8, 9.5]
    }

    thermo0 = {
        "eq":
        1,
        "__name__":
        "Perkins (2011)",
        "__doi__": {
            "autor": "Perkins, R.A. and Huber, M.L.",
            "title":
            "Measurement and Correlation of the Thermal Conductivity of 2,3,3,3-Tetrafluoroprop-1-ene (R1234yf) and trans-1,3,3,3-Tetrafluoropropene (R1234ze(E))",
            "ref": "J. Chem. Eng. Data, 2011, 56 (12), pp 4868–4874",
            "doi": "10.1021/je200811n"
        },
        "__test__":
        """
                    >>> st=R1234ze(T=250, P=5e4, eq=1)
                    >>> print "%0.6g %0.5g" % (st.rho, st.k)
                    2.80451 0.0098503
                    >>> st=R1234ze(T=300, P=1e5, eq=1)
                    >>> print "%0.6g %0.5g" % (st.rho, st.k)
                    4.67948 0.013933
                    >>> st=R1234ze(T=250, P=2e7, eq=1)
                    >>> print "%0.6g %0.5g" % (st.rho, st.k)
                    1349.37 0.100066
                    >>> st=R1234ze(T=300, P=2e7, eq=1)
                    >>> print "%0.6g %0.5g" % (st.rho, st.k)
                    1233.82 0.085389
                    """,  # Table 2, Pag 4872
        "Tref":
        382.52,
        "kref":
        1,
        "no": [-0.0103589, 0.0308929, 0.000230348],
        "co": [0, 1, 2],
        "Trefb":
        382.52,
        "rhorefb":
        4.29,
        "krefb":
        1.,
        "nb": [
            -0.428296e-1, 0.927099e-1, -0.702107e-1, 0.249708e-1, -0.301838e-2,
            0.434288e-1, -0.605844e-1, 0.440187e-1, -0.155082e-1, 0.210190e-2
        ],
        "tb": [0, 0, 0, 0, 0, 1, 1, 1, 1, 1],
        "db": [1, 2, 3, 4, 5, 1, 2, 3, 4, 5],
        "cb": [0] * 10,
        "critical":
        3,
        "gnu":
        0.63,
        "gamma":
        1.239,
        "R0":
        1.03,
        "Xio":
        0.194e-9,
        "gam0":
        0.0496,
        "qd":
        5.835e-10,
        "Tcref":
        573.78
    }

    _thermal = thermo0,
Example #7
0
class RE245fa2(MEoS):
    """Multiparameter equation of state for RE245fa2"""
    name = "2,2,2-trifluoroethyl-difluoromethyl-ether"
    CASNumber = "1885-48-9"
    formula = "CHF2OCH2CF3"
    synonym = "HFE-245fa2"
    rhoc = unidades.Density(515.001169364688)
    Tc = unidades.Temperature(444.88)
    Pc = unidades.Pressure(3433., "kPa")
    M = 150.047336  # g/mol
    Tt = unidades.Temperature(250)
    Tb = unidades.Temperature(302.4)
    f_acent = 0.387
    momentoDipolar = unidades.DipoleMoment(1.631, "Debye")
    id = 671
    # id = 1817

    CP1 = {
        "ao": 5.259865,
        "an": [],
        "pow": [],
        "ao_exp": [],
        "exp": [],
        "ao_hyp": [12.12843, 13.25677, 0.521867, 0],
        "hyp": [486, 1762, 7631, 0]
    }

    helmholtz1 = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for RE245fa2 of Zhou et al. (2012)",
        "__doi__": {
            "autor": "Zhou, Y. and Lemmon, E.W.",
            "title": "preliminary equation, 2012.",
            "ref": "",
            "doi": ""
        },
        "R":
        8.314472,
        "cp":
        CP1,
        "ref":
        "NBP",
        "Tmin":
        Tt,
        "Tmax":
        500.0,
        "Pmax":
        400000.0,
        "rhomax":
        10.02,
        "Pmin":
        8.272,
        "rhomin":
        10.,
        "nr1":
        [0.47771378e-1, 0.15745383e1, -0.24763491e1, -0.49414564, 0.19380498],
        "d1": [4, 1, 1, 2, 3],
        "t1": [1, 0.32, 0.91, 1.265, 0.4266],
        "nr2":
        [-0.97863158, -0.42660297, 0.85352583, -0.53380114, -0.29780036e-1],
        "d2": [1, 3, 2, 2, 7],
        "t2": [2.24, 1.64, 1.65, 3.28, 0.855],
        "c2": [2, 2, 1, 2, 1],
        "gamma2": [1] * 5,
        "nr3": [0.97659111, -0.33121365, -0.14122591, -0.15312295e2],
        "d3": [1, 1, 3, 3],
        "t3": [1.227, 3.0, 4.3, 2.5],
        "alfa3": [1.005, 1.515, 1.156, 17.7],
        "beta3": [2, 3.42, 1.37, 471],
        "gamma3": [1.084, 0.72, 0.49, 1.152],
        "epsilon3": [0.723, 0.9488, 0.818, 0.891]
    }

    eq = helmholtz1,

    _vapor_Pressure = {
        "eq": 5,
        "ao": [-8.9235, 10.527, -23.058, 30.291, -20.913, -26.745],
        "exp": [1, 1.5, 1.9, 2.4, 2.9, 3.2]
    }
    _liquid_Density = {
        "eq": 1,
        "ao": [1.2479, 5.5732, -12.26, 13.964, -6.0384],
        "exp": [0.34, 0.75, 1.2, 1.7, 2.3]
    }
    _vapor_Density = {
        "eq": 3,
        "ao": [-0.667, -5.8238, -26.927, 21.574, -65.645],
        "exp": [0.28, 0.66, 2.6, 3.5, 5.2]
    }

    visco0 = {
        "eq": 5,
        "omega": 3,
        "__doi__": {
            "autor": "T-H. Chung, Ajlan, M., Lee, L.L. and Starling, K.E",
            "title":
            "Generalized Multiparameter Correlation for Nonpolar and Polar Fluid Transport Properties",
            "ref": "Ind. Eng. Chem. Res., 1988, 27 (4), pp 671–679",
            "doi": "10.1021/ie00076a024"
        },
        "__name__": "Chung (1988)",
        "w": 0.387,
        "mur": 0.0,
        "k": 0.0
    }

    _viscosity = visco0,
Example #8
0
class RE347mcc(MEoS):
    """Multiparameter equation of state for RE347mcc"""
    name = "methyl-heptafluoropropyl-ether"
    CASNumber = "375-03-1"
    formula = "CF3CF2CF2OCH3"
    synonym = "HFE-7000"
    _refPropName = "RE347MCC"
    _coolPropName = ""
    rhoc = unidades.Density(524.143687088)
    Tc = unidades.Temperature(437.7)
    Pc = unidades.Pressure(2476.2, "kPa")
    M = 200.0548424  # g/mol
    Tt = unidades.Temperature(250)
    Tb = unidades.Temperature(307.349)
    f_acent = 0.411
    momentoDipolar = unidades.DipoleMoment(3.13, "Debye")

    CP1 = {
        "ao": 13.09,
        "an": [],
        "pow": [],
        "ao_exp": [13.78, 14.21],
        "exp": [2045, 850]
    }

    zhou = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for RE347mcc of Zhou (2012)",
        "__doi__": {
            "autor": "Zhou, Y., Lemmon, E.W., Mahmoud, A.M.",
            "title": "Equations of state for RE245cb2, RE347mcc, "
            "RE245fa2 and R1216",
            "ref": "Preliminary equation",
            "doi": ""
        },
        "R":
        8.314472,
        "cp":
        CP1,
        "ref":
        "NBP",
        "Tmin":
        Tt,
        "Tmax":
        500.0,
        "Pmax":
        20000.0,
        "rhomax":
        7.662,
        "nr1": [
            0.0330627, 2.606165, -4.902937, 2.228012, 1.494115, -2.420459,
            0.160067
        ],
        "d1": [4, 1, 1, 1, 2, 2, 3],
        "t1": [1, 0.34, 0.77, 1.02, 0.79, 1.017, 0.634],
        "nr2": [1.383893, -2.092005, -0.5904708],
        "d2": [2, 1, 2],
        "t2": [1.35, 2.25, 2.5],
        "c2": [1, 2, 2],
        "gamma2": [1] * 6,
        "nr3": [
            -0.701794, 2.765425, 0.6860982, -2.208170, 0.1739594, -0.9028007,
            -0.0213123
        ],
        "d3": [1, 1, 2, 2, 3, 3, 1],
        "t3": [2, 1.66, 1.33, 2.0, 1.87, 1.75, 1.05],
        "alfa3": [0.593, 1.36, 1.73, 1.483, 0.617, 1.596, 9.64],
        "beta3": [0.0872, 1.176, 1.53, 0.78, 0.088, 1.04, 263.0],
        "gamma3": [1.06, 1.22, 0.92, 1.08, 1.21, 0.85, 1.12],
        "epsilon3": [1.12, 0.79, 1.055, 0.5, 0.84, 0.85, 0.91]
    }

    eq = zhou,

    _vapor_Pressure = {
        "eq": 3,
        "n": [-8.0456, 2.6285, -2.7498, -5.4277, -4.3693],
        "t": [1.0, 1.5, 2., 4.25, 12.8]
    }
    _liquid_Density = {
        "eq": 1,
        "n": [1.5144, 2.3745, -2.6363, 2.0830, 0.50537],
        "t": [0.29, 0.85, 1.5, 2.2, 9.]
    }
    _vapor_Density = {
        "eq": 2,
        "n": [-2.0640, -6.4226, -18.982, -58.689, -117.64, -253.93],
        "t": [0.321, 0.96, 2.75, 5.9, 12., 22.]
    }
Example #9
0
class nC8(MEoS):
    """Multiparameter equation of state for n-octane"""
    name = "octane"
    CASNumber = "111-65-9"
    formula = "CH3-(CH2)6-CH3"
    synonym = ""
    _refPropName = "OCTANE"
    _coolPropName = "n-Octane"
    rhoc = unidades.Density(234.9)
    Tc = unidades.Temperature(569.32)
    Pc = unidades.Pressure(2497.0, "kPa")
    M = 114.2285  # g/mol
    Tt = unidades.Temperature(216.37)
    Tb = unidades.Temperature(398.77)
    f_acent = 0.395
    momentoDipolar = unidades.DipoleMoment(0.07, "Debye")
    id = 12
    _Tr = unidades.Temperature(565.427917)
    _rhor = unidades.Density(234.605116)
    _w = 0.402698435

    CP1 = {"ao": 4,
           "ao_sinh": [15.6865, 48.1731], "sinh": [158.9220, 1693.07],
           "ao_cosh": [33.8029], "cosh": [815.064]}

    Fi1 = {"ao_log": [1, 3.0],
           "ao_pow": [15.864687161, -97.370667555], "pow": [0, 1],
           "ao_sinh": [15.6865, 48.1731], "sinh": [158.9220/Tc, 1693.07/Tc],
           "ao_cosh": [33.8029], "cosh": [815.064/Tc]}

    CP3 = {"ao": 3.018753,
           "an": [0.07297005, -0.14171168e-4, -0.1225317e-7,  0.12912645e-11],
           "pow": [1, 2, 3, 4]}

    f = 8.3159524/4.184
    CP4 = {"ao": 34.0847*f,
           "ao_sinh": [2.603664e8*f], "sinh": [1.6115500e3],
           "ao_cosh": [4.1241363e7*f], "cosh": [7.6884700e2]}

    shortSpan = {
        "__type__": "Helmholtz",
        "__name__": "short Helmholtz equation of state for octane of Span and "
                    "Wagner (2003)",
        "__doi__": {"autor": "Span, R., Wagner, W.",
                    "title": "Equations of state for technical applications. "
                             "II. Results for nonpolar fluids.",
                    "ref": "Int. J. Thermophys. 24 (1) (2003) 41-109",
                    "doi": "10.1023/A:1022310214958"},

        "R": 8.31451,
        "cp": CP1,
        "ref": "OTO",
        "M": 114.231, "Tc": 569.32, "rhoc": 234.9/114.231,

        "Tmin": Tt, "Tmax": 750.0, "Pmax": 100000.0, "rhomax": 6.69,

        "nr1": [0.10722545e1, -0.24632951e1, 0.65386674, -0.36324974,
                0.1271327, 0.30713573e-3],
        "d1": [1, 1, 1, 2, 3, 7],
        "t1": [0.25, 1.125, 1.5, 1.375, 0.25, 0.875],

        "nr2": [0.52656857, 0.19362863e-1, -0.58939427, -0.14069964,
                -0.78966331e-2, 0.33036598e-2],
        "d2": [2, 5, 1, 4, 3, 4],
        "t2": [0.625, 1.75, 3.625, 3.625, 14.5, 12.],
        "c2": [1, 1, 2, 2, 3, 3],
        "gamma2": [1]*6}

    GERG = {
        "__type__": "Helmholtz",
        "__name__": "Helmholtz equation of state for n-octane of Kunz and "
                    "Wagner (2004).",
        "__doi__": {"autor": "Kunz, O., Wagner, W.",
                    "title": "The GERG-2008 Wide-Range Equation of State for "
                             "Natural Gases and Other Mixtures: An Expansion "
                             "of GERG-2004",
                    "ref": "J. Chem.Eng. Data 57(11) (2012) 3032-3091",
                    "doi": "10.1021/je300655b"},

        "R": 8.314472,
        "cp": Fi1,
        "ref": "OTO",

        "Tmin": Tt, "Tmax": 600.0, "Pmax": 100000.0, "rhomax": 6.69,

        "nr1": [0.10722544875633e1, -0.24632951172003e1, 0.65386674054928,
                -0.36324974085628, 0.12713269626764, 0.30713572777930e-3],
        "d1": [1, 1, 1, 2, 3, 7],
        "t1": [0.25, 1.125, 1.5, 1.375, 0.25, 0.875],

        "nr2": [0.5265685698754, 0.19362862857653e-1, -0.58939426849155,
                -0.14069963991934, -0.78966330500036e-2, 0.33036597968109e-2],
        "d2": [2, 5, 1, 4, 3, 4],
        "t2": [0.625, 1.75, 3.625, 3.625, 14.5, 12.],
        "c2": [1, 1, 2, 2, 3, 3],
        "gamma2": [1]*6}

    polt = {
        "__type__": "Helmholtz",
        "__name__": "Helmholtz equation of state for octane of Polt (1992)",
        "__doi__": {"autor": "Polt, A., Platzer, B., Maurer, G.",
                    "title": "Parameter der thermischen Zustandsgleichung von "
                             "Bender fuer 14 mehratomige reine Stoffe",
                    "ref": "Chem. Technik 22(1992)6 , 216/224",
                    "doi": ""},

        "R": 8.3143,
        "M": 114.233, "Tc": 569.35, "Pc": 2517, "rhoc": 2.0571989,
        "cp": CP3,
        "ref": "NBP",

        "Tmin": 258.0, "Tmax": 600.0, "Pmax": 200000.0, "rhomax": 6.6355607,

        "nr1": [0.266117347782e1, -0.343810366899e1, 0.700476763325,
                0.573101545749e1, -0.411975339382e1, -0.771251551395e1,
                0.526137115388e1, -0.716144047789, -0.584632875151e1,
                0.736422551908e1, -0.100540027381e1, 0.158387242200e1,
                -0.153643650819e1, -0.142010818863, 0.333126039209e-1,
                0.271948869925e-1],
        "d1": [0, 0, 0, 1, 1, 1, 1, 1, 2, 2, 2, 3, 3, 4, 4, 5],
        "t1": [3, 4, 5, 0, 1, 2, 3, 4, 0, 1, 2, 0, 1, 0, 1, 1],

        "nr2": [-0.266117347782e1, 0.343810366899e1, -0.700476763325,
                0.443217980268e1, -0.123858312597e2, 0.803373487925e1],
        "d2": [0, 0, 0, 2, 2, 2],
        "t2": [3, 4, 5, 3, 4, 5],
        "c2": [2]*6,
        "gamma2": [0.9995725]*6}

    starling = {
        "__type__": "Helmholtz",
        "__name__": "Helmholtz equation of state for octane of Starling "
                    "(1973)",
        "__doi__": {"autor": "Starling, K.E.",
                    "title": "Fluid Thermodynamic Properties for Light "
                             "Petroleum Systems",
                    "ref": "Gulf Publishing Company, 1973.",
                    "doi": ""},

        "R": 8.3159524,
        "cp": CP4,
        "ref": "NBP",

        "Tmin": 255.372, "Tmax": 644.0, "Pmax": 55000.0, "rhomax": 6.36203,

        "nr1": [0.253526486527e1, 0.616872653050, -0.941731168114,
                -0.109609729872e1, 0.849362892312e-1, -0.363538456997e-3,
                0.849748115039e-1, -0.961236603829e-1, -0.132591135067,
                0.269748328453e-2, 0.372085674947e-2],
        "d1": [0, 1, 1, 1, 1, 1, 2, 2, 2, 5, 5],
        "t1": [3, 0, 1, 3, 4, 5, 0, 1, 2, 1, 2],

        "nr2": [-0.253526486527e1, -0.447291258549],
        "d2": [0, 2],
        "t2": [3, 3],
        "c2": [2]*2,
        "gamma2": [0.35285564]*2}

    sun = {
        "__type__": "Helmholtz",
        "__name__": "Helmholtz equation of state for methanol of Sun and Ely "
                    "(2004)",
        "__doi__": {"autor": "Sun, L., Ely, J.F.",
                    "title": "Universal equation of state for engineering "
                             "application: Algorithm and  application to "
                             "non-polar and polar fluids",
                    "ref": "Fluid Phase Equilib., 222-223 (2004) 107-118",
                    "doi": "10.1016/j.fluid.2004.06.028"},

        "R": 8.31451,
        "cp": CP1,
        "ref": "OTO",

        "Tmin": Tt, "Tmax": 620.0, "Pmax": 800000.0, "rhomax": 40.,

        "nr1": [1.57750154, 1.15745614, -3.54867092, 1.18030671e-1,
                3.02753897e-4, -2.63074957e-1],
        "d1": [1, 1, 1, 3, 7, 2],
        "t1": [1.5, 0.25, 1.25, 0.25, 0.875, 1.375],

        "nr2": [2.55299486e-2, -1.26632996e-1, 4.48343319e-1, -9.46702997e-3,
                -0.443927529, -1.68224827e-2, -1.15864640e-1, -1.32417591e-2],
        "d2": [1, 1, 2, 5, 1, 1, 4, 2],
        "t2": [0, 2.375, 2., 2.125, 3.5, 6.5, 4.75, 12.5],
        "c2": [1, 1, 1, 1, 2, 2, 2, 3],
        "gamma2": [1]*8}

    eq = shortSpan, GERG, polt, starling, sun
    _PR = [0.0526, -21.0808]

    _surface = {"sigma": [0.34338, -0.50634, 0.2238],
                "exp": [1.6607, 1.9632, 2.3547]}
    _dielectric = {
        "eq": 1,
        "a": [39.74, 0.040], "b": [348.01, 494.18], "c": [-76838, -65772],
        "Au": 29.84, "D": 2}

    _vapor_Pressure = {
        "eq": 3,
        "n": [-0.79713e1, 0.17915e1, -0.34540e1, -0.82509e1, 0.53357e1],
        "t": [1.0, 1.5, 2.64, 5.5, 6.0]}
    _liquid_Density = {
        "eq": 1,
        "n": [0.56814e1, 0.38908e2, -0.75923e2, 0.59548e2, -0.19651e2],
        "t": [0.1, 0.75, 0.9, 1.1, 1.25]}
    _vapor_Density = {
        "eq": 2,
        "n": [-0.16556, -5.9337, -18.915, -0.36484e3, 0.72686e3, -0.50392e3],
        "t": [0.09, 0.59, 2.4, 7.0, 8.0, 9.0]}

    visco0 = {"__name__": "Huber (2004)",
              "__doi__": {
                  "autor": "Huber, M.L., Laesecke, A. Xiang, H.W.",
                  "title": "Viscosity correlations for minor constituent "
                           "fluids in natural gas: n-octane, n-nonane and "
                           "n-decane",
                  "ref": "Fluid Phase Equilibria 224 (2004) 263-270",
                  "doi": "10.1016/j.fluid.2004.07.012"},

              "eq": 1, "omega": 1,

              "ek": 452.09, "sigma": 0.63617,
              "n_chapman": 0.021357,
              "collision": [0.335103, -0.467898],

              "Tref_virial": 452.09,
              "n_virial": [-19.572881, 219.73999, -1015.3226, 2471.0125,
                           -3375.1717, 2491.6597, -787.26086, 14.085455,
                           -0.34664158],
              "t_virial": [0, -0.25, -0.5, -0.75, -1, -1.25, -1.5, -2.5, -5.5],

              "Tref_res": 569.32, "rhoref_res": 234.9, "muref_res": 1000,
              "nr": [-0.103924, 0.113327e-1, 0.992302e-1, -0.322455e-1],
              "tr": [1, 1, 2, 2],
              "dr": [2, 3, 2, 3],

              "CPf": 606.122,
              "CPg1": 2.0651,
              "CPgi": [3.07843/2.0651, -0.879088/2.0651],
              "CPti": [-0.5, -1]}

    visco1 = {"__name__": u"Quiñones-Cisneros (2006)",
              "__doi__": {
                  "autor": "Quiñones-Cisneros, S.E., Deiters, U.K.",
                  "title": "Generalization of the Friction Theory for "
                           "Viscosity Modeling",
                  "ref": "J. Phys. Chem. B, 110(25) (2006) 12820-12834",
                  "doi": "10.1021/jp0618577"},

              "eq": 4, "omega": 0,

              "Toref": 569.32,
              "no": [16.7562, -53.1705, 46.9105],
              "to": [0, 0.25, 0.5],

              "a": [8.68736e-5, 0.0, -2.69591e-5],
              "b": [1.46267e-4, 0.0, -5.44584e-5],
              "c": [1.28673e-4, -1.76442e-5, 0.0],
              "A": [-2.40884e-9, 5.20715e-11, 0.0],
              "B": [0.0, 6.62141e-9, 1.60012e-9],
              "C": [-9.50545e-7, 1.03767e-6, 0.0]}

    _viscosity = visco0, visco1

    thermo0 = {"__name__": "Huber (2005)",
               "__doi__": {
                   "autor": "Huber, M.L., Perkins, R.A.",
                   "title": "Thermal conductivity correlations for minor "
                            "constituent fluids in natural gas: n-octane, "
                            "n-nonane and n-decane",
                   "ref": "Fluid Phase Equilibria 227 (2005) 47-55",
                   "doi": "10.1016/j.fluid.2004.10.031"},

               "eq": 1,

               "Toref": 569.32, "koref": 1,
               "no": [0.772930e-2, -0.371138e-1, 0.977580e-1, -0.288707e-1],
               "to": [0, 1, 2, 3],

               "Tref_res": 569.32, "rhoref_res": 234.9, "kref_res": 1,
               "nr": [0.285553e-1, -0.926155e-2, -0.171398e-1, 0.659971e-2,
                      0.153496e-2],
               "tr": [0, -1, 0, 0, -1],
               "dr": [1, 1, 2, 3, 3],

               "critical": 3,
               "gnu": 0.63, "gamma": 1.239, "R0": 1.03, "Xio": 0.194e-9,
               "gam0": 0.0496, "qd": 0.68628e-9, "Tcref": 853.98}

    _thermal = thermo0,
Example #10
0
class COS(MEoS):
    """Multiparameter equation of state for carbonyl sulfide"""
    name = "carbonyl sulfide"
    CASNumber = "463-58-1"
    formula = "COS"
    synonym = ""
    rhoc = unidades.Density(445.1565)
    Tc = unidades.Temperature(378.77)
    Pc = unidades.Pressure(6370.0, "kPa")
    M = 60.0751  # g/mol
    Tt = unidades.Temperature(134.3)
    Tb = unidades.Temperature(222.99)
    f_acent = 0.0978
    momentoDipolar = unidades.DipoleMoment(0.7152, "Debye")
    id = 219

    Fi1 = {"ao_log": [1, 2.5],
           "pow": [0, 1],
           "ao_pow": [-3.6587449805, 3.7349245016],
           "ao_exp": [2.1651, 0.93456, 1.0623, 0.34269],
           "titao": [768/Tc, 1363/Tc, 3175/Tc, 12829/Tc]}

    helmholtz1 = {
        "__type__": "Helmholtz",
        "__name__": "short Helmholtz equation of state for carbonyl sulfide of Lemmon and Span (2006)",
        "__doi__": {"autor": "Lemmon, E.W., Span, R.",
                    "title": "Short Fundamental Equations of State for 20 Industrial Fluids",
                    "ref": "J. Chem. Eng. Data, 2006, 51 (3), pp 785–850",
                    "doi":  "10.1021/je050186n"},
        "__test__": """
            >>> st=COS(T=380, rho=7*60.0751)
            >>> print "%0.0f %0.0f %0.3f %0.3f %0.3f %0.3f %0.3f %0.3f" % (st.T, st.rhoM, st.P.kPa, st.hM.kJkmol, st.sM.kJkmolK, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            380 7 6498.429 16511.877 51.563 55.861 4139.577 161.717
            """, # Table 10, Pag 842

        "R": 8.314472,
        "cp": Fi1,
        "ref": "NBP",

        "Tmin": Tt, "Tmax": 650., "Pmax": 50000.0, "rhomax": 22.52,
        "Pmin": 0.064, "rhomin": 22.5,

        "nr1": [0.94374, -2.5348, 0.59058, -0.021488, 0.082083, 0.00024689],
        "d1": [1, 1, 1, 2, 3, 7],
        "t1": [0.25, 1.125, 1.5, 1.375, 0.25, 0.875],

        "nr2": [0.21226, -0.041251, -0.22333, -0.050828, -0.028333, 0.016983],
        "d2": [2, 5, 1, 4, 3, 4],
        "t2": [0.625, 1.75, 3.625, 3.625, 14.5, 12.],
        "c2": [1, 1, 2, 2, 3, 3],
        "gamma2": [1]*6}

    eq = helmholtz1,

    _surface = {"sigma": [0.07246], "exp": [1.407]}
    _vapor_Pressure = {
        "eq": 5,
        "ao": [-0.67055e1, 0.34248e1, -0.26677e1, -0.24717e1],
        "exp": [1., 1.5, 1.78, 4.8]}
    _liquid_Density = {
        "eq": 1,
        "ao": [0.76592e1, -0.19226e2, 0.27883e2, -0.23637e2, 0.99803e1],
        "exp": [0.515, 0.767, 1.034, 1.4, 1.7]}
    _vapor_Density = {
        "eq": 3,
        "ao": [-0.32494e1, -0.71460e1, 0.35026e2, -0.34039e2, -0.64206e2, -0.15225e3],
        "exp": [0.423, 1.464, 5.3, 4.1, 7.0, 17.0]}
Example #11
0
class DMC(MEoS):
    """Multiparameter equation of state for dimethyl carbonate"""
    name = "dimethyl carbonate"
    CASNumber = "616-38-6"
    formula = "C3H6O3"
    synonym = ""
    _refPropName = "DMC"
    _coolPropName = "DimethylCarbonate"
    rhoc = unidades.Density(360.3116)
    Tc = unidades.Temperature(557.)
    Pc = unidades.Pressure(4908.8, "kPa")
    M = 90.0779  # g/mol
    Tt = unidades.Temperature(277.06)
    Tb = unidades.Temperature(363.256)
    f_acent = 0.346
    momentoDipolar = unidades.DipoleMoment(0.899, "Debye")
    # id=1798

    Fi1 = {
        "ao_log": [1, 8.28421],
        "pow": [0, 1],
        "ao_pow": [4.9916462, -0.1709449],
        "ao_exp": [1.48525, 0.822585, 16.2453, 1.15925],
        "titao": [21 / Tc, 1340 / Tc, 1672 / Tc, 7395 / Tc]
    }

    zhou = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for DMC of Zhou (2011).",
        "__doi__": {
            "autor": "Zhou, Y., Wu, J., Lemmon, E.W.",
            "title": "Thermodynamic Properties of Dimethyl Carbonate",
            "ref": "J. Phys. Chem. Ref. Data, Vol. 40, No. 4 2011",
            "doi": "10.1063/1.3664084"
        },
        "R":
        8.314472,
        "cp":
        Fi1,
        "ref": {
            "Tref": 298.15,
            "Pref": 1.0,
            "ho": 26712.371,
            "so": 109.66202
        },
        "Tmin":
        Tt,
        "Tmax":
        600.0,
        "Pmax":
        60000.0,
        "rhomax":
        12.107,
        "nr1": [
            0.52683187e-3, 1.353396, -2.649283, -0.2785412, 0.1742554,
            0.031606252
        ],
        "d1": [5, 1, 1, 2, 3, 4],
        "t1": [1, 0.227, 1.05, 1.06, 0.5, 0.78],
        "nr2": [0.399866, 1.178144, -0.0235281, -1.015, -0.7880436, -0.12696],
        "d2": [1, 2, 7, 1, 2, 3],
        "t2": [1.3, 1.347, 0.706, 2, 2.5, 4.262],
        "c2": [1, 1, 1, 2, 2, 2],
        "gamma2": [1] * 6,
        "nr3": [1.2198, -0.4883, -0.0033293, -0.0035387, -0.51172, -0.16882],
        "d3": [1, 1, 2, 2, 3, 3],
        "t3": [1, 2.124, 0.4, 3.5, 0.5, 2.7],
        "alfa3": [0.9667, 1.5154, 1.0591, 1.6642, 12.4856, 0.9662],
        "beta3": [1.24, 0.821, 15.45, 2.21, 437., 0.743],
        "gamma3": [1.2827, 0.4317, 1.1217, 1.1871, 1.1243, 0.4203],
        "epsilon3": [0.6734, 0.9239, 0.8636, 1.0507, 0.8482, 0.7522],
        "nr4": []
    }

    eq = zhou,

    _vapor_Pressure = {
        "eq": 3,
        "n": [-8.3197, 3.4260, -3.5905, -3.3194],
        "t": [1.0, 1.5, 2.3, 4.7]
    }
    _liquid_Density = {
        "eq": 1,
        "n": [1.1572, 4.969, -14.451, 27.569, -26.223, 10.526],
        "t": [0.27, 0.77, 1.29, 1.85, 2.46, 3.16]
    }
    _vapor_Density = {
        "eq": 2,
        "n":
        [-0.54715, -5.19277, -94.048, 327.21, -676.871, 716.072, -379.799],
        "t": [0.197, 0.6, 2.86, 3.65, 4.5, 5.4, 6.4]
    }
Example #12
0
class C3Cyclohexane(MEoS):
    """Multiparameter equation of state for propylcyclohexane"""
    name = "propylcyclohexane"
    CASNumber = "1678-92-8"
    formula = "C6H11-CH2CH2CH3"
    synonym = ""
    _refPropName = "C2CC6"
    _coolPropName = ""
    rhoc = unidades.Density(260.0527932)
    Tc = unidades.Temperature(630.8)
    Pc = unidades.Pressure(2860.0, "kPa")
    M = 126.23922  # g/mol
    Tt = unidades.Temperature(178.2)
    Tb = unidades.Temperature(429.9)
    f_acent = 0.326
    momentoDipolar = unidades.DipoleMoment(0.0, "Debye")
    id = 184

    CP1 = {
        "ao": 0.0,
        "an": [9.29427],
        "pow": [0.385871],
        "ao_exp": [1.37051, 106.426, 313.713],
        "exp": [173295, 561.14, 1919.52]
    }

    lemmon = {
        "__type__": "Helmholtz",
        "__name__": "short Helmholtz equation of state for propylcyclohexane "
        "of Lemmon (2007).",
        "__doi__": {
            "autor": "Lemmon, E.W.",
            "title": "",
            "ref": "unpublished equation, 2007",
            "doi": ""
        },
        "R": 8.314472,
        "cp": CP1,
        "ref": "NBP",
        "Tmin": Tt,
        "Tmax": 650.,
        "Pmax": 50000.0,
        "rhomax": 7.03,
        "nr1": [1.01911, -2.59762, 0.675152, -0.230891, 0.120966, 0.000309038],
        "d1": [1, 1, 1, 2, 3, 7],
        "t1": [0.2, 1.2, 1.8, 1.5, 0.3, 0.9],
        "nr2": [0.526461, -0.0188462, -0.549272, -0.139233, 0.121242],
        "d2": [2, 5, 1, 4, 1],
        "t2": [1.4, 2.2, 3.7, 4.2, 2.4],
        "c2": [1, 1, 2, 2, 1],
        "gamma2": [1] * 5
    }

    eq = lemmon,

    _vapor_Pressure = {
        "eq": 3,
        "n": [-0.76296e1, 0.16538e1, -0.28518e1, -0.28205e1, -0.28144e1],
        "t": [1.0, 1.5, 2.7, 4.7, 15.0]
    }
    _liquid_Density = {
        "eq": 1,
        "n": [0.39271e-1, 0.38257e2, -0.65743e2, 0.30332e2, 0.17224],
        "t": [0.1, 0.75, 0.87, 1.0, 5.0]
    }
    _vapor_Density = {
        "eq": 2,
        "n": [-0.64572e1, 0.91228e1, -0.25806e2, -0.59044e2, -0.14709e3],
        "t": [0.6, 1.8, 2.2, 6.0, 14.0]
    }

    thermo0 = {
        "__name__":
        "Perkins (2008)",
        "__doi__": {
            "autor":
            "Perkins, R.A. Hammerschmidt, U., Huber, M.L.",
            "title":
            "Measurement and Correlation of the Thermal "
            "Conductivity of Methylcyclohexane and "
            "Propylcyclohexane from 300 to 600 K at Pressures "
            "to 60 MPa",
            "ref":
            "J. Chem. Eng. Data 53(9) (2008) 2120-2127",
            "doi":
            "10.1021/je800255r"
        },
        "eq":
        1,
        "Toref":
        630.8,
        "koref":
        1,
        "no": [1.07402e-2, -6.09829e-2, 1.38204e-1, -3.81213e-2],
        "to": [0, 1, 2, 3],
        "Tref_res":
        630.8,
        "rhoref_res":
        260.05,
        "kref_res":
        1.,
        "nr": [
            0.116524, -0.102821, -0.113871, 0.126431, 0.0445827, -0.05946,
            -0.00545736, 0.0098936
        ],
        "tr": [0, -1, 0, -1, 0, -1, 0, -1],
        "dr": [1, 1, 2, 2, 3, 3, 4, 4],
        "critical":
        3,
        "gnu":
        0.63,
        "gamma":
        1.2415,
        "R0":
        1.01,
        "Xio":
        0.15e-9,
        "gam0":
        0.052,
        "qd":
        6.24e-10,
        "Tcref":
        958.725
    }

    _thermal = thermo0,
Example #13
0
class R404a(MEoSBlend):
    """Multiparameter equation of state for R404A 
    (44% R125, 4% R134a, 52% R143a)"""

    name = "R404A"
    CASNumber = ""
    formula = "R125+R134a+R143a"
    synonym = "R404A"
    rhoc = unidades.Density(482.162772)
    Tc = unidades.Temperature(345.27)
    Pc = unidades.Pressure(3734.8, "kPa")
    M = 97.6038  # g/mol
    Tt = unidades.Temperature(200.0)
    Tb = unidades.Temperature(226.93)
    f_acent = 0.293
    momentoDipolar = unidades.DipoleMoment(0.0, "Debye")
    id = 62

    Fi1 = {
        "ao_log": [1, -1],
        "pow": [0, 1, -0.3],
        "ao_pow": [7.00407, 7.98695, -18.8664],
        "ao_exp": [0.63075, 3.5979, 5.0335],
        "titao": [413 / Tc, 804 / Tc, 1727 / Tc]
    }

    helmholtz1 = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for R-404A of Lemmon (2003)",
        "__doi__": {
            "autor": "Lemmon, E.W.",
            "title":
            "Pseudo-Pure Fluid Equations of State for the Refrigerant Blends R-410A, R-404A, R-507A, and R-407C",
            "ref": "Int. J. Thermophys., 24(4):991-1006, 2003.",
            "doi": "10.1023/A:1025048800563"
        },
        "__test__":
        """
            >>> st=R404a(T=300, rhom=0)
            >>> print "%0.3g %0.1f %0.1f %0.3f %0.3f %0.2f" % (st.T, st.P.MPa, st.rhoM, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            300 0.0 0.0 76.219 84.533 168.36
            >>> st=R404a(T=300, P=R404a._bubbleP(300))
            >>> print "%0.3g %0.4f %0.5f %0.3f %0.2f %0.2f" % (st.T, st.P.MPa, st.rhoM, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            300 1.3169 10.60497 90.653 152.11 365.11
            >>> st=R404a(T=300, P=R404a._dewP(300))
            >>> print "%0.3g %0.4f %0.5f %0.3f %0.2f %0.2f" % (st.T, st.P.MPa, st.rhoM, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            300 1.3034 0.70599 87.917 121.86 132.92
            >>> st=R404a(T=250, rhom=13)
            >>> print "%0.3g %0.3f %0.1f %0.3f %0.2f %0.2f" % (st.T, st.P.MPa, st.rhoM, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            250 10.435 13.0 83.062 123.27 688.27
            """,  # Table V, Pag 998
        "R":
        8.314472,
        "cp":
        Fi1,
        "ref":
        "IIR",
        "Tmin":
        Tt,
        "Tmax":
        500.0,
        "Pmax":
        50000.0,
        "rhomax":
        14.21,
        "Pmin":
        22.65,
        "rhomin":
        14.21,
        "Tj":
        345.270,
        "Pj":
        3.7348,
        "dew": {
            "i": [0.1 * 2, 0.972 * 2, 3.8 * 2, 9.0 * 2],
            "n": [-0.00026863, -6.5757, -4.1802, -7.9102]
        },
        "bubble": {
            "i": [0.54 * 2, 0.965 * 2, 3.7 * 2, 9.0 * 2],
            "n": [0.061067, -6.5646, -3.6162, 3.9771]
        },
        "nr1": [
            0.610984e1, -0.779453e1, 0.183377e-1, 0.262270, -0.351688e-2,
            0.116181e-1, 0.105992e-2
        ],
        "d1": [1, 1, 1, 2, 2, 4, 6],
        "t1": [0.67, 0.91, 5.96, 0.7, 6, 0.3, 0.7],
        "nr2": [
            0.850922, -0.520084, -0.464225e-1, 0.62119, -.195505, .336159,
            -.376062e-1, -.636579e-2, -.758262e-1, -.221041e-1, .310441e-1,
            0.132798e-1, 0.689437e-1, -0.507525e-1, 0.161382e-1
        ],
        "d2": [1, 1, 1, 2, 2, 3, 4, 7, 2, 3, 4, 4, 2, 3, 5],
        "t2":
        [1.7, 3.3, 7, 2.05, 4.3, 2.7, 1.8, 1.25, 12, 6, 8.7, 11.6, 13, 17, 16],
        "c2": [1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3],
        "gamma2": [1] * 15
    }

    eq = helmholtz1,

    _surface = {"sigma": [0.06868, -0.04576], "exp": [1.3142, 2.3084]}
    _vapor_Pressure = {
        "eq": 5,
        "ao": [-0.00026863, -6.5757, -4.1802, -7.9102],
        "exp": [0.1, 0.972, 3.8, 9]
    }
    _liquid_Pressure = {
        "eq": 5,
        "ao": [0.061067, -6.5646, -3.6162, -3.9771],
        "exp": [0.54, 0.965, 3.7, 9.0]
    }
Example #14
0
class R152a(MEoS):
    """Multiparameter equation of state for R152a"""
    name = "1,1-difluoroethane"
    CASNumber = "75-37-6"
    formula = "CHF2CH3"
    synonym = "R152a"
    rhoc = unidades.Density(368.)
    Tc = unidades.Temperature(386.411)
    Pc = unidades.Pressure(4516.75, "kPa")
    M = 66.051  # g/mol
    Tt = unidades.Temperature(154.56)
    Tb = unidades.Temperature(249.127)
    f_acent = 0.27521
    momentoDipolar = unidades.DipoleMoment(2.262, "Debye")
    id = 245

    CP1 = {
        "ao": 0,
        "an": [1.4652739, 0.2627677e-4, -0.29988241e-10],
        "pow": [0.25, 2, 4],
        "ao_exp": [],
        "exp": [],
        "ao_hyp": [],
        "hyp": []
    }

    Fi1 = {
        "ao_log": [1, -1],
        "pow": [0, 1, -0.5, -2, -4],
        "ao_pow": [10.87227, 6.839515, -20.78887, -0.6539092, 0.03342831],
        "ao_exp": [],
        "titao": []
    }

    Fi2 = {
        "ao_log": [1, -1],
        "pow": [0, 1, -0.5, 0.25],
        "ao_pow": [-9.508135074, 6.812068779, -7.285916044, 6.741130104],
        "ao_exp": [1.978152028, 5.880826311],
        "titao": [-1.753741145, -4.360150337]
    }

    CP2 = {
        "ao": 27.89465,
        "an": [9.134686e-2, 2.079961e-4, -2.317613e-7],
        "pow": [1, 2, 3],
        "ao_exp": [],
        "exp": [],
        "ao_hyp": [],
        "hyp": []
    }

    MBWR = {
        "__type__":
        "MBWR",
        "__name__":
        "MBWR equation of state for R-152a of Outcalt and McLinden (1996)",
        "__doi__": {
            "autor": "Outcalt, S.L. and McLinden, M.O.",
            "title":
            "A modified Benedict-Webb-Rubin equation of state for the thermodynamic properties of R152a (1,1-difluoroethane)",
            "ref": "J. Phys. Chem. Ref. Data 25, 605 (1996)",
            "doi": "10.1063/1.555979"
        },

        #TODO: Add test from file
        "R":
        8.314471,
        "cp":
        CP1,
        "Tmin":
        Tt,
        "Tmax":
        500.0,
        "Pmax":
        60000.0,
        "rhomax":
        18.07,
        "Pmin":
        0.0641,
        "rhomin":
        18.061,
        "b": [
            None, -0.101623317192e-1, 0.215677129618e1, -0.648581254334e2,
            0.122535596303e5, -0.206805988259e7, -0.379836507323e-3,
            -0.441333232984, 0.158248874708e3, 0.564062216256e6,
            -0.124115350431e-3, 0.494972178825, -0.208058039834e3,
            -0.131403187106e-1, 0.212083848812, -0.151263785082e3,
            0.311108025395e-1, -0.115280979645e-2, 0.437040025765,
            -0.965596535032e-2, -0.242705525346e6, -0.518042519989e8,
            -0.119070545681e5, 0.459333195257e9, -0.719317286511e2,
            -0.840102861460e4, -0.102910957390e1, -0.325913880841e5,
            -0.412362182230e-2, 0.175102808144e1, -0.198636624640e-4,
            -0.421363036104e-2, -0.198696760653e1
        ]
    }

    helmholtz1 = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz transform of MBWR EOS for R-152a of Outcalt and McLinden (1996).",
        "__doi__": {
            "autor": "Outcalt, S.L. and McLinden, M.O.",
            "title":
            "A modified Benedict-Webb-Rubin equation of state for the thermodynamic properties of R152a (1,1-difluoroethane)",
            "ref": "J. Phys. Chem. Ref. Data 25, 605 (1996)",
            "doi": "10.1063/1.555979"
        },
        "R":
        8.314471,
        "cp":
        CP1,
        "Tmin":
        Tt,
        "Tmax":
        500.0,
        "Pmax":
        60000.0,
        "rhomax":
        18.07,
        "Pmin":
        0.0641,
        "rhomin":
        18.061,
        "nr1": [
            -0.354657949982e1, -0.364631280620, 0.333233335558e-1,
            -0.6809684351170, 0.735212646801e1, -0.112473063838e2,
            0.549916715657e1, -0.240186327322e1, -0.709036447042e-1,
            -0.213200886814, 0.197839736368, 0.182494769909e1,
            -0.860546479693e-1, 0.888137366540, -0.966127346370,
            -0.985223479324e-1, 0.183419368472e-1, -0.338550204252e-1,
            0.124921101016e-1, -0.221056706423e-2, 0.216879133161e-2,
            -0.233597690478e-3
        ],
        "d1":
        [0, 0, 0, 1, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 4, 5, 5, 6, 7, 7, 8],
        "t1":
        [3, 4, 5, 0, 0.5, 1, 2, 3, 0, 1, 2, 3, 0, 1, 2, 1, 2, 3, 2, 2, 3, 3],
        "nr2": [
            0.354657949982e1, 0.364631280620, -0.333233335558e-1,
            0.276133830254e1, -0.691185711880e-1, -0.333233335558e-1,
            0.782761327717, -0.345592855940e-1, 0.137813531906, 0.186173126153,
            -0.341119393297e-1, 0.459378439687e-1, 0.216470012607e-1,
            -0.852798483242e-2, 0.620394038634e-2, 0.185210290813e-2,
            0.101674662734e-2, 0.124078807727e-2
        ],
        "d2": [0, 0, 0, 2, 2, 2, 4, 4, 4, 6, 6, 6, 8, 8, 8, 10, 10, 10],
        "t2": [3, 4, 5, 3, 4, 5, 3, 4, 5, 3, 4, 5, 3, 4, 5, 3, 4, 5],
        "c2": [2] * 18,
        "gamma2": [1] * 18
    }

    helmholtz2 = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for R-152a of Tillner-Roth (1995).",
        "__doi__": {
            "autor": "Tillner-Roth, R.",
            "title":
            "A Fundamental Equation of State for 1,1-Difluoroethane (HFC-152a)",
            "ref": "Int. J. Thermophys., 16(1):91-100, 1995.",
            "doi": "10.1007/BF01438960"
        },
        "R":
        8.314471,
        "cp":
        Fi1,
        "ref":
        "IIR",
        "Tmin":
        Tt,
        "Tmax":
        435.0,
        "Pmax":
        30000.0,
        "rhomax":
        18.03,
        "Pmin":
        0.065395176,
        "rhomin":
        18.020671,
        "nr1": [
            0.3552260, -0.1425660e1, -0.4631621e-1, 0.6903546e-1, 0.1975710e-1,
            0.7486977e-3, 0.4642204e-3
        ],
        "d1": [1, 1, 1, 1.5, 3, 6, 6],
        "t1": [0, 1.5, 3, -0.5, -0.5, -0.5, 1.5],
        "nr2": [
            -0.2603396, -0.7624212e-1, 0.2233522, 0.1992515e-1, 0.3449040,
            -0.4963849, 0.1290719, 0.9760790e-3, 0.5066545e-2, -0.1402020e-1,
            0.5169918e-2, 0.2679087e-3
        ],
        "d2": [1, 1, 3, 4, 1, 1, 1, 8, 2, 3, 5, 6],
        "t2": [3, 4, 3, 2, 4, 5, 6, 5, 12.5, 25, 20, 25],
        "c2": [1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3],
        "gamma2": [1] * 12
    }

    helmholtz3 = {
        "__type__":
        "Helmholtz",
        "__name__":
        "short Helmholtz equation of state for R-152a of Span and Wagner (2003)",
        "__doi__": {
            "autor": "Span, R., Wagner, W.",
            "title":
            "Equations of State for Technical Applications. III. Results for Polar Fluids",
            "ref": "Int. J. Thermophys., 24(1):111-162, 2003.",
            "doi": "10.1023/A:1022362231796"
        },
        #        "__test__": """
        #            >>> st=R152a(T=700, rho=200, eq=3)
        #            >>> print "%0.4f %0.3f %0.4f" % (st.cp0.kJkgK, st.P.MPa, st.cp.kJkgK)
        #            1.4632 21.594 2.1580
        #            >>> st2=R152a(T=750, rho=100, eq=3)
        #            >>> print "%0.2f %0.5f" % (st2.h.kJkg-st.h.kJkg, st2.s.kJkgK-st.s.kJkgK)
        #            270.60 0.60934
        #            """, # Table III, Pag 117
        "R":
        8.31451,
        "cp":
        Fi1,
        "ref":
        "IIR",
        "Tmin":
        Tt,
        "Tmax":
        600.0,
        "Pmax":
        100000.0,
        "rhomax":
        18.1,
        "Pmin":
        0.064093,
        "rhomin":
        18.031,
        "nr1":
        [.95702326, -.23707196e1, .18748463, .63800843e-1, .16625977e-3],
        "d1": [1, 1, 1, 3, 7],
        "t1": [0.25, 1.25, 1.5, 0.25, 0.875],
        "nr2": [
            0.82208165e-1, 0.57243518, 0.39476701e-2, -0.23848654,
            -0.80711618e-1, -0.73103558e-1, -0.15538724e-1
        ],
        "d2": [1, 2, 5, 1, 1, 4, 2],
        "t2": [2.375, 2, 2.125, 3.5, 6.5, 4.75, 12.5],
        "c2": [1, 1, 1, 2, 2, 2, 3],
        "gamma2": [1] * 12
    }

    helmholtz4 = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for R-152a of Astina and Sato (2004)",
        "__doi__": {
            "autor": "Astina, I.M. and Sato, H.",
            "title":
            "A Rigorous Thermodynamic Property Model for Fluid - Phase 1,1-Difluoroethane (R-152a)",
            "ref": "Int. J. Thermophys., 25(6):1713-1733, 2004.",
            "doi": "10.1007/s10765-004-7731-8"
        },
        "__test__":
        # Table III, Pag 1719 Saturation
        """
            >>> st=R152a(T=200, x=0.5, eq=4)
            >>> print "%0.3f %0.5f %0.5g %0.5f %0.5g %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g %0.4g %0.1f %0.1f" % (\
                st.P.MPa, st.T, st.Liquido.rho, st.Gas.rho, st.Liquido.cv.kJkgK, st.Gas.cv.kJkgK, \
                st.Liquido.cp.kJkgK, st.Gas.cp.kJkgK, st.Liquido.w, st.Gas.w, \
                st.Liquido.h.kJkg, st.Gas.h.kJkg, st.Liquido.s.kJkgK, st.Gas.s.kJkgK)
            0.00608 200 1108.3 0.243503 1.02563 0.688696 1.53227 0.822899 1144.44 172.126 83.0708 452.53 0.504052 2.35135
            >>> st=R152a(T=300, x=0.5, eq=4)
            >>> print "%0.5f %i %0.2f %0.4f %0.5f %0.5f %0.5f %0.5f %0.3f %0.3f %0.3f %0.3f %0.5f %0.5f" % (\
                st.P.MPa, st.T, st.Liquido.rho, st.Gas.rho, st.Liquido.cv.kJkgK, st.Gas.cv.kJkgK, \
                st.Liquido.cp.kJkgK, st.Gas.cp.kJkgK, st.Liquido.w, st.Gas.w, \
                st.Liquido.h.kJkg, st.Gas.h.kJkg, st.Liquido.s.kJkgK, st.Gas.s.kJkgK)
            0.62958 300 895.05 19.5363 1.14163 1.05165 1.80605 1.34292 635.933 184.955 246.936 523.189 1.16245 2.08329
            >>> st=R152a(P=1e4, x=0.5, eq=4)
            >>> print "%0.2f %0.5f %0.5g %0.5f %0.5g %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g %0.4g %0.1f %0.1f" % (\
                st.P.MPa, st.T, st.Liquido.rho, st.Gas.rho, st.Liquido.cv.kJkgK, st.Gas.cv.kJkgK, \
                st.Liquido.cp.kJkgK, st.Gas.cp.kJkgK, st.Liquido.w, st.Gas.w, \
                st.Liquido.h.kJkg, st.Gas.h.kJkg, st.Liquido.s.kJkgK, st.Gas.s.kJkgK)
            0.01 206.996 1095.05 0.387819 1.02888 0.709506 1.54024 0.846608 1106. 174.478 93.8198 457.773 0.556861 2.31513
            >>> st=R152a(P=2e6, x=0.5, eq=4)
            >>> print "%i %0.3f %0.3f %0.4f %0.5f %0.5f %0.5f %0.5f %0.3f %0.2f %0.3f %0.3f %0.4f %0.4f" % (\
                st.P.MPa, st.T, st.Liquido.rho, st.Gas.rho, st.Liquido.cv.kJkgK, st.Gas.cv.kJkgK, \
                st.Liquido.cp.kJkgK, st.Gas.cp.kJkgK, st.Liquido.w, st.Gas.w, \
                st.Liquido.h.kJkg, st.Gas.h.kJkg, st.Liquido.s.kJkgK, st.Gas.s.kJkgK)
            2 345.817 755.354 67.2945 1.23824 1.25774 2.22690 1.99694 400.169 166.52 336.806 542.188 1.4355 2.0294
            """

        #Table , Pag 544
        """
            >>> st=R152a(T=200, P=1e4, eq=4)
            >>> print "%0.6g %0.5g %0.6g %0.6g %0.6g %0.6g %0.6g %0.6g" % (\
                st.P.MPa, st.T, st.rho, st.cv.kJkgK, st.cp.kJkgK, st.w, st.h.kJkg, st.s.kJkgK)
            0.01 200 1108.30 1.02563 1.53226 1144.46 83.0731 0.504046
            >>> st=R152a(T=250, P=1e5, eq=4)
            >>> print "%0.6g %0.5g %0.6g %0.6g %0.6g %0.6g %0.6g %0.6g" % (\
                st.P.MPa, st.T, st.rho, st.cv.kJkgK, st.cp.kJkgK, st.w, st.h.kJkg, st.s.kJkgK)
            0.1 250 3.32533 0.85146 1.02093 185.395 490.101 2.17402
            >>> st=R152a(T=300, P=5e5, eq=4)
            >>> print "%0.6g %0.5g %0.6g %0.6g %0.6g %0.6g %0.6g %0.6g" % (\
                st.P.MPa, st.T, st.rho, st.cv.kJkgK, st.cp.kJkgK, st.w, st.h.kJkg, st.s.kJkgK)
            0.5 300 14.9178 1.01270 1.25049 190.307 528.281 2.12554
            >>> st=R152a(T=250, P=1e6, eq=4)
            >>> print "%0.6g %0.5g %0.6g %0.6g %0.6g %0.6g %0.6g %0.6g" % (\
                st.P.MPa, st.T, st.rho, st.cv.kJkgK, st.cp.kJkgK, st.w, st.h.kJkg, st.s.kJkgK)
            1 250 1011.4 1.06828 1.61778 887.901 162.066 0.852079
            >>> st=R152a(T=450, P=2e6, eq=4)
            >>> print "%0.6g %0.5g %0.6g %0.6g %0.6g %0.6g %0.6g %0.6g" % (\
                st.P.MPa, st.T, st.rho, st.cv.kJkgK, st.cp.kJkgK, st.w, st.h.kJkg, st.s.kJkgK)
            2 450 39.2134 1.27176 1.47906 230.75 703.818 2.44002
            >>> st=R152a(T=450, P=3e6, eq=4)
            >>> print "%0.6g %0.5g %0.6g %0.6g %0.6g %0.6g %0.6g %0.6g" % (\
                st.P.MPa, st.T, st.rho, st.cv.kJkgK, st.cp.kJkgK, st.w, st.h.kJkg, st.s.kJkgK)
            3 450 62.4333 1.29309 1.56254 221.167 692.526 2.37021
            >>> st=R152a(T=300, P=5e6, eq=4)
            >>> print "%0.6g %0.5g %0.6g %0.6g %0.6g %0.6g %0.6g %0.6g" % (\
                st.P.MPa, st.T, st.rho, st.cv.kJkgK, st.cp.kJkgK, st.w, st.h.kJkg, st.s.kJkgK)
            5 300 910.768 1.14104 1.75988 681.439 247.753 1.14904
            >>> st=R152a(T=350, P=1.5e7, eq=4)
            >>> print "%0.6g %0.5g %0.6g %0.6g %0.6g %0.6g %0.6g %0.6g" % (\
                st.P.MPa, st.T, st.rho, st.cv.kJkgK, st.cp.kJkgK, st.w, st.h.kJkg, st.s.kJkgK)
            15 350 829.854 1.22465 1.86556 577.309 339.639 1.39677
            >>> st=R152a(T=400, P=2.5e7, eq=4)
            >>> print "%0.6g %0.5g %0.6g %0.6g %0.6g %0.6g %0.6g %0.6g" % (\
                st.P.MPa, st.T, st.rho, st.cv.kJkgK, st.cp.kJkgK, st.w, st.h.kJkg, st.s.kJkgK)
            25 400 764.468 1.30865 1.92116 526.849 433.427 1.61365
            >>> st=R152a(T=250, P=4e7, eq=4)
            >>> print "%0.6g %0.5g %0.6g %0.6g %0.6g %0.6g %0.6g %0.6g" % (\
                st.P.MPa, st.T, st.rho, st.cv.kJkgK, st.cp.kJkgK, st.w, st.h.kJkg, st.s.kJkgK)
            40 250 1069.55 1.10283 1.5407 1076.73 183.511 0.788821
            >>> st=R152a(T=300, P=4.5e7, eq=4)
            >>> print "%0.6g %0.5g %0.6g %0.6g %0.6g %0.6g %0.6g %0.6g" % (\
                st.P.MPa, st.T, st.rho, st.cv.kJkgK, st.cp.kJkgK, st.w, st.h.kJkg, st.s.kJkgK)
            45 300 999.404 1.175 1.61174 920.812 265.09 1.06788
            >>> st=R152a(T=450, P=5e7, eq=4)
            >>> print "%0.6g %0.5g %0.6g %0.6g %0.6g %0.6g %0.6g %0.6g" % (\
                st.P.MPa, st.T, st.rho, st.cv.kJkgK, st.cp.kJkgK, st.w, st.h.kJkg, st.s.kJkgK)
            50 450 782.051 1.40653 1.86403 612.067 528.382 1.76108
            """,
        "R":
        8.314472,
        "cp":
        Fi2,
        "ref":
        "IIR",
        "Tc":
        386.41,
        "Pc":
        4516,
        "Tmin":
        Tt,
        "Tmax":
        450.0,
        "Pmax":
        60000.0,
        "rhomax":
        18.04,
        "Pmin":
        0.064,
        "rhomin":
        18.04,
        "nr1": [
            1.753847317, -4.049760759, -2.277389257e-1, 7.087751950e-1,
            -5.528619502e-1, -3.025046686e-2, 1.396289974e-1, 1.121238954e-4
        ],
        "d1": [1, 1, 1, 2, 2, 3, 3, 4],
        "t1": [0.5, 1.125, 2.875, 0.875, 1.875, 0.5, 1.875, 4],
        "nr2": [
            1.181005890, 1.535785579, 7.468363045e-1, -1.252266405e-1,
            -3.898223986e-2, -7.260588801e-2, -2.659302250e-3, 4.210849329e-3,
            2.015953966e-4
        ],
        "d2": [1, 2, 3, 1, 2, 3, 3, 4, 5],
        "t2": [1.25, 2, 2.75, 6, 9, 6, 22, 20, 32],
        "c2": [1, 1, 1, 2, 2, 2, 3, 3, 3],
        "gamma2": [1] * 9
    }

    eq = MBWR, helmholtz1, helmholtz2, helmholtz3, helmholtz4

    _surface = {"sigma": [0.05808], "exp": [1.2115]}
    _vapor_Pressure = {
        "eq": 5,
        "ao": [-0.74821e1, 0.21105e1, -0.20761e1, -0.35539e1, 0.58004],
        "exp": [1.0, 1.5, 2.2, 4.8, 6.2]
    }
    _liquid_Density = {
        "eq": 1,
        "ao": [0.19914e2, -0.68624e2, 0.99821e2, -0.77984e2, 0.29913e2],
        "exp": [0.56, 0.76, 0.95, 1.2, 1.4]
    }
    _vapor_Density = {
        "eq": 3,
        "ao": [-.33621e1, -.85985e1, -.2683e1, -.2414e2, -.43159e2, -.28045e2],
        "exp": [0.406, 1.42, 3.6, 3.9, 8.0, 9.0]
    }

    #TODO: Add test for transport properties from file pag 750
    visco0 = {
        "eq":
        1,
        "omega":
        1,
        "collision":
        [0.4425728, -0.5138403, 0.1547566, -0.2821844e-1, 0.1578286e-2],
        "__name__":
        "Krauss (1996)",
        "__doi__": {
            "autor":
            "Krauss, R., Weiss, V.C., Edison, T.A., Sengers, J.V., and Stephan, K.",
            "title": "Transport properties of 1,1-Difluoroethane (R152a)",
            "ref": "Int. J. Thermophysics 17:731-757, 1996.",
            "doi": "10.1007/BF01439187"
        },
        "ek":
        354.84,
        "sigma":
        0.46115,
        "Tref":
        1.,
        "rhoref":
        1. * M,
        "n_chapman":
        0.2169614 / M**0.5,
        "Tref_res":
        1.,
        "rhoref_res":
        5.571537 * M,
        "etaref_res":
        51.12,
        "n_poly": [-.139987, -.737927e-1, .517924, -.308875, .108049],
        "t_poly": [0, 0, 0, 0, 0],
        "d_poly": [0, 1, 2, 3, 4],
        "g_poly": [0, 0, 0, 0, 0],
        "c_poly": [0, 0, 0, 0, 0],
        "n_num": [-0.408387],
        "t_num": [0],
        "d_num": [0],
        "g_num": [0],
        "c_num": [0],
        "n_den": [-2.91733, 1.0],
        "t_den": [0, 0],
        "d_den": [0, 1],
        "g_den": [0, 0],
        "c_den": [0, 0]
    }

    _viscosity = visco0,

    thermo0 = {
        "eq": 1,
        "__name__": "Krauss (1996)",
        "__doi__": {
            "autor":
            "Krauss, R., Weiss, V.C., Edison, T.A., Sengers, J.V., and Stephan, K.",
            "title": "Transport properties of 1,1-Difluoroethane (R152a)",
            "ref": "Int. J. Thermophysics 17:731-757, 1996.",
            "doi": "10.1007/BF01439187"
        },
        "Tref": 1.,
        "kref": 1e-3,
        "no": [-1.49420e1, 9.73283 - 2],
        "co": [0, 1],
        "Trefb": 1.,
        "rhorefb": 5.57145,
        "krefb": 1.115e-3,
        "nb": [9.1809, 1.18577e1, -5.44730, 1.71379],
        "tb": [0] * 4,
        "db": [1, 2, 3, 4],
        "cb": [0] * 4,
        "critical": 3,
        "gnu": 0.63,
        "gamma": 1.239,
        "R0": 1.03,
        "Xio": 1.894e-10,
        "gam0": 0.0487,
        "qd": 4.37e-10,
        "Tcref": 579.617
    }

    _thermal = thermo0,
Example #15
0
class R134a(MEoS):
    """Multiparameter equation of state for R134a"""
    name = "1,1,1,2-tetrafluoroethane"
    CASNumber = "811-97-2"
    formula = "CF3CH2F"
    synonym = "R134a"
    _refPropName = "R134A"
    rhoc = unidades.Density(511.9)
    Tc = unidades.Temperature(374.21)
    Pc = unidades.Pressure(4059.28, "kPa")
    M = 102.032  # g/mol
    Tt = unidades.Temperature(169.85)
    Tb = unidades.Temperature(247.076)
    f_acent = 0.32684
    momentoDipolar = unidades.DipoleMoment(2.058, "Debye")
    id = 1235

    Fi1 = {"R": 8.314471,
           "ao_log": [1, -1.629789],
           "pow": [0, 1, -0.5, -0.75],
           "ao_pow": [-1.019535, 9.047135, -9.723916, -3.92717],
           "ao_exp": [], "titao": []}

    Fi2 = {"ao_log": [1, -1],
           "pow": [0, 1, -0.25],
           "ao_pow": [10.78497786, 8.612977410, -24.37548384],
           "ao_exp": [7.451784998, -4.239239505, 6.445739825],
           "titao": [-4.103830338, -2.561528683, -2.084607363]}

    # This ideal gas Cp expression give in
    # McLinden, M.O., Gallagher, J.S., Weber, L.A., Morrison, G., Ward, D.,
    # Goodwin., A.R.H., Moldover, M.R., Schmidt, J.W., Chae, H.B., Bruno, T.J.,
    # Ely, J.F., Huber, M.L.
    # Measurement and Formulation of the Thermodynamic Properties of
    # Refrigerants 134a (1,1,1,2-tetrafluoroethane) and 123
    # (1,1-dichloro-2,2,2-trifluoroethane)
    # ASHRAE Trans. 95(2):263-283, 1989
    CP1 = {"ao": 19.4006/8.314471,
           "an": [0.258531/8.314471, -1.29665e-4/8.314471], "pow": [1, 2],
           "ao_exp": [], "exp": []}

    tillner = {
        "__type__": "Helmholtz",
        "__name__": "Helmholtz equation of state for R-134a of Tillner-Roth "
                    "(1994).",
        "__doi__": {"autor": "Tillner-Roth, R., Baehr, H.D.",
                    "title": "An International Standard Formulation for the "
                             "Thermodynamic Properties of 1,1,1,2-"
                             "Tetrafluoroethane (HFC-134a) for Temperatures "
                             "from 170 K to 455 K at Pressures up to 70 MPa",
                    "ref": "J. Phys. Chem. Ref. Data 23(5) (1994) 657-729",
                    "doi": "10.1063/1.555958"},

        "R": 8.314471,
        "cp": Fi1,
        "ref": "IIR",
        "Tc": 374.18, "rhoc": 508/M,

        "Tmin": Tt, "Tmax": 465.0, "Pmax": 70000.0, "rhomax": 15.60,

        "nr1": [0.5586817e-1, 0.498223, 0.2458698e-1, 0.8570145e-3,
                0.4788584e-3, -0.1800808e1, 0.2671641, -0.4781652e-1],
        "d1": [2, 1, 3, 6, 6, 1, 1, 2],
        "t1": [-0.5, 0, 0, 0, 1.5, 1.5, 2, 2],

        "nr2": [0.1423987e-1, 0.3324062, -0.7485907e-2, 0.1017263e-3,
                -0.5184567, -0.8692288e-1, 0.2057144, -0.5000457e-2,
                0.4603262e-3, -0.3497836e-2, 0.6995038e-2, -0.1452184e-1,
                -0.1285458e-3],
        "d2": [5, 2, 2, 4, 1, 4, 1, 2, 4, 1, 5, 3, 10],
        "t2": [1, 3, 5, 1, 5, 5, 6, 10, 10, 10, 18, 22, 50],
        "c2": [1, 1, 1, 2, 2, 2, 2, 2, 2, 3, 3, 3, 4],
        "gamma2": [1]*13}

    MBWR = {
        "__type__": "MBWR",
        "__name__": "MBWR equation of state for R-134a of Huber and McLinden "
                    "(1992)",
        "__doi__": {"autor": "Huber, M.L., McLinden, M.O.",
                    "title": "Thermodynamic Properties of R134a "
                             "(1,1,1,2-tetrafluoroethane)",
                    "ref": "International Refrigeration and Air Condictioning "
                           "Conference, Paper 184, pag. 453-462, 1992.",
                    "doi": ""},

        "R": 8.314471,
        "M": 102.032, "Tc": 374.179, "Pc": 4056, "rhoc": 5.0308,

        "cp": CP1,
        "ref": "IIR",

        "Tmin": Tt, "Tmax": 600.0, "Pmax": 70000.0, "rhomax": 15.60,

        "b": [None, 0.965209362217e-1, -0.401824768889e1, 0.395239532858e2,
              0.134532868960e4, -0.139439741347e7, -0.309281355175e-2,
              0.292381512283e1, -0.165146613555e4, 0.150706003118e7,
              0.534973948313e-4, 0.543933317622, -0.211326049762e3,
              -0.268191203847e-1, -0.541067125950, -0.851731779398e3,
              0.205188253646, -0.733050188093e-2, 0.380655963862e1,
              -0.105832087589, -0.679243084424e6, -0.126998378601e9,
              -0.426234431829e5, 0.101973338234e10, -0.186699526782e3,
              -0.933426323419e5, -0.571735208963e1, -0.176762738787e6,
              -0.397282752308e-1, 0.143016844796e2, 0.803085294260e-4,
              -0.171959073552, 0.226238385661e1]}

    shortSpan = {
        "__type__": "Helmholtz",
        "__name__": "short Helmholtz equation of state for R-134a of Span and "
                    "Wagner (2003).",
        "__doi__": {"autor": "Span, R., Wagner, W.",
                    "title": "Equations of State for Technical Applications. "
                             "III. Results for Polar Fluids",
                    "ref": "Int. J. Thermophys., 24(1) (2003) 111-162",
                    "doi": "10.1023/A:1022362231796"},

        "R": 8.31451,
        "cp": Fi1,
        "ref": "IIR",
        "Tc": 374.18, "rhoc": 508/M,

        "Tmin": Tt, "Tmax": 600.0, "Pmax": 100000.0, "rhomax": 15.6,

        "nr1": [0.106631890000e1, -0.244959700000e1, 0.446457180000e-1,
                0.756568840000e-1, 0.206520890000e-3],
        "d1": [1, 1, 1, 3, 7],
        "t1": [0.25, 1.25, 1.5, 0.25, 0.875],

        "nr2": [0.42006912, 0.76739111, 0.17897427e-2, -0.36219746,
                -0.6780937e-1, -0.10616419, -0.18185791e-1],
        "d2": [1, 2, 5, 1, 1, 4, 2],
        "t2": [2.375, 2, 2.125, 3.5, 6.5, 4.75, 12.5],
        "c2": [1, 1, 1, 2, 2, 2, 3],
        "gamma2": [1]*7}

    astina = {
        "__type__": "Helmholtz",
        "__name__": "Helmholtz equation of state for R-134a of Astina (2004)",
        "__doi__": {"autor": "Astina, I.M., Sato, H.",
                    "title": "A Fundamental Equation of State for "
                             "1,1,1,2-tetrafluoroethane with an Intermolecular"
                             " Potential Energy Background and Relialbe "
                             "Ideal-Gas Properties",
                    "ref": "Fluid Phase Equilib., 221 (2004) 103-111",
                    "doi": "10.1016/j.fluid.2004.03.004"},

        "R": 8.314472,
        "cp": Fi2,
        "ref": "IIR",

        "Tmin": Tt, "Tmax": 460.0, "Pmax": 70000.0, "rhomax": 15.58,

        "nr1": [1.832124209, -2.940698861, 5.156071823e-1, 2.756965911e-1,
                1.225264939, -6.486749497e-1, -9.286738053e-1, 3.920381291e-1,
                1.056692108e-1],
        "d1": [1, 1, 1, 2, 2, 2, 3, 3, 4],
        "t1": [0.5, 1.125, 3.25, 0.5, 1.875, 2.75, 1.625, 2.125, 1.125],

        "nr2": [-7.586523371e-1, -1.198140136, -2.878260390e-1,
                -9.723032379e-2, 5.307113358e-2, -4.681610582e-2,
                -9.604697902e-3, 6.668035048e-3, 2.361266290e-3],
        "d2": [1, 2, 3, 2, 3, 4, 4, 5, 6],
        "t2": [3.75, 1.5, 0.75, 9, 8.5, 5.5, 32, 23, 31],
        "c2": [1, 1, 1, 2, 2, 2, 3, 3, 3],
        "gamma2": [1]*9}

    sun = {
        "__type__": "Helmholtz",
        "__name__": "Helmholtz equation of state for R-134a of Sun and Ely "
                    "(2004)",
        "__doi__": {"autor": "Sun, L., Ely, J.F.",
                    "title": "Universal equation of state for engineering "
                             "application: Algorithm and  application to "
                             "non-polar and polar fluids",
                    "ref": "Fluid Phase Equilib., 222-223 (2004) 107-118",
                    "doi": "10.1016/j.fluid.2004.06.028"},

        "R": 8.314471,
        "cp": Fi1,
        "ref": "IIR",

        "Tmin": Tt, "Tmax": 620.0, "Pmax": 800000.0, "rhomax": 40.,

        "nr1": [1.08605179, 1.03772416, -2.92069735, 9.15573346e-2,
                2.40541430e-4, -2.00239570e-1],
        "d1": [1, 1, 1, 3, 7, 2],
        "t1": [1.5, 0.25, 1.25, 0.25, 0.875, 1.375],

        "nr2": [-1.61424796e-2, -2.15499979e-1, 3.11819936e-1, 1.12867938e-3,
                -0.283454532, -4.21157950e-2, -8.08314045e-2, -1.59762784e-2],
        "d2": [1, 1, 2, 5, 1, 1, 4, 2],
        "t2": [0, 2.375, 2., 2.125, 3.5, 6.5, 4.75, 12.5],
        "c2": [1, 1, 1, 1, 2, 2, 2, 3],
        "gamma2": [1]*8}

    huber = {
        "__type__": "Helmholtz",
        "__name__": "Helmholtz equation of state for R-134a of Huber and Eli"
                    "(1992).",
        "__doi__": {"autor": "Huber, M.L., Ely, J.F.",
                    "title": "An Equation of State Formulation of the "
                             "Thermodynamic Properties of R134a ("
                             "1,1,1,2-Tetrafluoroethane)",
                    "ref": "Int. J. Refrig. 15(6) (1992) 393-400",
                    "doi": "10.1016/0140-7007(92)90024-o"},

        "R": 8.314471,
        "Tc": 374.179, "rhoc": 5.0308, "Pc": 4058.59,

        "cp": CP1,
        "ref": "IIR",

        "Tmin": Tt, "Tmax": 465.0, "Pmax": 70000.0, "rhomax": 15.60,

        "nr1": [6.81716385385e-1, -2.35124614105, 6.70216482859e-1,
                -3.07204611902e-2, 3.74529023556e-1, -1.57205367415e-1,
                6.52988383109e-2, -5.10116156742e-2, -5.69183659026e-2,
                6.45310700471e-4, 1.02593424592e-3, 6.77375367275e-7,
                -1.92870222869e-4],
        "d1": [1, 1, 1, 2, 2, 2, 3, 3, 3, 6, 7, 7, 8],
        "t1": [0, 1.5, 2.5, -0.5, 1.5, 2, 0, 1, 2.5, 0, 2, 5, 2],

        "nr2": [-4.95254825047e-1, 1.28070070661e-1, 2.76305386558e-1,
                -1.53983381830e-1, -2.11838190838e-1, -2.39896004684e-2,
                -3.27379569918e-3, -9.27516738026e-4, -2.09645193939e-2,
                2.14330093737e-3, -5.41732277806e-4, 3.47165872395e-3,
                4.91210193371e-2, -3.69286578727e-2, -6.94084047023e-2,
                4.73399474790e-2, 6.55276251860e-1, -6.87628059906e-1,
                4.30311999742e-2],
        "d2": [1, 1, 2, 2, 3, 3, 5, 6, 7, 8, 10, 2, 3, 3, 4, 4, 5, 5, 5],
        "t2": [5, 6, 3.5, 5.5, 3, 7, 6, 8.5, 4, 6.5, 5.5, 22, 11, 18, 11, 23,
               17, 18, 23],
        "c2": [2]*11+[4]*8,
        "gamma2": [1]*19}

    eq = tillner, MBWR, shortSpan, astina, sun, huber
    _PR = [0.0336, -21.3339]

    _surface = {"sigma": [0.05801], "exp": [1.241]}
    _vapor_Pressure = {
        "eq": 3,
        "n": [-0.77513e1, 0.29263e1, -0.26622e1, -0.39711e1],
        "t": [1.0, 1.5, 1.9, 4.25]}
    _liquid_Density = {
        "eq": 1,
        "n": [0.12449e2, -0.41023e2, 0.73641e2, -0.64635e2, 0.22551e2],
        "t": [0.5, 0.7, 0.9, 1.1, 1.3]}
    _vapor_Density = {
        "eq": 2,
        "n": [-0.29174e1, -0.72542e1, -0.23306e2, 0.59840e1, -0.71821e2],
        "t": [0.383, 1.21, 3.3, 5.6, 7.0]}

    visco0 = {"__name__": "Huber (2003)",
              "__doi__": {
                  "autor": "Huber, M.L., Laesecke, A., Perkins, R.A.",
                  "title": "Model for the Viscosity and Thermal Conductivity "
                           "of Refrigerants, Including a New Correlation for "
                           "the Viscosity of R134a",
                  "ref": "Ind. Eng. Chem. Res., 42(13) (2003) 3163-3178",
                  "doi": "10.1021/ie0300880"},

              "eq": 1, "omega": 1,

              "M": 102.031, "ek": 299.363, "sigma": 0.46893,
              "n_chapman": 0.021357,
              "collision": [0.355404, -0.464337, 0.257353e-1],

              "Tref_virial": 299.363,
              "n_virial": [-19.572881, 219.73999, -1015.3226, 2471.0125,
                           -3375.1717, 2491.6597, -787.26086, 14.085455,
                           -0.34664158],
              "t_virial": [0, -0.25, -0.5, -0.75, -1, -1.25, -1.5, -2.5, -5.5],

              "Tref_res": 374.21, "rhoref_res": 511.9, "muref_res": 1000,
              "nr": [-0.206900719e-1, 0.356029549e-3, 0.211101816e-2,
                     0.139601415e-1, -0.456435020e-2, -0.351593275e-2],
              "tr": [0, 6, 2, 0.5, -2, 0],
              "dr": [1, 2, 2, 2, 2, 3],

              "special": "_closePacked"}

    def _closePacked(self, rho, T, fase):
        """Special closed packed term"""
        c10 = 3.163695636
        c9 = 0.100035295
        c8 = -0.890173375e-1
        c7 = 0.214763320

        tau = T/374.21
        delta = rho/511.9
        delta0 = c10/(1+c8*tau+c9*tau**2)
        muCP = c7/(delta0-delta) - c7/delta0
        return muCP * 1000

    visco1 = {"__name__": u"Quiñones-Cisneros (2006)",
              "__doi__": {
                  "autor": "Quiñones-Cisneros, S.E., Deiters, U.K.",
                  "title": "Generalization of the Friction Theory for "
                           "Viscosity Modeling",
                  "ref": "J. Phys. Chem. B, 110(25) (2006) 12820-12834",
                  "doi": "10.1021/jp0618577"},

              "eq": 4, "omega": 0,

              "Toref": 374.21,
              "no": [31.2515, -89.6122, 73.0823],
              "to": [0, 0.25, 0.5],

              "a": [1.07271e-4, -4.41655e-5, 0.0],
              "b": [1.66457e-4, -4.80293e-5, 0.0],
              "c": [8.08333e-5, -4.90360e-5, 0.0],
              "A": [-2.12476e-8, 2.81647e-9, 0.0],
              "B": [1.35594e-8, 0.0, 3.17550e-10],
              "C": [0.0, 4.81769e-7, -1.17149e-7]}

    _viscosity = visco0, visco1,

    thermo0 = {"__name__": "Perkins (2000)",
               "__doi__": {
                   "autor": "Perkins, R.A., Laesecke, A., Howley, J., Ramires,"
                            " M.L.V., Gurova, A.N., Cusco, L.",
                   "title": "Experimental Thermal conductivity Values for the "
                            "IUPAC Round-Robin Sample of 1,1,1,2-"
                            "tetrafluoroethane (R134a)",
                   "ref": "NIST Interagency/Internal Report (NISTIR) - 6605",
                   "doi": ""},

               "eq": 1,

               "Toref": 1., "koref": 1.,
               "no": [-1.05248e-2, 8.00982e-5],
               "to": [0, 1],

               "rhoref_res": 5.049886*M, "kref_res": 2.055e-3,
               "nr": [1.836526, 5.126143, -1.436883, 6.261441e-1],
               "tr": [0, 0, 0, 0],
               "dr": [1, 2, 3, 4],

               "critical": 3,
               "gnu": 0.63, "gamma": 1.239, "R0": 1.03, "Xio": 0.194e-9,
               "gam0": 0.0496, "qd": 5.285356e-10, "Tcref": 561.411}

    _thermal = thermo0,
Example #16
0
class Cyclopropane(MEoS):
    """Multiparameter equation of state for cyclopropane"""
    name = "cyclopropane"
    CASNumber = "75-19-4"
    formula = "cyclo(CH2)3"
    synonym = ""
    rhoc = unidades.Density(258.5)
    Tc = unidades.Temperature(398.3)
    Pc = unidades.Pressure(5579.7, "kPa")
    M = 42.081  # g/mol
    Tt = unidades.Temperature(145.7)
    Tb = unidades.Temperature(241.67)
    f_acent = 0.1305
    momentoDipolar = unidades.DipoleMoment(0.0, "Debye")
    id = 258

    CP1 = {
        "ao":
        1.26016 / 8.3143 * 42.081,
        "an": [
            -0.90530700e-2 / 8.3143 * 42.081, 0.50550400e-4 / 8.3143 * 42.081,
            -0.77223700e-7 / 8.3143 * 42.081, 0.40538000e-10 / 8.3143 * 42.081
        ],
        "pow": [1, 2, 3, 4],
        "ao_exp": [],
        "exp": [],
        "ao_hyp": [],
        "hyp": []
    }

    helmholtz1 = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for cyclopropane of Polt et al. (1992)",
        "__doi__": {
            "autor": "Polt, A., Platzer, B., and Maurer, G.",
            "title":
            "Parameter der thermischen Zustandsgleichung von Bender fuer 14 mehratomige reine Stoffe",
            "ref": "Chem. Technik 22(1992)6 , 216/224",
            "doi": ""
        },
        "R":
        8.3143,
        "cp":
        CP1,
        "ref":
        "NBP",
        "Tmin":
        273.0,
        "Tmax":
        473.0,
        "Pmax":
        28000.0,
        "rhomax":
        15.595,
        "Pmin":
        342.71,
        "rhomin":
        15.595,
        "nr1": [
            -0.137016097588e1,
            0.212444673002e1,
            -0.578908942724,
            -0.115633726379e1,
            0.252574014413e1,
            -0.282265442929e1,
            0.283576113255,
            -0.842718450726e-1,
            0.931086305879,
            -0.105296584292e1,
            0.432020532920,
            -0.251108254803,
            0.127725582443,
            0.483621161849e-1,
            -0.116473795607e-1,
            0.334005754773e-3,
        ],
        "d1": [0, 0, 0, 1, 1, 1, 1, 1, 2, 2, 2, 3, 3, 4, 4, 5],
        "t1": [3, 4, 5, 0, 1, 2, 3, 4, 0, 1, 2, 0, 1, 0, 1, 1],
        "nr2": [
            0.137016097588e1, -0.212444673002e1, 0.578908942724,
            0.304945770499, -0.184276165165, -0.292111460397
        ],
        "d2": [0, 0, 0, 2, 2, 2],
        "t2": [3, 4, 5, 3, 4, 5],
        "c2": [2] * 6,
        "gamma2": [1] * 6
    }

    eq = helmholtz1,

    _vapor_Pressure = {
        "eq": 5,
        "ao": [-0.73438e1, 0.17584e2, -0.34265e2, 0.20155e2, -0.77259e1],
        "exp": [1.0, 1.5, 1.71, 1.95, 4.0]
    }
    _liquid_Density = {
        "eq": 1,
        "ao": [0.16998, 0.35101e1, -0.27092e1, 0.17644e1],
        "exp": [0.11, 0.5, 0.8, 1.1]
    }
    _vapor_Density = {
        "eq": 3,
        "ao":
        [-0.33232, -0.29566e2, 0.57762e2, -0.14221e3, 0.32573e3, -0.24439e3],
        "exp": [0.1, 0.87, 1.14, 1.78, 2.32, 2.6]
    }
Example #17
0
class EthylBenzene(MEoS):
    """Multiparameter equation of state for ethylbenzene"""
    name = "ethylbenzene"
    CASNumber = "100-41-4"
    formula = "C8H10"
    synonym = ""
    _refPropName = "EBENZENE"
    _coolPropName = "EthylBenzene"
    rhoc = unidades.Density(291.)
    Tc = unidades.Temperature(617.12)
    Pc = unidades.Pressure(3622.4, "kPa")
    M = 106.165  # g/mol
    Tt = unidades.Temperature(178.2)
    Tb = unidades.Temperature(409.314)
    f_acent = 0.305
    momentoDipolar = unidades.DipoleMoment(0.6, "Debye")
    id = 45

    Fi1 = {
        "ao_log": [1, 4.2557889],
        "pow": [0, 1],
        "ao_pow": [5.70409, -0.52414353],
        "ao_exp": [9.7329909, 11.201832, 25.440749],
        "titao": [585 / Tc, 4420 / Tc, 1673 / Tc]
    }

    zhou = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for ethylbenzene of Zhou et "
        "al. (2012).",
        "__doi__": {
            "autor": "Zhou, Y., Lemmon, E.W., Wu, J.",
            "title": "Thermodynamic Properties of o-Xylene, m-Xylene, "
            "p-Xylene, and Ethylbenzene",
            "ref": "J. Phys. Chem. Ref. Data 41, 023103 (2012).",
            "doi": "10.1063/1.3703506"
        },
        "R":
        8.314472,
        "cp":
        Fi1,
        "ref":
        "OTO",
        "Tmin":
        Tt,
        "Tmax":
        700.0,
        "Pmax":
        60000.0,
        "rhomax":
        9.124,
        "nr1": [
            0.0018109418, -0.076824284, 0.041823789, 1.5059649, -2.4122441,
            -0.47788846, 0.18814732
        ],
        "d1": [5, 1, 4, 1, 1, 2, 3],
        "t1": [1, 1, 0.92, 0.27, 0.962, 1.033, 0.513],
        "nr2": [-1.0657412, -0.20797007, 1.1222031, -0.99300799, -0.027300984],
        "d2": [1, 3, 2, 2, 7],
        "t2": [2.31, 3.21, 1.26, 2.29, 1.0],
        "c2": [2, 2, 1, 2, 1],
        "gamma2": [1] * 5,
        "nr3": [1.3757894, -0.44477155, -0.07769742, -2.16719],
        "d3": [1, 1, 3, 3],
        "t3": [0.6, 3.6, 2.1, 0.5],
        "alfa3": [1.178, 1.07, 1.775, 15.45],
        "beta3": [2.437, 1.488, 4, 418.6],
        "gamma3": [1.2667, 0.4237, 0.8573, 1.15],
        "epsilon3": [0.5494, 0.7235, 0.493, 0.8566]
    }

    eq = zhou,
    _PR = [0.0092, -19.9297]

    _vapor_Pressure = {
        "eq": 3,
        "n": [-7.8411, 2.5921, -3.502, -2.7613],
        "t": [1.0, 1.5, 2.5, 5.4]
    }
    _liquid_Density = {
        "eq": 1,
        "n": [3.5146, -3.7537, 5.476, -3.4724, 1.2141],
        "t": [0.43, 0.83, 1.3, 1.9, 3.1]
    }
    _vapor_Density = {
        "eq": 2,
        "n": [-3.2877, -3.6071, -15.878, -53.363, -128.57],
        "t": [0.42, 0.98, 2.48, 5.9, 13.4]
    }

    visco0 = {
        "__name__":
        "Meng (2017)",
        "__doi__": {
            "autor":
            "Meng, X.Y., Cao, F.L., Wu, J.T., Vesovic, V.",
            "title":
            "Reference Correlation of the Viscosity of "
            "Ethylbenzene from the Triple Point to 673 K and "
            "up to 110 MPa",
            "ref":
            "J. Phys. Chem. Ref. Data 46(1) (2017) 013101",
            "doi":
            "10.1063/1.4973501"
        },
        "eq":
        1,
        "omega":
        3,
        "collision": [-1.4933, 473.2, -57033],
        "sigma":
        1,
        "n_chapman":
        0.22115 / M**0.5,
        "Tref_res":
        617.12,
        "rhoref_res":
        2.741016 * M,
        "nr": [
            -0.0376893, 0.168877, 17.9684, 3.57702e-11, 29.996, -8.00082,
            -25.7468
        ],
        "dr":
        [209 / 30, 209 / 30, 29 / 30, 731 / 30, 59 / 30, 29 / 30, 455 / 300],
        "tr": [-0.5, 0.6, -0.5, 2.9, -0.5, -1.5, -0.5],
        "special":
        "_vir"
    }

    def _vir(self, rho, T, fase):
        # The initial density dependence has a different expresion, without muo
        # and other normal method calculation so hardcoded here
        muB = 0
        if rho:
            for i, n in enumerate([13.2814, -10862.4, 1664060]):
                muB += n / T**i

        # Special exponential term for residual viscosity, Eq 5
        Ei = [-3.29316e-13, -2.92665e-13, 2.97768e-13, 1.76186e-18]
        ni = [4.6, 11.1, 5.6, 12.4]
        ki = [20.8, 10.6, 19.7, 21.9]
        Tr = T / 617.12
        rhor = rho / self.M / 2.741016

        # Eq 7
        g = 0
        for E, n, k in zip(Ei, ni, ki):
            g += E * rhor**n / Tr**k

        mur = g * exp(rhor**2)

        return muB * rho / self.M + mur

    _viscosity = visco0,

    thermo0 = {
        "__name__":
        "Mylona (2014)",
        "__doi__": {
            "autor":
            "Mylona, S.K., Antoniadis, K.D., Assael, M.J., "
            "Huber, M.L., Perkins, R.A.",
            "title":
            "Reference Correlations of the Thermal "
            "Conductivity of o-Xylene, m-Xylene, p-Xylene, "
            "and Moderate Pressures",
            "ref":
            "J. Phys. Chem. Ref. Data 43(4) (2014) 043104",
            "doi":
            "10.1063/1.4901166"
        },
        "eq":
        1,
        "Toref":
        617.12,
        "koref":
        1e-3,
        "no_num": [-1.10708, 10.8026, -28.9015, 41.9227, 20.9133, -4.01492],
        "to_num": [0, 1, 2, 3, 4, 5],
        "no_den": [0.259475, -0.343879, 1],
        "to_den": [0, 1, 2],
        "Tref_res":
        617.12,
        "rhoref_res":
        291,
        "kref_res":
        1e-3,
        "nr": [
            -4.97837e1, 1.06739e2, -6.85137e1, 2.26133e1, -2.79455, 6.63073e1,
            -1.46279e2, 1.21439e2, -4.62245e1, 6.58554
        ],
        "tr": [0, 0, 0, 0, 0, -1, -1, -1, -1, -1],
        "dr": [1, 2, 3, 4, 5, 1, 2, 3, 4, 5],
        "critical":
        3,
        "gnu":
        0.63,
        "gamma":
        1.239,
        "R0":
        1.02,
        "Xio":
        0.235e-9,
        "gam0":
        0.056,
        "qd":
        0.706e-9,
        "Tcref":
        925.7
    }

    _thermal = thermo0,
Example #18
0
class R123(MEoS):
    """Multiparameter equation of state for R123"""
    name = "2,2-dichloro-1,1,1-trifluoroethane"
    CASNumber = "306-83-2"
    formula = "CHCl2CF3"
    synonym = "R123"
    _refPropName = "R123"
    _coolPropName = "R123"
    rhoc = unidades.Density(550)
    Tc = unidades.Temperature(456.831)
    Pc = unidades.Pressure(3661.8, "kPa")
    M = 152.93  # g/mol
    Tt = unidades.Temperature(166.0)
    Tb = unidades.Temperature(300.973)
    f_acent = 0.28192
    momentoDipolar = unidades.DipoleMoment(1.356, "Debye")
    id = 1631

    CP1 = {"ao": 2.046009,
           "an": [22.231991/Tc, -11.658491/Tc**2, 2.691665/Tc**3],
           "pow": [1, 2, 3],
           "ao_exp": [], "exp": []}

    Fi1 = {"ao_log": [1, 1.046009],
           "pow": [0, 1, -1, -2, -3],
           "ao_pow": [-13.23249393, 10.94800494, -11.1159955, 1.94308183,
                      -0.22430542],
           "ao_exp": [], "titao": []}

    younglove = {
        "__type__": "MBWR",
        "__name__": "MBWR equation of state for R-123 of Younglove and "
                    "McLinden (1994)",
        "__doi__": {"autor": "Younglove, B.A., McLinden, M.O.",
                    "title": "An International Standard Equation of State for "
                             "the Thermodynamic Properties of Refrigerant 123 "
                             "(2,2-Dichloro-1,1,1-trifluoroethane)",
                    "ref": "J. Phys. Chem. Ref. Data, 23(5) (1994) 731-779",
                    "doi":  "10.1063/1.555950"},

        "R": 8.31451,
        "cp": CP1,
        "ref": "IIR",
        "rhoc": 3.596417,

        "Tmin": Tt, "Tmax": 600.0, "Pmax": 40000.0, "rhomax": 11.60,

        "b": [None, -0.657453133659e-2, 0.293479845842e1, -0.989140469845e2,
              0.201029776013e5, -0.383566527886e7, 0.227587641969e-2,
              -0.908726819450e1, 0.434181417995e4, 0.354116464954e7,
              -0.635394849670e-3, 0.320786715274e1, -0.131276484299e4,
              -0.116360713718, -0.113354409016e2, -0.537543457327e4,
              0.258112416120e1, -0.106148632128, 0.500026133667e2,
              -0.204326706346e1, -0.249438345685e7, -0.463962781113e9,
              -0.284903429588e6, 0.974392239902e10, -0.637314379308e4,
              0.314121189813e6, -0.145747968225e3, -0.843830261449e7,
              -0.241138441593e1, 0.108508031257e4, -0.106653193965e-1,
              -0.121343571084e2, -0.257510383240e3]}

    tillner = {
        "__type__": "Helmholtz",
        "__name__": "Helmholtz equation of state for R-123 of Baehr and "
                    "Tillner-Roth (1993)",
        "__doi__": {"autor": "Baehr, H.D., Tillner-Roth, R.",
                    "title": "Thermodynamic Properties of Environmentally "
                             "Acceptable Refrigerants: Equations of State and "
                             "Tables for Ammonia, R22, R134a, R152a, and R123",
                    "ref": "Springer-Verlag, Berlin, 1994.",
                    "doi": "10.1007/978-3-642-79400-1"},

        # This MEoS is a transformation of Youglove-McLinden MBWR equation
        "R": 8.31451,
        "cp": Fi1,
        "ref": "IIR",
        "rhoc": 3.596417, "M": 152.931,

        "Tmin": Tt, "Tmax": 600.0, "Pmax": 40000.0, "rhomax": 11.60,

        "nr1": [-0.100242647494e2, -0.280607656419, 0.206814471606e-1,
                -0.284379431451, 0.593928110321e1, -0.936560389528e1,
                0.416660793675e1, -0.174023292951e1, 0.177019905365,
                -0.154721692260e1, 0.161820495590e1, 0.288903529383e1,
                -0.118493874757, 0.130952266209e1, -0.117308103711e1,
                -0.128125131950, -0.786087387513e-1, -0.816000499305e-1,
                0.536451054311e-1, -0.680078211929e-2, 0.701264082191e-2,
                -0.901762397311e-3],
        "d1": [0, 0, 0, 1, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 4, 5, 5, 6, 7, 7,
               8],
        "t1": [3, 4, 5, 0, 0.5, 1, 2, 3, 0, 1, 2, 3, 0, 1, 2, 1, 2, 3, 2, 2, 3,
               3],

        "nr2": [0.100242647494e2, 0.280607656419, -0.206814471606e-1,
                0.798923878145e1, -0.547972072476, -0.206814470584e-1,
                0.249142724365e1, -0.273986034884, 0.236001863614,
                0.540528251211, -0.600457561959e-1, 0.786672874826e-1,
                0.708085874508e-1, -0.150114389748e-1, 0.182205199477e-2,
                0.314978575163e-2, 0.784455573794e-2, 0.364410397155e-3],
        "d2": [0, 0, 0, 2, 2, 2, 4, 4, 4, 6, 6, 6, 8, 8, 8, 10, 10, 10],
        "t2": [3, 4, 5, 3, 4, 5, 3, 4, 5, 3, 4, 5, 3, 4, 5, 3, 4, 5],
        "c2": [2]*18,
        "gamma2": [1]*18}

    shortSpan = {
        "__type__": "Helmholtz",
        "__name__": "short Helmholtz equation of state for R-123 of Span and "
                    "Wagner (2003)",
        "__doi__": {"autor": "Span, R., Wagner, W.",
                    "title": "Equations of State for Technical Applications. "
                             "III. Results for Polar Fluids",
                    "ref": "Int. J. Thermophys., 24(1) (2003) 111-162",
                    "doi": "10.1023/A:1022362231796"},

        "R": 8.31451,
        "cp": CP1,
        "ref": "NBP",
        "M": 152.931, "Tc": 456.82, "rhoc": 553/152.931,

        "Tmin": Tt, "Tmax": 600.0, "Pmax": 100000.0, "rhomax": 11.62,

        "nr1": [0.1116973e1, -0.3074593e1, 0.51063873, 0.94478812e-1,
                0.29532752e-3],
        "d1": [1, 1, 1, 3, 7],
        "t1": [0.25, 1.25, 1.5, 0.25, 0.875],

        "nr2": [0.66974438, 0.96438575, -0.14865424e-1, -0.49221959,
                -0.22831038e-1, -0.1407486, -0.25117301e-1],
        "d2": [1, 2, 5, 1, 1, 4, 2],
        "t2": [2.375, 2, 2.125, 3.5, 6.5, 4.75, 12.5],
        "c2": [1, 1, 1, 2, 2, 2, 3],
        "gamma2": [1]*7}

    eq = younglove, tillner, shortSpan

    _surface = {"sigma": [0.056151], "exp": [1.2367]}
    _vapor_Pressure = {
        "eq": 3,
        "n": [-0.74610e1, 0.20293e1, -0.21897e1, -0.34945e1],
        "t": [1.0, 1.5, 2.25, 4.5]}
    _liquid_Density = {
        "eq": 1,
        "n": [0.19996e1, 0.41823, 0.24849, 0.18831, 0.13737],
        "t": [0.345, 0.74, 1.2, 2.6, 7.2]}
    _vapor_Density = {
        "eq": 2,
        "n": [-3.0205, -7.4537, -21.88, -57.43, 11.239, -166.4],
        "t": [0.3905, 1.29, 3.4, 7.0, 12.0, 15.0]}

    visco0 = {"__name__": "Tanaka (1996)",
              "__doi__": {
                  "autor": "Tanaka, Y., Sotani, T.",
                  "title": "Thermal Conductivity and Viscosity of 2,2-"
                           "Dichioro-1,1,1-Trifluoroethane (HCFC-123)",
                  "ref": "Int. J. Thermophys. 17(2) (1996) 293-328",
                  "doi":  "10.1007/BF01443394"},

              "eq": 1, "omega": 0,

              "no": [-2.273638, 5.099859e-2, -2.402786e-5],
              "to": [0, 1, 2],

              "Tref_res": 1, "rhoref_res": 1,
              "nr": [-2.226486e-2, 5.550623e-5, -3.222951e5/1828.263,
                     -0.1009812, 6.161902e-5, -8.84048e-8],
              "tr": [0, -1, 0, 0, 0, 0],
              "dr": [1, 1, 0, 1, 2, 3],

              "nr_num": [-3.222951e5],
              "tr_num": [0],
              "dr_num": [0],
              "nr_den": [1, -1828.263],
              "tr_den": [0, 0],
              "dr_den": [1, 0]}

    _viscosity = visco0,

    thermo0 = {"__name__": "Laesecke (1996)",
               "__doi__": {
                   "autor": "Laesecke, A., Perkins, R.A., Howley, J.B.",
                   "title": "An improved correlation for the thermal "
                            "conductivity of HCFC123 (2,2-dichloro-1,1,1-"
                            "trifluoroethane)",
                   "ref": "Int. J. Refrigeration 19(4) (1996) 231-238",
                   "doi":  "10.1016/0140-7007(96)00019-9"},

               "eq": 1,

               "Toref": 1., "koref": 1,
               "no": [-0.00778, 5.695e-5],
               "to": [0, 1],

               "Tref_res": 456.831, "rhoref_res": 550, "kref_res": 1,
               "nr": [0.642894e-1, -0.530474e-1, 0.453522e-4, -0.139928,
                      0.16654, -0.162656e-1, 0.136819, -0.183291, 0.357146e-1,
                      -0.231210e-1, 0.341945e-1, -0.757341e-2],
               "tr": [1.5, 2, 6, 0, 0.5, 1.5, 0, 0.5, 1.5, 0, 0.5, 1.5],
               "dr": [1, 1, 1, 2, 2, 2, 3, 3, 3, 4, 4, 4],

               "critical": 4,
               "Trefc": -456.831, "rhorefc": 3.596417, "krefc": 0.486742e-2,
               "nc": [-100.0, -7.08535],
               "alfac": [-1, 0],
               "tc": [4, 0],
               "betac": [0, -1],
               "dc": [0, 2]}

    thermo1 = {"__name__": "Tanaka (1996)",
               "__doi__": {
                   "autor": "Tanaka, Y., Sotani, T.",
                   "title": "Thermal Conductivity and Viscosity of 2,2-"
                            "Dichioro-1,1,1-Trifluoroethane (HCFC-123)",
                   "ref": "Int. J. Thermophys. 17(2) (1996) 293-328",
                   "doi":  "10.1007/BF01443394"},

               "eq": 1,

               "Toref": 1., "koref": 1e-3,
               "no": [-4.646772, 5.006573e-2],
               "to": [0, 1],

               "rhoref_res": 1, "kref_res": 1e-3,
               "nr": [2.722289e-2, -2.581605e-5, 2.626926e-8],
               "tr": [0, 0, 0],
               "dr": [1, 2, 3],

               "critical": 0}

    _thermal = thermo0, thermo1
Example #19
0
class Propyne(MEoS):
    """Multiparamenter equation of state for propyne"""
    name = "Propyne"
    CASNumber = "74-99-7"
    formula = "CH3-C≡CH"
    synonym = ""
    _refPropName = "PROPYNE"
    _coolPropName = "Propyne"
    rhoc = unidades.Density(244.898798)
    Tc = unidades.Temperature(402.38)
    Pc = unidades.Pressure(5626.0, "kPa")
    M = 40.06  # g/mol
    Tt = unidades.Temperature(170.5)
    Tb = unidades.Temperature(248.0)
    f_acent = 0.204
    momentoDipolar = unidades.DipoleMoment(0.781, "Debye")
    id = 66

    CP1 = {
        "ao":
        0.342418 / 8.3143 * 40.06,
        "an": [
            0.484403e-2 / 8.3143 * 40.06, -0.347414e-5 / 8.3143 * 40.06,
            0.144887e-8 / 8.3143 * 40.06, -0.26815e-12 / 8.3143 * 40.06
        ],
        "pow": [1, 2, 3, 4],
        "ao_exp": [],
        "exp": [],
        "ao_hyp": [],
        "hyp": []
    }

    polt = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for propyne of Polt (1992)",
        "__doi__": {
            "autor": "Polt, A., Platzer, B., Maurer, G.",
            "title": "Parameter der thermischen Zustandsgleichung von "
            "Bender fuer 14 mehratomige reine Stoffe",
            "ref": "Chem. Technik 22(1992)6 , 216/224",
            "doi": ""
        },
        "R":
        8.3143,
        "cp":
        CP1,
        "ref":
        "NBP",
        "Tmin":
        273.0,
        "Tmax":
        474.0,
        "Pmax":
        32000.0,
        "rhomax":
        16.28,
        "Pmin":
        0.2,
        "rhomin":
        22.7,
        "nr1": [
            0.102590136933e1, -0.220786016506e1, 0.107889905204e1,
            -0.986950667682, 0.459528109357e1, -0.886063623532e1,
            0.556346955561e1, -0.157450028544e1, -0.159068753573,
            0.235738270184, 0.440755494599, 0.196126150614, -0.36775965033,
            0.792931851008e-2, 0.247509085735e-2, 0.832903610194e-2
        ],
        "d1": [0, 0, 0, 1, 1, 1, 1, 1, 2, 2, 2, 3, 3, 4, 4, 5],
        "t1": [3, 4, 5, 0, 1, 2, 3, 4, 0, 1, 2, 0, 1, 0, 1, 1],
        "nr2": [
            -0.102590136933e1, 0.220786016506e1, -0.107889905204e1,
            -0.382188466986e1, 0.830345065619e1, -0.448323072603e1
        ],
        "d2": [0, 0, 0, 2, 2, 2],
        "t2": [3, 4, 5, 3, 4, 5],
        "c2": [2] * 6,
        "gamma2": [1.65533788] * 6
    }

    eq = polt,

    _surface = {"sigma": [0.05801], "exp": [1.205]}
    _vapor_Pressure = {
        "eq": 3,
        "n": [-0.69162e1, 0.10904e1, -0.74791, 0.75926e1, -0.25926e2],
        "t": [1.0, 1.5, 2.2, 4.8, 6.2]
    }
    _liquid_Density = {
        "eq": 1,
        "n": [0.22754, 0.33173e1, -0.18041e1, 0.22440e1, -0.35823],
        "t": [0.1, 0.53, 1.0, 2.0, 3.0]
    }
    _vapor_Density = {
        "eq": 2,
        "n": [-0.17504, -4.6021, -89.211, 180.02, -243.99, 160.35],
        "t": [0.1, 0.56, 2.5, 3.0, 4.0, 5.0]
    }
Example #20
0
class Cyclopentane(MEoS):
    """Multiparameter equation of state for cyclopentane"""
    name = "cyclopropane"
    CASNumber = "287-92-3"
    formula = "C5H10"
    synonym = ""
    rhoc = unidades.Density(274.920968)
    Tc = unidades.Temperature(511.72)
    Pc = unidades.Pressure(4571.2, "kPa")
    M = 70.1329  # g/mol
    Tt = unidades.Temperature(179.7)
    Tb = unidades.Temperature(322.405)
    f_acent = 0.201
    momentoDipolar = unidades.DipoleMoment(0.0, "Debye")
    id = 36

    Fi1 = {"ao_log": [1, 3],
           "pow": [0, 1],
           "ao_pow": [-0.3946233253, 2.4918910143],
           "ao_exp": [1.34, 13.4, 17.4, 6.65],
           "titao": [230/Tc, 1180/Tc, 2200/Tc, 5200/Tc],
           "ao_hyp": [], "hyp": []}

    CP1 = {"ao": 3.263,
           "an": [], "pow": [],
           "ao_exp": [2.151, 19.55, 14.45, 3.594],
           "exp": [179.0, 1336.0, 2911.0, 6420.0],
           "ao_hyp": [], "hyp": []}

    helmholtz1 = {
        "__type__": "Helmholtz",
        "__name__": "Helmholtz equation of state for cyclopentane of Gedanitz et al. (2015).",
        "__doi__": {"autor": "Gedanitz, H., Davila, M.J., Lemmon, E.W.",
                    "title": "Speed of Sound Measurements and a Fundamental Equation of State for Cyclopentane",
                    "ref": "J. Chem. Eng. Data, 2015, 60 (5), pp 1331–1337",
                    "doi": "10.1021/je5010164"},
        "__test__": """
            >>> st=Cyclopentane(T=330, rhom=0.01)
            >>> print "%0.0f %0.7g %0.2f %0.7g %0.7g %0.7g" % (\
                st.T, st.P.MPa, st.rhoM, st.cvM.JmolK, st.cpM.JmolK, st.w)
            330 0.02720379 0.01 86.25843 94.88857 205.6768
            >>> st=Cyclopentane(T=330, rhom=11)
            >>> print "%0.0f %0.7g %0.1f %0.7g %0.7g %0.7g" % (\
                st.T, st.P.MPa, st.rhoM, st.cvM.JmolK, st.cpM.JmolK, st.w)
            330 75.55974 11.0 100.6003 130.5568 1471.842
            >>> st=Cyclopentane(T=530, rhom=1)
            >>> print "%0.0f %0.7g %0.1f %0.7g %0.7g %0.7g" % (\
                st.T, st.P.MPa, st.rhoM, st.cvM.JmolK, st.cpM.JmolK, st.w)
            530 3.240235 1.0 156.4924 187.7243 195.4293
            >>> st=Cyclopentane(T=512, rhom=4)
            >>> print "%0.0f %0.7g %0.1f %0.7g %0.7g %0.7g" % (\
                st.T, st.P.MPa, st.rhoM, st.cvM.JmolK, st.cpM.JmolK, st.w)
            512 4.601539 4.0 161.5786 22857.91 113.0171
            >>> st=Cyclopentane(T=520, rhom=6)
            >>> print "%0.0f %0.7g %0.1f %0.7g %0.7g %0.7g" % (\
                st.T, st.P.MPa, st.rhoM, st.cvM.JmolK, st.cpM.JmolK, st.w)
            520 6.522373 6.0 159.2304 276.7530 234.2660
            """, # Table 5, Pag F

        "R": 8.314472, "rhoc": 3.92,
        "cp": Fi1,
        "ref": "NBP",

        "Tmin": Tt, "Tmax": 550.0, "Pmax": 250000.0, "rhomax": 12.11,
        "Pmin": 0.008854, "rhomin": 12.1,

        "nr1": [0.0630928, 1.50365, -2.37099, -0.484886, 0.191843],
        "d1": [4, 1, 1, 2, 3],
        "t1": [1, 0.29, 0.85, 1.185, 0.45],

        "nr2": [-0.835582, -0.435929, 0.545607, -0.209741, -0.0387635],
        "d2": [1, 3, 2, 2, 7],
        "t2": [2.28, 1.8, 1.5, 2.9, 0.93],
        "c2": [2, 2, 1, 2, 1],
        "gamma2": [1]*5,

        "nr3": [0.677674, -0.137043, -0.0852862, -0.128085, -0.00389381],
        "d3": [1, 1, 3, 3, 2],
        "t3": [1.05, 4.0, 2.33, 1.5, 1.0],
        "alfa3": [0.86, 0.85, 0.86, 1.53, 5.13],
        "beta3": [0.63, 2.8, 0.5, 0.95, 0.23],
        "gamma3": [1.22, 0.32, 0.22, 1.94, 1.21],
        "epsilon3": [0.684, 0.7, 0.77, 0.625, 0.42]}

    helmholtz2 = {
        "__type__": "Helmholtz",
        "__name__": "Helmholtz equation of state for cyclopentane of Lemmon et al. (2008).",
        "__doi__": {"autor": "Lemmon, E.W.",
                    "title": "",
                    "ref": "unpublished equation",
                    "doi": ""},
        "R": 8.314472,
        "cp": CP1,
        "ref": "NBP",

        "Tmin": Tt, "Tmax": 600.0, "Pmax": 200000.0, "rhomax": 12.2,
        "Pmin": 0.0089, "rhomin": 12.1,

        "nr1": [0.4909331e-1, 0.1244679e1, -0.1990222e1, -0.5245596, 0.1764215],
        "d1": [4, 1, 1, 2, 3],
        "t1": [1, 0.23, 0.94, 1.08, 0.53],

        "nr2": [-0.1066798e1, -0.5028152, 0.8484762, -0.4547443, -0.2767817e-1],
        "d2": [1, 3, 2, 2, 7],
        "t2": [1.67, 1.8, 1.3, 2.5, 1.0],
        "c2": [2, 2, 1, 2, 1],
        "gamma2": [1]*5,

        "nr3": [0.9455318, -0.3014822, -0.1675668, -0.637707],
        "d3": [1, 1, 3, 3],
        "t3": [0.87, 1.4, 2.4, 1.3],
        "alfa3": [1.023, 1.383, 0.996, 7.038],
        "beta3": [1.7, 1.55, 1.07, 87.17],
        "gamma3": [1.1, 0.64, 0.5, 1.26],
        "epsilon3": [0.713, 0.917, 0.688, 0.748]}

    eq = helmholtz1, helmholtz2

    _vapor_Pressure = {
        "eq": 5,
        "ao": [-7.1905, 1.8637, -1.6442, -2.72],
        "exp": [1.0, 1.5, 5.5, 2.9]}
    _liquid_Density = {
        "eq": 1,
        "ao": [0.0741, 81.968, 173.88, -68.519, -184.74],
        "exp": [0.1, 0.9, 1.25, 1.4, 1.05]}
    _vapor_Density = {
        "eq": 3,
        "ao": [-0.0559, -6.4211, -46.926, 28.082, -70.838],
        "exp": [0.1, 0.65, 3.2, 3.55, 7.5]}
Example #21
0
class R13I1(MEoS):
    """Multiparameter equation of state for trifluoroiodomethane"""
    name = "trifluoroiodomethane"
    CASNumber = "2314-97-8"
    formula = "CF3I"
    synonym = "R13I1"
    _refPropName = "CF3I"
    _coolPropName = "R13I1"
    rhoc = unidades.Density(868.00061824)
    Tc = unidades.Temperature(396.44)
    Pc = unidades.Pressure(3953., "kPa")
    M = 195.9104  # g/mol
    Tt = unidades.Temperature(120.)
    Tb = unidades.Temperature(251.3)
    f_acent = 0.18
    momentoDipolar = unidades.DipoleMoment(0.92, "Debye")

    CP1 = {"ao": 4.,
           "ao_exp": [6.2641], "exp": [694]}

    lemmon = {
        "__type__": "Helmholtz",
        "__name__": "Helmholtz equation of state for R13I1 of Lemmon and "
                    "Span (2013)",
        "__doi__": {"autor": "Lemmon, E.W., Span, R.",
                    "title": "Thermodynamic Properties of R-227ea, R-365mfc, "
                             "R-115, and R-13I1",
                    "ref": "J. Chem. Eng. Data, 60(12) (2015) 3745-3758",
                    "doi": "10.1021/acs.jced.5b00684"},

        "R": 8.3144621,
        "cp": CP1,
        "ref": "IIR",

        "Tmin": Tt, "Tmax": 420., "Pmax": 20000.0, "rhomax": 14.1,

        "nr1": [1.12191, -3.08087, 1.11307, -0.184885, 0.110971, 0.000325],
        "d1": [1, 1, 1, 2, 3, 7],
        "t1": [0.25, 1.125, 1.5, 1.375, 0.25, 0.875],

        "nr2": [0.333357, -0.0288288, -0.371554, -0.0997985, -0.0333205,
                0.0207882],
        "d2": [2, 5, 1, 4, 3, 4],
        "t2": [0.625, 1.75, 3.625, 3.625, 14.5, 12],
        "c2": [1, 1, 2, 2, 3, 3],
        "gamma2": [1]*6}

    eq = lemmon,

    _surface = {"sigma": [0.05767], "exp": [1.298]}
    _vapor_Pressure = {
        "eq": 3,
        "n": [-6.8642, 1.7877, -1.0619, -2.1677],
        "t": [1.0, 1.5, 1.9, 3.8]}
    _liquid_Density = {
        "eq": 1,
        "n": [2.0711, 1.562, -2.599, 1.7177],
        "t": [0.38, 1.3, 1.9, 2.5]}
    _vapor_Density = {
        "eq": 2,
        "n": [-3.0987, -6.8771, -19.701, -46.86, -100.02],
        "t": [0.41, 1.33, 3.5, 7.4, 16.0]}
Example #22
0
class RE245cb2(MEoS):
    """Multiparameter equation of state for RE245cb2"""
    name = "methyl-pentafluoroethyl-ether"
    CASNumber = "22410-44-2"
    formula = "CF3CF2OCH3"
    synonym = "HFE-245cb2"
    _refPropName = "RE245CB2"
    _coolPropName = ""
    rhoc = unidades.Density(499.507581544)
    Tc = unidades.Temperature(406.813)
    Pc = unidades.Pressure(2886.4, "kPa")
    M = 150.047336  # g/mol
    Tt = unidades.Temperature(250)
    Tb = unidades.Temperature(278.76)
    f_acent = 0.354
    momentoDipolar = unidades.DipoleMoment(2.785, "Debye")
    id = 671
    # id = 1817

    CP1 = {
        "ao": 10.196438,
        "an": [],
        "pow": [],
        "ao_exp": [],
        "exp": [],
        "ao_hyp": [10.214789, 10.503071, 0.98682562, 0],
        "hyp": [814, 2031, 3040, 0]
    }

    zhou = {
        "__type__": "Helmholtz",
        "__name__": "Helmholtz equation of state for RE245cb2 of Zhou (2010)",
        "__doi__": {
            "autor": "Zhou, Y., Lemmon, E.W., Mahmoud, A.M.",
            "title": "Equations of state for RE245cb2, RE347mcc, "
            "RE245fa2 and R1216",
            "ref": "Preliminary equation",
            "doi": ""
        },
        "R": 8.314472,
        "cp": CP1,
        "ref": "NBP",
        "Tmin": Tt,
        "Tmax": 500.0,
        "Pmax": 400000.0,
        "rhomax": 10.02,
        "Pmin": 8.272,
        "rhomin": 10.,
        "nr1": [0.041453162, 1.5010352, -2.3142144, -0.471412, 0.17182],
        "d1": [4, 1, 1, 2, 3],
        "t1": [1, 0.25, 0.786, 1.32, 0.338],
        "nr2": [-0.98793, -0.392049, 0.6848583, -0.32413816, -0.02414796],
        "d2": [1, 3, 2, 2, 7],
        "t2": [2.82, 2., 1., 3., 0.766],
        "c2": [2, 2, 1, 2, 1],
        "gamma2": [1] * 5,
        "nr3": [0.82792487, -0.31833343, -0.11929747, -0.65010212],
        "d3": [1, 1, 3, 3],
        "t3": [1.75, 3.5, 3.86, 2.75],
        "alfa3": [1.023, 1.384, 0.998, 6.9],
        "beta3": [1.727, 1.543, 1.075, 88],
        "gamma3": [1.1, 0.64, 0.5, 1.26],
        "epsilon3": [0.713, 0.917, 0.69, 0.743]
    }

    eq = zhou,

    _vapor_Pressure = {
        "eq": 3,
        "n": [-7.8026, 1.8804, -2.8375, -4.3077],
        "t": [1, 1.5, 2.5, 5]
    }
    _liquid_Density = {
        "eq": 1,
        "n": [1.8378, 2.5311, -7.084, 18.678, -30.228, 22.985],
        "t": [0.32, 1.08, 1.9, 2.8, 3.8, 4.9]
    }
    _vapor_Density = {
        "eq": 2,
        "n": [-1.5224, -5.7245, -15.972, -50.473, -6.8916],
        "t": [0.286, 0.82, 2.5, 5.6, 7.3]
    }
Example #23
0
class MD3M(MEoS):
    """Multiparameter equation of state for dodecamethylpentasiloxane"""
    name = "dodecamethylpentasiloxane"
    CASNumber = "141-63-9"
    formula = "C12H36Si5O4"
    synonym = "MD3M"
    _refPropName = "MD3M"
    _coolPropName = "MD3M"
    rhoc = unidades.Density(263.9218791237794)
    Tc = unidades.Temperature(628.36)
    Pc = unidades.Pressure(945.0, "kPa")
    M = 384.839  # g/mol
    Tt = unidades.Temperature(192.0)
    Tb = unidades.Temperature(503.03)
    f_acent = 0.722
    momentoDipolar = unidades.DipoleMoment(1.223, "Debye")

    f = 8.314472
    CP1 = {
        "ao": 463.2 / f,
        "ao_sinh": [
            957.2 / f,
        ],
        "sinh": [2117.1],
        "ao_cosh": [738.3 / f],
        "cosh": [908.5]
    }

    colonna = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for MD3M of Colonna (2006).",
        "__doi__": {
            "autor":
            "Colonna, P., Nannan, N.R., Guardone, A.",
            "title":
            "Multiparameter equations of state for siloxanes:"
            " [(CH3)3-Si-O1/2]2-[O-Si-(CH3)2]i=1,…,3, and "
            "[O-Si-(CH3)2]6",
            "ref":
            "Fluid Phase Equilibria 263:115-130, 2008",
            "doi":
            "10.1016/j.fluid.2007.10.001"
        },
        "R":
        8.314472,
        "cp":
        CP1,
        "ref":
        "NBP",
        "Tmin":
        Tt,
        "Tmax":
        673.0,
        "Pmax":
        30000.0,
        "rhomax":
        2.54,
        "nr1": [
            1.20540386, -2.42914797, 0.69016432, -0.69268041, 0.18506046,
            0.31161436e-3
        ],
        "d1": [1, 1, 1, 2, 3, 7],
        "t1": [0.25, 1.125, 1.5, 1.375, 0.25, 0.875],
        "nr2": [
            0.99862519, 0.74229034e-1, -0.80259136, -0.20865337,
            -0.36461791e-1, 0.19174051e-1
        ],
        "d2": [2, 5, 1, 4, 3, 4],
        "t2": [0.625, 1.75, 3.625, 3.625, 14.5, 12.0],
        "c2": [1, 1, 2, 2, 3, 3],
        "gamma2": [1] * 6
    }

    eq = colonna,

    _vapor_Pressure = {
        "eq": 3,
        "n": [-0.92608e1, 0.15861e1, -0.32859e1, -0.75194e1, -0.34883e1],
        "t": [1.0, 1.5, 2.46, 3.7, 10.0]
    }
    _liquid_Density = {
        "eq": 1,
        "n": [0.74156, 0.21723e1, 0.66412e2, -0.17125e3, 0.10848e3],
        "t": [0.22, 0.51, 5.5, 6.0, 6.4]
    }
    _vapor_Density = {
        "eq":
        2,
        "n": [
            -0.19054e1, -0.74526e1, -0.10520e3, 0.24548e3, -0.23783e3,
            -0.21226e3
        ],
        "t": [0.332, 0.88, 3.25, 4.0, 4.6, 12.0]
    }
Example #24
0
class N2(MEoS):
    """Multiparamente equation of state for nitrogen"""
    name = "nitrogen"
    CASNumber = "7727-37-9"
    formula = "N2"
    synonym = "R-728"
    rhoc = unidades.Density(313.3)
    Tc = unidades.Temperature(126.192)
    Pc = unidades.Pressure(3395.8, "kPa")
    M = 28.01348  # g/mol
    Tt = unidades.Temperature(63.151)
    Tb = unidades.Temperature(77.355)
    f_acent = 0.0372
    momentoDipolar = unidades.DipoleMoment(0.0, "Debye")
    id = 46
    _Tr = unidades.Temperature(122.520245)
    _rhor = unidades.Density(316.134310)
    _w = 0.043553140

    Fi1 = {
        "ao_log": [1, 2.5],
        "pow": [0, 1, -1, -2, -3],
        "ao_pow":
        [-12.76952708, -0.00784163, -1.934819e-4, -1.247742e-5, 6.678326e-8],
        "ao_exp": [1.012941],
        "titao": [26.65788]
    }

    Fi2 = {
        "ao_log": [1, 2.50031],
        "pow": [0, 1],
        "ao_pow": [11.083407489, -22.202102428],
        "ao_exp": [],
        "titao": [],
        "ao_hyp": [0.13732, -0.1466, 0.90066, 0],
        "hyp": [5.25182262, -5.393067706, 13.788988208, 0]
    }

    CP1 = {
        "ao": 3.5,
        "an": [3.066469e-6, 4.70124e-9, -3.987984e-13],
        "pow": [1, 2, 3],
        "ao_exp": [1.012941],
        "exp": [3364.011],
        "ao_hyp": [],
        "hyp": []
    }

    CP2 = {
        "ao":
        3.50418363823,
        "an": [
            -0.837079888737e3, 0.379147114487e2, -0.601737844275,
            -0.874955653028e-5, 0.148958507239e-7, -0.256370354277e-11
        ],
        "pow": [-3, -2, -1.001, 1, 2, 3],
        "ao_exp": [1.00773735767],
        "exp": [3353.4061],
        "ao_hyp": [],
        "hyp": []
    }

    CP3 = {
        "ao": 3.50031,
        "an": [],
        "pow": [],
        "ao_exp": [],
        "exp": [],
        "ao_hyp": [0.13732, -0.1466, 0.90066, 0],
        "hyp": [5.251822620 * Tc, -5.393067706 * Tc, 13.788988208 * Tc, 0],
        "R": 8.31451
    }

    helmholtz1 = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for nitrogen of Span et al. (2000).",
        "__doi__": {
            "autor":
            "Span, R., Lemmon, E.W., Jacobsen, R.T, Wagner, W., Yokozeki, A.",
            "title":
            "A Reference Equation of State for the Thermodynamic Properties of Nitrogen for Temperatures from 63.151 to 1000 K and Pressures to 2200 MPa",
            "ref": "J. Phys. Chem. Ref. Data 29, 1361 (2000)",
            "doi": "10.1063/1.1349047"
        },
        "__test__":
        # Pag 1403
        """
            >>> st=N2(T=63.151, x=0.5)
            >>> print "%0.6g %0.6f %0.5g %0.4g %0.5g %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g %0.4g %0.4g %0.4g" % (\
                st.T, st.P.MPa, st.Liquido.rhoM, st.Gas.rhoM, st.Liquido.hM.kJkmol, st.Gas.hM.kJkmol, \
                st.Liquido.sM.kJkmolK, st.Gas.sM.kJkmolK, st.Liquido.cvM.kJkmolK, st.Gas.cvM.kJkmolK, \
                st.Liquido.cpM.kJkmolK, st.Gas.cpM.kJkmolK, st.Liquido.w, st.Gas.w)
            63.151 0.012523 30.957 0.02407 -4222.6 1814.7 67.951 163.55 32.95 21.01 56.03 29.65 995.3 161.1

            >>> st=N2(T=70, x=0.5)
            >>> print "%0.6g %0.4g %0.5g %0.4g %0.5g %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g %0.4g %0.4g %0.4g" % (\
                st.T, st.P.MPa, st.Liquido.rhoM, st.Gas.rhoM, st.Liquido.hM.kJkmol, st.Gas.hM.kJkmol, \
                st.Liquido.sM.kJkmolK, st.Gas.sM.kJkmolK, st.Liquido.cvM.kJkmolK, st.Gas.cvM.kJkmolK, \
                st.Liquido.cpM.kJkmolK, st.Gas.cpM.kJkmolK, st.Liquido.w, st.Gas.w)
            70 0.03854 29.933 0.06768 -3837 1991.7 73.735 157 31.65 21.24 56.43 30.3 925.7 168.4

            >>> st=N2(T=82, x=0.5)
            >>> print "%0.6g %0.5g %0.5g %0.4g %0.5g %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g %0.4g %0.4g %0.4g" % (\
                st.T, st.P.MPa, st.Liquido.rhoM, st.Gas.rhoM, st.Liquido.hM.kJkmol, st.Gas.hM.kJkmol, \
                st.Liquido.sM.kJkmolK, st.Gas.sM.kJkmolK, st.Liquido.cvM.kJkmolK, st.Gas.cvM.kJkmolK, \
                st.Liquido.cpM.kJkmolK, st.Gas.cpM.kJkmolK, st.Liquido.w, st.Gas.w)
            82 0.16947 28.006 0.265 -3149.6 2254.2 82.736 148.64 29.65 21.92 57.93 32.59 803.7 178

            >>> st=N2(T=100, x=0.5)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.5g %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g %0.4g %0.4g %0.4g" % (\
                st.T, st.P.MPa, st.Liquido.rhoM, st.Gas.rhoM, st.Liquido.hM.kJkmol, st.Gas.hM.kJkmol, \
                st.Liquido.sM.kJkmolK, st.Gas.sM.kJkmolK, st.Liquido.cvM.kJkmolK, st.Gas.cvM.kJkmolK, \
                st.Liquido.cpM.kJkmolK, st.Gas.cpM.kJkmolK, st.Liquido.w, st.Gas.w)
            100 0.77827 24.608 1.1409 -2050.8 2458.6 94.576 139.67 27.54 23.95 64.93 42.09 605.2 183.3

            >>> st=N2(T=120, x=0.5)
            >>> print "%0.6g %0.6g %0.5g %0.5g %0.5g %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g %0.4g %0.4g %0.4g" % (\
                st.T, st.P.MPa, st.Liquido.rhoM, st.Gas.rhoM, st.Liquido.hM.kJkmol, st.Gas.hM.kJkmol, \
                st.Liquido.sM.kJkmolK, st.Gas.sM.kJkmolK, st.Liquido.cvM.kJkmolK, st.Gas.cvM.kJkmolK, \
                st.Liquido.cpM.kJkmolK, st.Gas.cpM.kJkmolK, st.Liquido.w, st.Gas.w)
            120 2.51058 18.682 4.4653 -500.6 2077.8 107.89 129.38 28.31 30.77 126.3 129.7 317.3 172.6

            >>> st=N2(T=122, x=0.5)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.5g %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g %0.4g %0.4g %0.4g" % (\
                st.T, st.P.MPa, st.Liquido.rhoM, st.Gas.rhoM, st.Liquido.hM.kJkmol, st.Gas.hM.kJkmol, \
                st.Liquido.sM.kJkmolK, st.Gas.sM.kJkmolK, st.Liquido.cvM.kJkmolK, st.Gas.cvM.kJkmolK, \
                st.Liquido.cpM.kJkmolK, st.Gas.cpM.kJkmolK, st.Liquido.w, st.Gas.w)
            122 2.7727 17.633 5.2696 -277.39 1933.5 109.62 127.74 29.38 32.78 163.7 187.6 276.5 169.5

            >>> st=N2(T=124, x=0.5)
            >>> print "%0.6g %0.6g %0.5g %0.5g %0.5g %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g %0.4g %0.4g %0.4g" % (\
                st.T, st.P.MPa, st.Liquido.rhoM, st.Gas.rhoM, st.Liquido.hM.kJkmol, st.Gas.hM.kJkmol, \
                st.Liquido.sM.kJkmolK, st.Gas.sM.kJkmolK, st.Liquido.cvM.kJkmolK, st.Gas.cvM.kJkmolK, \
                st.Liquido.cpM.kJkmolK, st.Gas.cpM.kJkmolK, st.Liquido.w, st.Gas.w)
            124 3.05618 16.23 6.4301 -3.0925 1714.7 111.71 125.56 31.83 36.12 271.2 356.6 227 164.7

            >>> st=N2(T=126, x=0.5)
            >>> print "%0.6g %0.6g %0.5g %0.5g %0.5g %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g %0.4g %0.4g %0.4g" % (\
                st.T, st.P.MPa, st.Liquido.rhoM, st.Gas.rhoM, st.Liquido.hM.kJkmol, st.Gas.hM.kJkmol, \
                st.Liquido.sM.kJkmolK, st.Gas.sM.kJkmolK, st.Liquido.cvM.kJkmolK, st.Gas.cvM.kJkmolK, \
                st.Liquido.cpM.kJkmolK, st.Gas.cpM.kJkmolK, st.Liquido.w, st.Gas.w)
            126 3.36453 13.281 9.1106 492.37 1194.9 115.5 121.08 43.4 47.44 3138 4521 151 148.4
            """

        # Pag 1410
        """
            >>> st=N2(T=63.170, P=1e5)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g" % (\
                st.T, st.rhoM, st.uM.kJkmol, st.hM.kJkmol, st.sM.kJkmolK, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            63.17 30.96 -4222.8 -4219.6 67.955 32.95 56.02 995.6
            >>> st=N2(T=250, P=2e5)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g" % (\
                st.T, st.rhoM, st.uM.kJkmol, st.hM.kJkmol, st.sM.kJkmolK, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            250 0.096369 5174.6 7250 180.66 20.82 29.25 322.4
            >>> st=N2(T=100, P=5e5)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g" % (\
                st.T, st.rhoM, st.uM.kJkmol, st.hM.kJkmol, st.sM.kJkmolK, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            100 0.67319 1898.9 2641.7 144.67 22.4 35.23 191.8
            >>> st=N2(T=100, P=1e6)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g" % (\
                st.T, st.rhoM, st.uM.kJkmol, st.hM.kJkmol, st.sM.kJkmolK, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            100 24.658 -2090.7 -2050.1 94.493 27.55 64.56 609.4
            >>> st=N2(T=115, P=2e6)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g" % (\
                st.T, st.rhoM, st.uM.kJkmol, st.hM.kJkmol, st.sM.kJkmolK, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            115 20.704 -1063.9 -967.29 104.14 27.25 89.82 405.8
            >>> st=N2(T=115, P=2.5e6)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g" % (\
                st.T, st.rhoM, st.uM.kJkmol, st.hM.kJkmol, st.sM.kJkmolK, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            115 21.031 -1112.9 -994.04 103.7 27.02 83.78 428.3
            >>> st=N2(T=120, P=3e6)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g" % (\
                st.T, st.rhoM, st.uM.kJkmol, st.hM.kJkmol, st.sM.kJkmolK, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            120 19.312 -723.85 -568.5 107.11 27.49 104 355
            >>> st=N2(T=125, P=3e6)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g" % (\
                st.T, st.rhoM, st.uM.kJkmol, st.hM.kJkmol, st.sM.kJkmolK, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            125 5.378 1479.3 2037.1 128.23 30.16 143.5 177.1
            >>> st=N2(T=125, P=3.5e6)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g" % (\
                st.T, st.rhoM, st.uM.kJkmol, st.hM.kJkmol, st.sM.kJkmolK, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            125 16.765 -230.88 -22.11 111.34 29.23 174.4 265
            >>> st=N2(T=300, P=5e6)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g" % (\
                st.T, st.rhoM, st.uM.kJkmol, st.hM.kJkmol, st.sM.kJkmolK, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            300 2.0113 5944.8 8430.7 158.34 21.14 31.38 363.4
            >>> st=N2(T=600, P=2e7)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g" % (\
                st.T, st.rhoM, st.uM.kJkmol, st.hM.kJkmol, st.sM.kJkmolK, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            600 3.6638 12183 17641 167.51 22.12 31.58 553.9
            """,
        "R":
        8.31451,
        "cp":
        Fi1,
        "ref": {
            "Tref": 298.15,
            "Pref": 101325.,
            "ho": 8670,
            "so": 191.5
        },
        "Tmin":
        Tt,
        "Tmax":
        2000.0,
        "Pmax":
        2200000.0,
        "rhomax":
        53.15,
        "Pmin":
        12.5198,
        "rhomin":
        30.957,
        "nr1": [
            0.924803575275, -0.492448489428, 0.661883336938, -0.192902649201e1,
            -0.622469309629e-1, 0.349943957581
        ],
        "d1": [1, 1, 2, 2, 3, 3],
        "t1": [0.25, 0.875, 0.5, 0.875, 0.375, 0.75],
        "nr2": [
            0.564857472498, -0.161720005987e1, -0.481395031883, 0.421150636384,
            -0.161962230825e-1, 0.172100994165, 0.735448924933e-2,
            0.168077305479e-1, -0.107626664179e-2, -0.137318088513e-1,
            0.635466899859e-3, 0.304432279419e-2, -0.435762336045e-1,
            -0.723174889316e-1, 0.389644315272e-1, -0.212201363910e-1,
            0.408822981509e-2, -0.551990017984e-4, -0.462016716479e-1,
            -0.300311716011e-2, 0.368825891208e-1, -0.255856846220e-2,
            0.896915264558e-2, -0.441513370350e-2, 0.133722924858e-2,
            0.264832491957e-3
        ],
        "d2": [
            1, 1, 1, 3, 3, 4, 6, 6, 7, 7, 8, 8, 1, 2, 3, 4, 5, 8, 4, 5, 5, 8,
            3, 5, 6, 9
        ],
        "t2": [
            0.5, 0.75, 2., 1.25, 3.5, 1., 0.5, 3., 0., 2.75, 0.75, 2.5, 4., 6.,
            6., 3., 3., 6., 16., 11., 15., 12., 12., 7., 4., 16.
        ],
        "c2": [
            1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3,
            4, 4, 4, 4
        ],
        "gamma2": [1] * 26,
        "nr3": [
            0.196688194015e2, -0.209115600730e2, 0.167788306989e-1,
            0.262767566274e4
        ],
        "d3": [1, 1, 3, 2],
        "t3": [0., 1., 2., 3.],
        "alfa3": [20, 20, 15, 25],
        "beta3": [325, 325, 300, 275],
        "gamma3": [1.16, 1.16, 1.13, 1.25],
        "epsilon3": [1] * 4,
        "nr4": []
    }

    MBWR = {
        "__type__":
        "MBWR",
        "__name__":
        "MBWR equation of state for nitrogen of Younglove (1982).",
        "__doi__": {
            "autor": "Younglove, B.A.",
            "title":
            "Thermophysical Properties of Fluids. I. Argon, Ethylene, Parahydrogen, Nitrogen, Nitrogen Trifluoride, and Oxygen",
            "ref":
            "J. Phys. Chem. Ref. Data, Vol. 11, Suppl. 1, pp. 1-11, 1982.",
            "doi": ""
        },
        "R":
        8.31434,
        "cp":
        CP1,
        "Tmin":
        Tt,
        "Tmax":
        1900.0,
        "Pmax":
        1013000.0,
        "rhomax":
        30.977,
        "Pmin":
        12.463,
        "rhomin":
        30.977,
        "b": [
            None, 0.1380297474657e-2, 0.1084506501349, -0.2471324064362e1,
            0.3455257980807e2, -0.4279707690666e4, 0.1064911566998e-3,
            -0.1140867079735e-1, 0.1444902497287e-3, 0.1871457567553e5,
            0.8218876886831e-7, 0.2360990493348e-2, -0.5144803081201,
            0.4914545013668e-4, -0.1151627162399e-2, -0.7168037246650,
            0.7616667619500e-4, -0.1130930066213e-5, 0.3736831166831e-3,
            -0.2039851507581e-5, -0.1719662008990e5, -0.1213055199748e6,
            -0.9881399141428e2, 0.5619886893511e5, -0.1823043964118,
            -0.2599826498477e1, -0.4191893423157e-3, -0.2596406670530,
            -0.1258683201921e-6, 0.1049286599400e-4, -0.5458369305152e-9,
            -0.7674511670597e-8, 0.5931232870994e-7
        ]
    }

    GERG = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for nitrogen of Kunz and Wagner (2004).",
        "__doi__": {
            "autor": "Kunz, O., Wagner, W.",
            "title": "The GERG-2008 Wide-Range Equation of State for \
                    Natural Gases and Other Mixtures: An Expansion of GERG-2004",
            "ref": "J. Chem. Eng. Data, 2012, 57 (11), pp 3032–3091",
            "doi": "10.1021/je300655b"
        },
        "R":
        8.314472,
        "cp":
        Fi2,
        "ref":
        "OTO",
        "Tmin":
        Tt,
        "Tmax":
        2000.0,
        "Pmax":
        2200000.0,
        "rhomax":
        53.15,
        #        "Pmin": 73.476, "rhomin": 29.249,
        "nr1": [
            0.59889711801201, -0.16941557480731e1, 0.24579736191718,
            -0.23722456755175, 0.17954918715141e-1, 0.14592875720215e-1
        ],
        "d1": [1, 1, 2, 2, 4, 4],
        "t1": [0.125, 1.125, 0.375, 1.125, 0.625, 1.5],
        "nr2": [
            0.10008065936206, 0.73157115385532, -0.88372272336366,
            0.31887660246708, 0.20766491728799, -0.19379315454158e-1,
            -0.16936641554983, 0.13546846041701, -0.33066712095307e-1,
            -0.60690817018557e-1, 0.12797548292871e-1, 0.58743664107299e-2,
            -0.18451951971969e-1, 0.47226622042472e-2, -0.52024079680599e-2,
            0.43563505956635e-1, -0.36251690750939e-1, -0.28974026866543e-2
        ],
        "d2": [1, 1, 1, 2, 3, 6, 2, 3, 3, 4, 4, 2, 3, 4, 5, 6, 6, 7],
        "t2": [
            0.625, 2.625, 2.75, 2.125, 2, 1.75, 4.5, 4.75, 5, 4, 4.5, 7.5, 14,
            11.5, 26, 28, 30, 16
        ],
        "c2": [1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 3, 3, 3, 6, 6, 6, 6],
        "gamma2": [1] * 18,
        "nr3": [],
        "nr4": []
    }

    helmholtz3 = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for nitrogen of Jacobsen et al. (1986).",
        "__doi__": {
            "autor": "Jacobsen, R.T, Stewart, R.B., and Jahangiri, M.",
            "title":
            "Thermodynamic properties of nitrogen from the freezing line to 2000 K at pressures to 1000 MPa",
            "ref": "J. Phys. Chem. Ref. Data, 15(2):735-909, 1986",
            "doi": "10.1007/BF00502385"
        },
        "__test__":
        #Table 21, Pag 795
        """
            >>> st=N2(T=63.15, x=0.5, eq=3)
            >>> print "%0.6g %0.4g %0.5g %0.5g %0.5g %0.5g %0.4g %0.5g %0.4g %0.4g %0.3g %0.3g" % (\
                st.T, st.P.MPa, st.Liquido.rhoM, st.Gas.rhoM, st.Liquido.hM.Jmol, st.Gas.hM.Jmol, \
                st.Liquido.sM.JmolK, st.Gas.sM.JmolK, st.Liquido.cvM.JmolK, \
                st.Liquido.cpM.JmolK, st.Liquido.w, st.Gas.w)
            63.15 0.01253 31.046 0.02412 -4227.5 1806.3 67.89 163.43 31.29 23.94 56.56 33.27 1022 159
            >>> st=N2(T=70, x=0.5, eq=3)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.5g %0.5g %0.4g %0.5g %0.4g %0.4g %0.3g %0.3g" % (\
                st.T, st.P.MPa, st.Liquido.rhoM, st.Gas.rhoM, st.Liquido.hM.Jmol, st.Gas.hM.Jmol, \
                st.Liquido.sM.JmolK, st.Gas.sM.JmolK, st.Liquido.cvM.JmolK, \
                st.Liquido.cpM.JmolK, st.Liquido.w, st.Gas.w)
            70 0.03857 29.98 0.06784 -3840.3 1980.5 73.70 156.85 30.64 25.24 56.46 35.36 933 166
            >>> st=N2(T=80, x=0.5, eq=3)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.5g %0.5g %0.4g %0.5g %0.4g %0.4g %0.3g %0.3g" % (\
                st.T, st.P.MPa, st.Liquido.rhoM, st.Gas.rhoM, st.Liquido.hM.Jmol, st.Gas.hM.Jmol, \
                st.Liquido.sM.JmolK, st.Gas.sM.JmolK, st.Liquido.cvM.JmolK, \
                st.Liquido.cpM.JmolK, st.Liquido.w, st.Gas.w)
            80 0.13699 28.351 0.21801 -3268.9 2202.7 81.28 149.67 29.63 26.52 57.65 38.34 821 174
            >>> st=N2(T=90, x=0.5, eq=3)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.5g %0.5g %0.4g %0.5g %0.4g %0.4g %0.3g %0.3g" % (\
                st.T, st.P.MPa, st.Liquido.rhoM, st.Gas.rhoM, st.Liquido.hM.Jmol, st.Gas.hM.Jmol, \
                st.Liquido.sM.JmolK, st.Gas.sM.JmolK, st.Liquido.cvM.JmolK, \
                st.Liquido.cpM.JmolK, st.Liquido.w, st.Gas.w)
            90 0.36066 26.581 0.53967 -2677.4 2368.8 88.15 144.22 28.64 27.02 60.18 41.59 713 179
            >>> st=N2(T=100, x=0.5, eq=3)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.5g %0.5g %0.4g %0.5g %0.4g %0.4g %0.3g %0.3g" % (\
                st.T, st.P.MPa, st.Liquido.rhoM, st.Gas.rhoM, st.Liquido.hM.Jmol, st.Gas.hM.Jmol, \
                st.Liquido.sM.JmolK, st.Gas.sM.JmolK, st.Liquido.cvM.JmolK, \
                st.Liquido.cpM.JmolK, st.Liquido.w, st.Gas.w)
            100 0.77881 24.584 1.1436 -2050.5 2451.0 94.58 139.59 27.84 27.43 65.09 47.46 601 181
            >>> st=N2(T=110, x=0.5, eq=3)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.5g %0.5g %0.4g %0.5g %0.4g %0.4g %0.3g %0.3g" % (\
                st.T, st.P.MPa, st.Liquido.rhoM, st.Gas.rhoM, st.Liquido.hM.Jmol, st.Gas.hM.Jmol, \
                st.Liquido.sM.JmolK, st.Gas.sM.JmolK, st.Liquido.cvM.JmolK, \
                st.Liquido.cpM.JmolK, st.Liquido.w, st.Gas.w)
            110 1.4672 22.172 2.2377 -1357.1 2401.3 100.9 135.07 27.55 28.57 76.90 62.45 473 178
            >>> st=N2(T=120, x=0.5, eq=3)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.1f %0.1f %0.2f %0.2f %0.2f %0.2f %0.2f %0.2f %0.0f %0.0f" % (\
                st.T, st.P.MPa, st.Liquido.rhoM, st.Gas.rhoM, st.Liquido.hM.Jmol, st.Gas.hM.Jmol, \
                st.Liquido.sM.JmolK, st.Gas.sM.JmolK, st.Liquido.cvM.JmolK, st.Gas.cvM.JmolK,\
                st.Liquido.cpM.JmolK, st.Gas.cpM.JmolK, st.Liquido.w, st.Gas.w)
            120 2.5125 18.643 4.4632 -493.19 2082.1 107.95 129.41 29.06 31.78 128.9 131.2 309 171
            >>> st=N2(T=126, x=0.5, eq=3)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.1f %0.1f %0.2f %0.2f %0.2f %0.2f %0.0f %0.0f" % (\
                st.T, st.P.MPa, st.Liquido.rhoM, st.Gas.rhoM, st.Liquido.hM.Jmol, st.Gas.hM.Jmol, \
                st.Liquido.sM.JmolK, st.Gas.sM.JmolK, st.Liquido.cvM.JmolK, st.Gas.cvM.JmolK, st.Liquido.w, st.Gas.w)
            126 3.3664 13.304 9.1698 495.38 1194.9 115.53 121.08 37.66 39.64 168 159
            """

        #Table 22, Pag 799
        """
            >>> st=N2(T=84, P=2e4, eq=3)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.2f %0.2f %0.2f %0.0f" % (\
                st.T, st.rhoM, st.uM.Jmol, st.hM.Jmol, st.sM.JmolK, st.cvM.JmolK, st.cpM.JmolK, st.w)
            84 0.02882 1729.5 2423.6 168.03 20.84 29.33 186
            >>> st=N2(T=1200, P=8e4, eq=3)
            >>> print "%0.6g %0.5f %0.5g %0.5g %0.2f %0.2f %0.2f %0.0f" % (\
                st.T, st.rhoM, st.uM.Jmol, st.hM.Jmol, st.sM.JmolK, st.cvM.JmolK, st.cpM.JmolK, st.w)
            1200 0.00802 26800 36780 236.08 25.41 33.73 688
            >>> st=N2(T=70, P=1e5, eq=3)
            >>> print "%0.6g %0.5f %0.5g %0.5g %0.2f %0.2f %0.2f %0.0f" % (\
                st.T, st.rhoM, st.uM.Jmol, st.hM.Jmol, st.sM.JmolK, st.cvM.JmolK, st.cpM.JmolK, st.w)
            70 29.984 -3842.3 -3839.0 73.68 30.64 56.45 934
            >>> st=N2(T=150, P=1.5e5, eq=3)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.2f %0.2f %0.2f %0.0f" % (\
                st.T, st.rhoM, st.uM.Jmol, st.hM.Jmol, st.sM.JmolK, st.cvM.JmolK, st.cpM.JmolK, st.w)
            150 0.12133 3085.8 4322.1 168.09 20.87 29.50 249
            >>> st=N2(T=300, P=5e5, eq=3)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.2f %0.2f %0.2f %0.0f" % (\
                st.T, st.rhoM, st.uM.Jmol, st.hM.Jmol, st.sM.JmolK, st.cvM.JmolK, st.cpM.JmolK, st.w)
            300 0.20064 6199.8 8691.9 178.31 20.85 29.35 354
            >>> st=N2(T=102, P=1e6, eq=3)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.2f %0.2f %0.2f %0.0f" % (\
                st.T, st.rhoM, st.uM.Jmol, st.hM.Jmol, st.sM.JmolK, st.cvM.JmolK, st.cpM.JmolK, st.w)
            102 24.173 -1960.1 -1918.8 95.79 27.71 66.39 580
            >>> st=N2(T=150, P=2e6, eq=3)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.2f %0.2f %0.2f %0.0f" % (\
                st.T, st.rhoM, st.uM.Jmol, st.hM.Jmol, st.sM.JmolK, st.cvM.JmolK, st.cpM.JmolK, st.w)
            150 1.8268 2764.8 3859.6 144.38 21.98 36.31 237
            >>> st=N2(T=122, P=3e6, eq=3)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.2f %0.2f %0.2f %0.0f" % (\
                st.T, st.rhoM, st.uM.Jmol, st.hM.Jmol, st.sM.JmolK, st.cvM.JmolK, st.cpM.JmolK, st.w)
            122 18.077 -492.64 -326.68 109.11 29.03 136.2 297
            >>> st=N2(T=150, P=3e6, eq=3)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.2f %0.2f %0.2f %0.0f" % (\
                st.T, st.rhoM, st.uM.Jmol, st.hM.Jmol, st.sM.JmolK, st.cvM.JmolK, st.cpM.JmolK, st.w)
            150 2.9663 2557.5 3568.8 139.59 22.73 42.46 232
            >>> st=N2(T=144, P=4e6, eq=3)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.2f %0.4g %0.4g %0.0f" % (\
                st.T, st.rhoM, st.uM.Jmol, st.hM.Jmol, st.sM.JmolK, st.cvM.JmolK, st.cpM.JmolK, st.w)
            144 4.8655 2080.2 2902.4 133.24 24.38 61.11 217
            >>> st=N2(T=150, P=5e6, eq=3)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.2f %0.4g %0.4g %0.0f" % (\
                st.T, st.rhoM, st.uM.Jmol, st.hM.Jmol, st.sM.JmolK, st.cvM.JmolK, st.cpM.JmolK, st.w)
            150 6.0248 2030.6 2860.5 131.7 24.53 66.06 227
            >>> st=N2(T=1000, P=1e7, eq=3)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.2f %0.4g %0.4g %0.0f" % (\
                st.T, st.rhoM, st.uM.Jmol, st.hM.Jmol, st.sM.JmolK, st.cvM.JmolK, st.cpM.JmolK, st.w)
            1000 1.1622 21730 30334 189.8 24.47 32.95 654
            >>> st=N2(T=80, P=5e7, eq=3)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.2f %0.4g %0.4g %0.0f" % (\
                st.T, st.rhoM, st.uM.Jmol, st.hM.Jmol, st.sM.JmolK, st.cvM.JmolK, st.cpM.JmolK, st.w)
            80 31.566 -3758.4 -2174.4 74.29 32.88 51.17 1117
            >>> st=N2(T=150, P=1e8, eq=3)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.2f %0.4g %0.4g %0.0f" % (\
                st.T, st.rhoM, st.uM.Jmol, st.hM.Jmol, st.sM.JmolK, st.cvM.JmolK, st.cpM.JmolK, st.w)
            150 28.212 -1230.3 2314.4 99.76 28.02 44.74 1053
            >>> st=N2(T=700, P=5e8, eq=3)
            >>> print "%0.6g %0.5g %0.5g %0.5g %0.2f %0.4g %0.4g %0.0f" % (\
                st.T, st.rhoM, st.uM.Jmol, st.hM.Jmol, st.sM.JmolK, st.cvM.JmolK, st.cpM.JmolK, st.w)
            700 26.085 13376 32544 143.38 26.67 35.08 1544
            """,
        "R":
        8.31434,
        "cp":
        CP2,
        "ref": {
            "Tref": 298.15,
            "Pref": 101.325,
            "ho": 8669,
            "so": 191.502
        },
        "Tc":
        126.193,
        "Pc":
        3397.8,
        "rhoc":
        11.177,
        "Tt":
        63.148,
        "M":
        28.0134,
        "Tmin":
        Tt,
        "Tmax":
        2000.0,
        "Pmax":
        1000000.0,
        "rhomax":
        30.96,
        "Pmin":
        12.52,
        "rhomin":
        31.046,
        "nr1": [
            0.9499541827, 0.2481718513, -0.2046287122, -0.1748429008,
            0.6387017148, -0.5272986168, -0.2049741504e1, 0.5551383553e-1,
            -0.8191106396e-3, -0.5032519699e-1, 0.2650110798, 0.7311459372e-1,
            -0.2813080718e-1, 0.1659823569e-2, 0.6012817812e-1, -0.3785445194,
            0.1895290433, -0.7001895093e-2
        ],
        "d1": [1, 2, 3, 2, 3, 3, 1, 4, 6, 2, 1, 2, 4, 6, 2, 1, 2, 4],
        "t1": [
            0.25, 0.25, 0.25, 0.5, 0.5, 0.75, 1, 1, 1, 1, 1.5, 2, 2, 2, 2, 3,
            3, 3
        ],
        "nr2": [
            -0.4927710927e-1, 0.6512013679e-1, 0.113812194200,
            -0.955140963197e-1, 0.2118354140e-1, -0.1100721771e-1,
            0.1284432210e-1, -0.1054474910e-1, -0.1484600538e-3,
            -0.5806483467e-2
        ],
        "d2": [1, 4, 1, 2, 4, 2, 4, 4, 2, 3],
        "t2": [3, 4, 4, 5, 6, 8, 14, 18, 20, 22],
        "c2": [3, 2, 3, 2, 2, 4, 4, 4, 4, 3],
        "gamma2": [1] * 10,
        "nr3": [],
        "nr4": []
    }

    helmholtz4 = {
        "__type__":
        "Helmholtz",
        "__name__":
        "short Helmholtz equation of state for nitrogen of Span and Wagner (2003).",
        "__doi__": {
            "autor": "Span, R., Wagner, W.",
            "title":
            "Equations of state for technical applications. II. Results for nonpolar fluids.",
            "ref": "Int. J. Thermophys. 24 (2003), 41 – 109.",
            "doi": "10.1023/A:1022310214958"
        },
        "__test__":
        """
            >>> st=N2(T=700, rho=200, eq=4)
            >>> print "%0.4f %0.3f %0.4f" % (st.cp0.kJkgK, st.P.MPa, st.cp.kJkgK)
            1.0979 51.268 1.1719
            >>> st2=N2(T=750, rho=100, eq=4)
            >>> print "%0.2f %0.5f" % (st2.h.kJkg-st.h.kJkg, st2.s.kJkgK-st.s.kJkgK)
            41.82 0.31052
            """,  # Table III, Pag 46
        "R":
        8.31451,
        "cp":
        Fi1,
        "ref": {
            "Tref": 298.15,
            "Pref": 101325.,
            "ho": 8670,
            "so": 191.5
        },
        "Tmin":
        Tt,
        "Tmax":
        600.0,
        "Pmax":
        100000.0,
        "rhomax":
        53.15,
        "Pmin":
        12.566,
        "rhomin":
        30.935,
        "nr1": [
            0.92296567, -0.25575012e1, 0.64482463, 0.1083102e-1, 0.73924167e-1,
            0.23532962e-3
        ],
        "d1": [1, 1, 1, 2, 3, 7],
        "t1": [0.25, 1.125, 1.5, 1.375, 0.25, 0.875],
        "nr2": [
            0.18024854, -0.45660299e-1, -0.1552106, -0.3811149e-1,
            -0.31962422e-1, 0.15513532e-1
        ],
        "d2": [2, 5, 1, 4, 3, 4],
        "t2": [0.625, 1.75, 3.625, 3.625, 14.5, 12],
        "c2": [1, 1, 2, 2, 3, 3],
        "gamma2": [1] * 6,
        "nr3": [],
        "nr4": []
    }

    helmholtz5 = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for nitrogen of Sun and Ely (2004)",
        "__doi__": {
            "autor": "Sun, L. and Ely, J.F.",
            "title":
            "Universal equation of state for engineering application: Algorithm and  application to non-polar and polar fluids",
            "ref": "Fluid Phase Equilib., 222-223:107-118, 2004.",
            "doi": "10.1016/j.fluid.2004.06.028"
        },
        "R":
        8.31451,
        "cp":
        Fi1,
        "ref": {
            "Tref": 298.15,
            "Pref": 101325.,
            "ho": 8670,
            "so": 191.5
        },
        "Tmin":
        Tt,
        "Tmax":
        620.0,
        "Pmax":
        800000.0,
        "rhomax":
        40.,
        "Pmin":
        0.1,
        "rhomin":
        40.,
        "nr1": [
            9.57664698e-1, 8.68692283e-1, -2.88536117, 6.12953165e-2,
            2.55919463e-4, 1.69423647e-2
        ],
        "d1": [1, 1, 1, 3, 7, 2],
        "t1": [1.5, 0.25, 1.25, 0.25, 0.875, 1.375],
        "nr2": [
            -4.43639900e-2, 1.37987734e-1, 2.77148365e-1, -1.44381707e-2,
            -1.69955805e-1, 5.46894457e-3, -2.87747274e-2, -2.38630424e-2
        ],
        "d2": [1, 1, 2, 5, 1, 1, 4, 2],
        "t2": [0, 2.375, 2., 2.125, 3.5, 6.5, 4.75, 12.5],
        "c2": [1, 1, 1, 1, 2, 2, 2, 3],
        "gamma2": [1] * 8
    }

    eq = helmholtz1, MBWR, GERG, helmholtz3, helmholtz4, helmholtz5
    _PR = -0.004032

    _surface = {"sigma": [0.02898], "exp": [1.246]}
    _dielectric = {
        "eq": 3,
        "Tref": 273.16,
        "rhoref": 1000.,
        "a0": [],
        "expt0": [],
        "expd0": [],
        "a1": [4.3872, 0.00226],
        "expt1": [0, 1],
        "expd1": [1, 1],
        "a2": [2.206, 1.135, -169., -35.83],
        "expt2": [0, 1, 0, 1],
        "expd2": [2, 2, 3.1, 3.1]
    }
    _melting = {
        "eq": 1,
        "Tref": Tt,
        "Pref": 12.523,
        "Tmin": Tt,
        "Tmax": 2000.0,
        "a1": [1, 12798.61, -12798.61],
        "exp1": [0, 1.78963, 0],
        "a2": [],
        "exp2": [],
        "a3": [],
        "exp3": []
    }
    _sublimation = {
        "eq": 3,
        "Tref": Tt,
        "Pref": 12.523,
        "Tmin": Tt,
        "Tmax": Tt,
        "a1": [],
        "exp1": [],
        "a2": [-13.088692],
        "exp2": [1],
        "a3": [],
        "exp3": []
    }
    _vapor_Pressure = {
        "eq": 6,
        "ao": [-0.612445284e1, 0.126327220e1, -0.765910082, -0.177570564e1],
        "exp": [2, 3, 5, 10]
    }
    _liquid_Density = {
        "eq": 4,
        "ao": [0.148654237e1, -0.280476066, 0.894143085e-1, -0.119879866],
        "exp": [0.9882, 2, 8, 17.5]
    }
    _vapor_Density = {
        "eq":
        6,
        "ao": [
            -0.170127164e1, -0.370402649e1, 0.129859383e1, -0.561424977,
            -0.268505381e1
        ],
        "exp": [1.02, 2.5, 3.5, 6.5, 14]
    }

    visco0 = {
        "eq": 1,
        "omega": 1,
        "__name__": "Lemmon (2004)",
        "__doi__": {
            "autor": "Lemmon, E.W. and Jacobsen, R.T.",
            "title":
            "Viscosity and Thermal Conductivity Equations for Nitrogen, Oxygen, Argon, and Air",
            "ref": "Int. J. Thermophys., 25:21-69, 2004.",
            "doi": "10.1023/B:IJOT.0000022327.04529.f3"
        },
        "__test__": """
                    >>> st=N2(T=100, rhom=0)
                    >>> print "%0.5f" % st.mu.muPas
                    6.90349
                    >>> st=N2(T=300, rhom=0)
                    >>> print "%0.4f" % st.mu.muPas
                    17.8771
                    >>> st=N2(T=100, rhom=28)
                    >>> print "%0.3f" % st.mu.muPas
                    79.7418
                    >>> st=N2(T=200, rhom=10)
                    >>> print "%0.4f" % st.mu.muPas
                    21.0810
                    >>> st=N2(T=300, rhom=5)
                    >>> print "%0.4f" % st.mu.muPas
                    20.7430
                    >>> st=N2(T=132.64, rhom=10.4)
                    >>> print "%0.4f" % st.mu.muPas
                    18.2978
                    """,  # Table V, Pag 28
        "Tref": 1.,
        "etaref": 1,
        "rhoref": 1. * M,
        "ek": 98.94,
        "sigma": 0.3656,
        "Tref_res": 126.192,
        "rhoref_res": 11.1839 * M,
        "etaref_res": 1,
        "n_poly": [10.72, 0.03989, 0.001208, -7.402, 4.62],
        "t_poly": [.1, .25, 3.2, .9, 0.3],
        "d_poly": [2, 10, 12, 2, 1],
        "g_poly": [0, 1, 1, 1, 1],
        "c_poly": [0, 1, 1, 2, 3]
    }

    visco1 = {
        "eq":
        2,
        "omega":
        2,
        "collision": [
            -136.985150760851, 734.241371453542, -1655.39131952744,
            2062.67809686969, -1579.52439123889, 777.942880032361,
            -232.996787901831, 40.0691427576552, -2.99482706239363
        ],
        "__name__":
        "Younglove (1982)",
        "__doi__": {
            "autor": "Younglove, B.A.",
            "title":
            "Thermophysical Properties of Fluids. I. Argon, Ethylene, Parahydrogen, Nitrogen, Nitrogen Trifluoride, and Oxygen",
            "ref":
            "J. Phys. Chem. Ref. Data, Vol. 11, Suppl. 1, pp. 1-11, 1982.",
            "doi": ""
        },
        "ek":
        118.,
        "sigma":
        0.354,
        "n_chapman":
        0.141286429751707,
        "t_chapman":
        0.0,
        "F": [-3.14276193277e-3, 9.22071479907e-4, 1.4, 118],
        "E": [
            -12.128154129, 68.46443564, 11.2569594404402, -565.76279020055,
            9.56677570672e-2, -.355533724265011, 618.536783201947
        ],
        "rhoc":
        11.2435750999429
    }

    visco2 = {
        "eq": 1,
        "omega": 1,
        "collision": [0.46649, -0.57015, 0.19164, -0.03708, 0.00241],
        "__name__": "Stephan (1987)",
        "__doi__": {
            "autor": "Stephan, K., Krauss, R., and Laesecke, A.",
            "title":
            "Viscosity and Thermal Conductivity of Nitrogen for a Wide Range of Fluid States",
            "ref": "J. Phys. Chem. Ref. Data, 16(4):993-1023, 1987.",
            "doi": "10.1063/1.555798"
        },
        "__test__": """
                    >>> st=N2(T=80, P=1e5, visco=2)
                    >>> print "%0.2f" % st.mu.muPas
                    5.24
                    >>> st=N2(T=80, P=1e7, visco=2)
                    >>> print "%0.2f" % st.mu.muPas
                    153.45
                    >>> st=N2(T=300, P=1e6, visco=2)
                    >>> print "%0.2f" % st.mu.muPas
                    18.03
                    >>> st=N2(T=1100, P=1e7, visco=2)
                    >>> print "%0.2f" % st.mu.muPas
                    44.67
                    >>> st=N2(T=100, P=4.5e7, visco=2)
                    >>> print "%0.2f" % st.mu.muPas
                    155.58
                    >>> st=N2(T=80, P=2e7, visco=2)
                    >>> print "%0.2f" % st.mu.muPas
                    28.37
                    >>> st=N2(T=200, P=5e7, visco=2)
                    >>> print "%0.2f" % st.mu.muPas
                    49.34
                    >>> st=N2(T=1100, P=1e8, visco=2)
                    >>> print "%0.2f" % st.mu.muPas
                    50.20
                    """,  # Table A1, Pag 1013
        "Tref": 1.,
        "etaref": 1,
        "ek": 100.01654,
        "sigma": 0.36502496,
        "n_chapman": 0.141290 / M**0.5,
        "Tref_res": 1,
        "rhoref_res": 11.2088889 * M,
        "etaref_res": 14.,
        "n_poly": [-5.8470232, -1.4470051, -0.27766561e-1, -0.21662362],
        "t_poly": [0, 0, 0, 0],
        "d_poly": [0, 1, 2, 3],
        "g_poly": [0, 0, 0, 0],
        "c_poly": [0, 0, 0, 0],
        "n_num": [-20.09997],
        "t_num": [0],
        "d_num": [0],
        "g_num": [0],
        "c_num": [0],
        "n_den": [1.0, -3.4376416],
        "t_den": [0, 0],
        "d_den": [1, 0],
        "g_den": [0, 0],
        "c_den": [0, 0]
    }

    _viscosity = visco0, visco1, visco2

    thermo0 = {
        "eq": 1,
        "__name__": "Lemmon (2004)",
        "__doi__": {
            "autor": "Lemmon, E.W. and Jacobsen, R.T.",
            "title":
            "Viscosity and Thermal Conductivity Equations for Nitrogen, Oxygen, Argon, and Air",
            "ref": "Int. J. Thermophys., 25:21-69, 2004.",
            "doi": "10.1023/B:IJOT.0000022327.04529.f3"
        },
        "__test__": """
                    >>> st=N2(T=100, rhom=0)
                    >>> print "%0.5f" % st.k.mWmK
                    9.27749
                    >>> st=N2(T=300, rhom=0)
                    >>> print "%0.4f" % st.k.mWmK
                    25.9361
                    >>> st=N2(T=100, rhom=25)
                    >>> print "%0.3f" % st.k.mWmK
                    103.834
                    >>> st=N2(T=200, rhom=10)
                    >>> print "%0.4f" % st.k.mWmK
                    36.0099
                    >>> st=N2(T=300, rhom=5)
                    >>> print "%0.4f" % st.k.mWmK
                    32.7694
                    >>> st=N2(T=126.195, rhom=11.18)
                    >>> print "%0.4f" % st.k.mWmK
                    675.8
                    """,  # Table V, Pag 28
        "Tref": 126.192,
        "kref": 1e-3,
        "no": [1.511, 2.117, -3.332],
        "co": [-97, -1, -0.7],
        "Trefb": 126.192,
        "rhorefb": 11.1839,
        "krefb": 1e-3,
        "nb": [8.862, 31.11, -73.13, 20.03, -0.7096, 0.2672],
        "tb": [0, 0.03, 0.2, 0.8, 0.6, 1.9],
        "db": [1, 2, 3, 4, 8, 10],
        "cb": [0, 0, 1, 2, 2, 2],
        "critical": 3,
        "gnu": 0.63,
        "gamma": 1.2415,
        "R0": 1.01,
        "Xio": 0.17e-9,
        "gam0": 0.055,
        "qd": 0.40e-9,
        "Tcref": 252.384
    }

    thermo1 = {
        "eq":
        3,
        "__name__":
        "Younglove (1982)",
        "__doi__": {
            "autor": "Younglove, B.A.",
            "title":
            "Thermophysical Properties of Fluids. I. Argon, Ethylene, Parahydrogen, Nitrogen, Nitrogen Trifluoride, and Oxygen",
            "ref":
            "J. Phys. Chem. Ref. Data, Vol. 11, Suppl. 1, pp. 1-11, 1982.",
            "doi": ""
        },
        "ek":
        118,
        "sigma":
        0.354,
        "Nchapman":
        0.141286429751707,
        "tchapman":
        0,
        "b": [
            -.15055520615565, 0.183477124982509, 1.45008451566007,
            -4.88031780663869, 6.68390592664363, -4.90242883649539,
            2.02630917877999, -.439826733340102, 3.91906706514e-2
        ],
        "F": [1.50938067650e-3, 1.70975795748e-4, 1.2, 118],
        "E": [
            -38.613291627, -31.826109485, 26.0197970589236, -27.2869897441495,
            0, 0, 0
        ],
        "rhoc":
        35.6938892061679,
        "ff":
        1.67108,
        "rm":
        0.00000003933
    }

    thermo2 = {
        "eq": 1,
        "critical": 0,
        "__name__": "Stephan (1987)",
        "__doi__": {
            "autor": "Stephan, K., Krauss, R., and Laesecke, A.",
            "title":
            "Viscosity and Thermal Conductivity of Nitrogen for a Wide Range of Fluid States",
            "ref": "J. Phys. Chem. Ref. Data, 16(4):993-1023, 1987.",
            "doi": "10.1063/1.555798"
        },
        "__test__": """
                    >>> st=N2(T=80, P=1e5, thermo=2)
                    >>> print "%0.2f" % st.k.mWmK
                    7.73
                    >>> st=N2(T=80, P=1e7, thermo=2)
                    >>> print "%0.2f" % st.k.mWmK
                    153.7
                    >>> st=N2(T=300, P=1e6, thermo=2)
                    >>> print "%0.2f" % st.k.mWmK
                    26.51
                    >>> st=N2(T=1100, P=1e7, thermo=2)
                    >>> print "%0.2f" % st.k.mWmK
                    72.32
                    >>> st=N2(T=100, P=4.5e7, thermo=2)
                    >>> print "%0.2f" % st.k.mWmK
                    166.13
                    >>> st=N2(T=80, P=2e7, thermo=2)
                    >>> print "%0.2f" % st.k.mWmK
                    162.75
                    >>> st=N2(T=200, P=5e7, thermo=2)
                    >>> print "%0.2f" % st.k.mWmK
                    80.58
                    >>> st=N2(T=1100, P=1e8, thermo=2)
                    >>> print "%0.2f" % st.k.mWmK
                    83.68
                    """,  # Table B1, Pag 1018
        "Tref": 1,
        "kref": 1e-3,
        "no": [0.6950401, 0.03643102],
        "co": [-97, -98],
        "Trefb": 1,
        "rhorefb": 11.2088889,
        "krefb": 4.17e-3,
        "nb": [3.3373542, 0.37098251, 0.89913456, 0.16972505],
        "tb": [0, 0, 0, 0],
        "db": [1, 2, 3, 4],
        "cb": [0, 0, 0, 0]
    }

    _thermal = thermo0, thermo1, thermo2
Example #25
0
class N2(MEoS):
    """Multiparamente equation of state for nitrogen"""
    name = "nitrogen"
    CASNumber = "7727-37-9"
    formula = "N2"
    synonym = "R-728"
    _refPropName = "NITROGEN"
    _coolPropName = "Nitrogen"
    rhoc = unidades.Density(313.299958972)
    Tc = unidades.Temperature(126.192)
    Pc = unidades.Pressure(3395.8, "kPa")
    M = 28.01348  # g/mol
    Tt = unidades.Temperature(63.151)
    Tb = unidades.Temperature(77.355)
    f_acent = 0.0372
    momentoDipolar = unidades.DipoleMoment(0.0, "Debye")
    id = 46
    _Tr = unidades.Temperature(122.520245)
    _rhor = unidades.Density(316.134310)
    _w = 0.043553140

    Fi1 = {
        "ao_log": [1, 2.5],
        "pow": [0, 1, -1, -2, -3],
        "ao_pow":
        [-12.76952708, -0.00784163, -1.934819e-4, -1.247742e-5, 6.678326e-8],
        "ao_exp": [1.012941],
        "titao": [26.65788]
    }

    Fi2 = {
        "ao_log": [1, 2.50031],
        "pow": [0, 1],
        "ao_pow": [11.083407489, -22.202102428],
        "ao_exp": [],
        "titao": [],
        "ao_hyp": [0.13732, -0.1466, 0.90066, 0],
        "hyp": [5.25182262, -5.393067706, 13.788988208, 0]
    }

    CP1 = {
        "ao": 3.5,
        "an": [3.066469e-6, 4.70124e-9, -3.987984e-13],
        "pow": [1, 2, 3],
        "ao_exp": [1.012941],
        "exp": [3364.011],
        "ao_hyp": [],
        "hyp": []
    }

    CP2 = {
        "ao":
        3.50418363823,
        "an": [
            -0.837079888737e3, 0.379147114487e2, -0.601737844275,
            -0.874955653028e-5, 0.148958507239e-7, -0.256370354277e-11
        ],
        "pow": [-3, -2, -1.001, 1, 2, 3],
        "ao_exp": [1.00773735767],
        "exp": [3353.4061],
        "ao_hyp": [],
        "hyp": []
    }

    CP3 = {
        "ao": 3.50031,
        "an": [],
        "pow": [],
        "ao_exp": [],
        "exp": [],
        "ao_hyp": [0.13732, -0.1466, 0.90066, 0],
        "hyp": [5.251822620 * Tc, -5.393067706 * Tc, 13.788988208 * Tc, 0],
        "R": 8.31451
    }

    span = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for nitrogen of Span (2000)",
        "__doi__": {
            "autor":
            "Span, R., Lemmon, E.W., Jacobsen, R.T, Wagner, "
            "W., Yokozeki, A.",
            "title":
            "A Reference Equation of State for the "
            "Thermodynamic Properties of Nitrogen for "
            "Temperatures from 63.151 to 1000 K and "
            "Pressures to 2200 MPa",
            "ref":
            "J. Phys. Chem. Ref. Data 29(6) (2000) 1361-1433",
            "doi":
            "10.1063/1.1349047"
        },
        "R":
        8.31451,
        "cp":
        Fi1,
        "ref": {
            "Tref": 298.15,
            "Pref": 101325.,
            "ho": 8670,
            "so": 191.5
        },
        "Tmin":
        Tt,
        "Tmax":
        2000.0,
        "Pmax":
        2200000.0,
        "rhomax":
        53.15,
        "Pmin":
        12.5198,
        "rhomin":
        30.957,
        "nr1": [
            0.924803575275, -0.492448489428, 0.661883336938, -0.192902649201e1,
            -0.622469309629e-1, 0.349943957581
        ],
        "d1": [1, 1, 2, 2, 3, 3],
        "t1": [0.25, 0.875, 0.5, 0.875, 0.375, 0.75],
        "nr2": [
            0.564857472498, -0.161720005987e1, -0.481395031883, 0.421150636384,
            -0.161962230825e-1, 0.172100994165, 0.735448924933e-2,
            0.168077305479e-1, -0.107626664179e-2, -0.137318088513e-1,
            0.635466899859e-3, 0.304432279419e-2, -0.435762336045e-1,
            -0.723174889316e-1, 0.389644315272e-1, -0.212201363910e-1,
            0.408822981509e-2, -0.551990017984e-4, -0.462016716479e-1,
            -0.300311716011e-2, 0.368825891208e-1, -0.255856846220e-2,
            0.896915264558e-2, -0.441513370350e-2, 0.133722924858e-2,
            0.264832491957e-3
        ],
        "d2": [
            1, 1, 1, 3, 3, 4, 6, 6, 7, 7, 8, 8, 1, 2, 3, 4, 5, 8, 4, 5, 5, 8,
            3, 5, 6, 9
        ],
        "t2": [
            0.5, 0.75, 2., 1.25, 3.5, 1., 0.5, 3., 0., 2.75, 0.75, 2.5, 4., 6.,
            6., 3., 3., 6., 16., 11., 15., 12., 12., 7., 4., 16.
        ],
        "c2": [
            1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3,
            4, 4, 4, 4
        ],
        "gamma2": [1] * 26,
        "nr3": [
            0.196688194015e2, -0.209115600730e2, 0.167788306989e-1,
            0.262767566274e4
        ],
        "d3": [1, 1, 3, 2],
        "t3": [0., 1., 2., 3.],
        "alfa3": [20, 20, 15, 25],
        "beta3": [325, 325, 300, 275],
        "gamma3": [1.16, 1.16, 1.13, 1.25],
        "epsilon3": [1] * 4,
        "nr4": []
    }

    MBWR = {
        "__type__":
        "MBWR",
        "__name__":
        "MBWR equation of state for nitrogen of Younglove (1982).",
        "__doi__": {
            "autor":
            "Younglove, B.A.",
            "title":
            "Thermophysical Properties of Fluids. I. Argon, "
            "Ethylene, Parahydrogen, Nitrogen, Nitrogen "
            "Trifluoride, and Oxygen",
            "ref":
            "J. Phys. Chem. Ref. Data, 11(Suppl. 1) (1982)",
            "doi":
            ""
        },
        "R":
        8.31434,
        "cp":
        CP1,
        "Tmin":
        Tt,
        "Tmax":
        1900.0,
        "Pmax":
        1013000.0,
        "rhomax":
        30.977,
        "Pmin":
        12.463,
        "rhomin":
        30.977,
        "b": [
            None, 0.1380297474657e-2, 0.1084506501349, -0.2471324064362e1,
            0.3455257980807e2, -0.4279707690666e4, 0.1064911566998e-3,
            -0.1140867079735e-1, 0.1444902497287e-3, 0.1871457567553e5,
            0.8218876886831e-7, 0.2360990493348e-2, -0.5144803081201,
            0.4914545013668e-4, -0.1151627162399e-2, -0.7168037246650,
            0.7616667619500e-4, -0.1130930066213e-5, 0.3736831166831e-3,
            -0.2039851507581e-5, -0.1719662008990e5, -0.1213055199748e6,
            -0.9881399141428e2, 0.5619886893511e5, -0.1823043964118,
            -0.2599826498477e1, -0.4191893423157e-3, -0.2596406670530,
            -0.1258683201921e-6, 0.1049286599400e-4, -0.5458369305152e-9,
            -0.7674511670597e-8, 0.5931232870994e-7
        ]
    }

    GERG = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for nitrogen of Kunz and "
        "Wagner (2004).",
        "__doi__": {
            "autor":
            "Kunz, O., Wagner, W.",
            "title":
            "The GERG-2008 Wide-Range Equation of State for "
            "Natural Gases and Other Mixtures: An Expansion "
            "of GERG-2004",
            "ref":
            "J. Chem.Eng. Data 57(11) (2012) 3032-3091",
            "doi":
            "10.1021/je300655b"
        },
        "R":
        8.314472,
        "cp":
        Fi2,
        "ref":
        "OTO",
        "Tmin":
        Tt,
        "Tmax":
        2000.0,
        "Pmax":
        2200000.0,
        "rhomax":
        53.15,
        "Pmin":
        73.476,
        "rhomin":
        29.249,
        "nr1": [
            0.59889711801201, -0.16941557480731e1, 0.24579736191718,
            -0.23722456755175, 0.17954918715141e-1, 0.14592875720215e-1
        ],
        "d1": [1, 1, 2, 2, 4, 4],
        "t1": [0.125, 1.125, 0.375, 1.125, 0.625, 1.5],
        "nr2": [
            0.10008065936206, 0.73157115385532, -0.88372272336366,
            0.31887660246708, 0.20766491728799, -0.19379315454158e-1,
            -0.16936641554983, 0.13546846041701, -0.33066712095307e-1,
            -0.60690817018557e-1, 0.12797548292871e-1, 0.58743664107299e-2,
            -0.018451951971969, 0.47226622042472e-2, -0.52024079680599e-2,
            0.043563505956635, -0.36251690750939e-1, -0.28974026866543e-2
        ],
        "d2": [1, 1, 1, 2, 3, 6, 2, 3, 3, 4, 4, 2, 3, 4, 5, 6, 6, 7],
        "t2": [
            0.625, 2.625, 2.75, 2.125, 2, 1.75, 4.5, 4.75, 5, 4, 4.5, 7.5, 14,
            11.5, 26, 28, 30, 16
        ],
        "c2": [1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 3, 3, 3, 6, 6, 6, 6],
        "gamma2": [1] * 18,
        "nr3": [],
        "nr4": []
    }

    jacobsen = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for nitrogen of Jacobsen et "
        "al. (1986).",
        "__doi__": {
            "autor": "Jacobsen, R.T, Stewart, R.B., Jahangiri, M.",
            "title": "Thermodynamic Properties of Nitrogen from the "
            "Freezing Line to 2000K at Pressures to 1000MPa",
            "ref": "J. Phys. Chem. Ref. Data, 15(2) (1986) 735-908",
            "doi": "10.1007/BF00502385"
        },
        "R":
        8.31434,
        "cp":
        CP2,
        "ref": {
            "Tref": 298.15,
            "Pref": 101.325,
            "ho": 8669,
            "so": 191.502
        },
        "Tc":
        126.193,
        "Pc":
        3397.8,
        "rhoc":
        11.177,
        "M":
        28.0134,
        "Tt":
        63.148,
        "Tmin":
        Tt,
        "Tmax":
        2000.0,
        "Pmax":
        1000000.0,
        "rhomax":
        30.96,
        "Pmin":
        12.52,
        "rhomin":
        31.046,
        "nr1": [
            0.9499541827, 0.2481718513, -0.2046287122, -0.1748429008,
            0.6387017148, -0.5272986168, -0.2049741504e1, 0.5551383553e-1,
            -0.8191106396e-3, -0.05032519699, 0.2650110798, 0.07311459372,
            -0.2813080718e-1, 0.1659823569e-2, 0.6012817812e-1, -0.3785445194,
            0.1895290433, -0.7001895093e-2
        ],
        "d1": [1, 2, 3, 2, 3, 3, 1, 4, 6, 2, 1, 2, 4, 6, 2, 1, 2, 4],
        "t1": [
            0.25, 0.25, 0.25, 0.5, 0.5, 0.75, 1, 1, 1, 1, 1.5, 2, 2, 2, 2, 3,
            3, 3
        ],
        "nr2": [
            -0.4927710927e-1, 0.6512013679e-1, 0.113812194200,
            -0.955140963197e-1, 0.2118354140e-1, -0.1100721771e-1,
            0.1284432210e-1, -0.1054474910e-1, -0.1484600538e-3,
            -0.5806483467e-2
        ],
        "d2": [1, 4, 1, 2, 4, 2, 4, 4, 2, 3],
        "t2": [3, 4, 4, 5, 6, 8, 14, 18, 20, 22],
        "c2": [3, 2, 3, 2, 2, 4, 4, 4, 4, 3],
        "gamma2": [1] * 10
    }

    shortSpan = {
        "__type__":
        "Helmholtz",
        "__name__":
        "short Helmholtz equation of state for nitrogen of Span "
        "and Wagner (2003).",
        "__doi__": {
            "autor": "Span, R., Wagner, W.",
            "title": "Equations of state for technical applications. "
            "II. Results for nonpolar fluids.",
            "ref": "Int. J. Thermophys. 24 (1) (2003) 41-109",
            "doi": "10.1023/A:1022310214958"
        },
        "R":
        8.31451,
        "cp":
        Fi1,
        "ref": {
            "Tref": 298.15,
            "Pref": 101325.,
            "ho": 8670,
            "so": 191.5
        },
        "M":
        28.013,
        "Tc":
        126.192,
        "rhoc":
        313.3 / 28.013,
        "Tmin":
        Tt,
        "Tmax":
        750.0,
        "Pmax":
        100000.0,
        "rhomax":
        53.15,
        "Pmin":
        12.566,
        "rhomin":
        30.935,
        "nr1": [
            0.92296567, -0.25575012e1, 0.64482463, 0.1083102e-1, 0.73924167e-1,
            0.23532962e-3
        ],
        "d1": [1, 1, 1, 2, 3, 7],
        "t1": [0.25, 1.125, 1.5, 1.375, 0.25, 0.875],
        "nr2": [
            0.18024854, -0.45660299e-1, -0.1552106, -0.3811149e-1,
            -0.31962422e-1, 0.15513532e-1
        ],
        "d2": [2, 5, 1, 4, 3, 4],
        "t2": [0.625, 1.75, 3.625, 3.625, 14.5, 12],
        "c2": [1, 1, 2, 2, 3, 3],
        "gamma2": [1] * 6,
        "nr3": [],
        "nr4": []
    }

    sun = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for nitrogen of Sun and Ely "
        "(2004)",
        "__doi__": {
            "autor":
            "Sun, L. and Ely, J.F.",
            "title":
            "Universal equation of state for engineering "
            "application: Algorithm and  application to "
            "non-polar and polar fluids",
            "ref":
            "Fluid Phase Equilib., 222-223 (2004) 107-118",
            "doi":
            "10.1016/j.fluid.2004.06.028"
        },
        "R":
        8.31451,
        "cp":
        Fi1,
        "ref": {
            "Tref": 298.15,
            "Pref": 101325.,
            "ho": 8670,
            "so": 191.5
        },
        "Tmin":
        Tt,
        "Tmax":
        620.0,
        "Pmax":
        800000.0,
        "rhomax":
        40.,
        "Pmin":
        0.1,
        "rhomin":
        40.,
        "nr1": [
            9.57664698e-1, 8.68692283e-1, -2.88536117, 6.12953165e-2,
            2.55919463e-4, 1.69423647e-2
        ],
        "d1": [1, 1, 1, 3, 7, 2],
        "t1": [1.5, 0.25, 1.25, 0.25, 0.875, 1.375],
        "nr2": [
            -4.43639900e-2, 1.37987734e-1, 2.77148365e-1, -1.44381707e-2,
            -1.69955805e-1, 5.46894457e-3, -2.87747274e-2, -2.38630424e-2
        ],
        "d2": [1, 1, 2, 5, 1, 1, 4, 2],
        "t2": [0, 2.375, 2., 2.125, 3.5, 6.5, 4.75, 12.5],
        "c2": [1, 1, 1, 1, 2, 2, 2, 3],
        "gamma2": [1] * 8
    }

    # eq = span, MBWR, GERG, jacobsen, shortSpan, sun
    eq = span, GERG, jacobsen, shortSpan, sun
    _PR = -0.004032

    _surface = {"sigma": [0.02898], "exp": [1.246]}
    _dielectric = {
        "eq": 3,
        "Tref": 273.16,
        "rhoref": 1000.,
        "a0": [],
        "expt0": [],
        "expd0": [],
        "a1": [4.3872, 0.00226],
        "expt1": [0, 1],
        "expd1": [1, 1],
        "a2": [2.206, 1.135, -169., -35.83],
        "expt2": [0, 1, 0, 1],
        "expd2": [2, 2, 3.1, 3.1]
    }
    _melting = {
        "eq": 1,
        "Tref": Tt,
        "Pref": 12.523,
        "Tmin": Tt,
        "Tmax": 2000.0,
        "a1": [1, 12798.61, -12798.61],
        "exp1": [0, 1.78963, 0],
        "a2": [],
        "exp2": [],
        "a3": [],
        "exp3": []
    }
    _sublimation = {
        "eq": 3,
        "Tref": Tt,
        "Pref": 12.523,
        "Tmin": Tt,
        "Tmax": Tt,
        "a1": [],
        "exp1": [],
        "a2": [-13.088692],
        "exp2": [1],
        "a3": [],
        "exp3": []
    }
    _vapor_Pressure = {
        "eq": 3,
        "n": [-6.12445284, 1.2632722, -0.765910082, -1.77570564],
        "t": [1, 1.5, 2.5, 5]
    }
    _liquid_Density = {
        "eq": 2,
        "n": [1.48654237, -0.280476066, 0.894143085e-1, -0.119879866],
        "t": [0.3294, 2 / 3, 8 / 3, 35 / 6]
    }
    _vapor_Density = {
        "eq": 3,
        "n": [-1.70127164, -3.70402649, 1.29859383, -0.561424977, -2.68505381],
        "t": [0.34, 5 / 6, 7 / 6, 13 / 6, 14 / 3]
    }

    visco0 = {
        "__name__": "Lemmon (2004)",
        "__doi__": {
            "autor": "Lemmon, E.W., Jacobsen, R.T.",
            "title": "Viscosity and Thermal Conductivity Equations for "
            "Nitrogen, Oxygen, Argon, and Air",
            "ref": "Int. J. Thermophys., 25(1) (2004) 21-69",
            "doi": "10.1023/B:IJOT.0000022327.04529.f3"
        },
        "eq": 1,
        "omega": 1,
        "ek": 98.94,
        "sigma": 0.3656,
        "Tref_res": 126.192,
        "rhoref_res": 11.1839 * M,
        "nr": [10.72, 0.03989, 0.001208, -7.402, 4.62],
        "tr": [.1, .25, 3.2, .9, 0.3],
        "dr": [2, 10, 12, 2, 1],
        "gr": [0, 1, 1, 1, 1],
        "cr": [0, 1, 1, 2, 3]
    }

    visco1 = {
        "__name__":
        "Younglove (1982)",
        "__doi__": {
            "autor":
            "Younglove, B.A.",
            "title":
            "Thermophysical Properties of Fluids. I. Argon, "
            "Ethylene, Parahydrogen, Nitrogen, Nitrogen "
            "Trifluoride, and Oxygen",
            "ref":
            "J. Phys. Chem. Ref. Data, 11 (Suppl. 1) (1982)",
            "doi":
            ""
        },
        "eq":
        2,
        "omega":
        0,
        "no": [
            -0.1822424e5, 0.19915327374e5, -0.91542324494e4, 0.23255484059e4,
            -0.36307214228e3, 0.36457506811e2, -0.22261880817e1,
            0.78053904895e-1, -0.11894029104e-2
        ],
        "to": [-1, -2 / 3, -1 / 3, 0, 1 / 3, 2 / 3, 1, 4 / 3, 5 / 3],
        "mod":
        True,
        "F": [-0.11217739623, 0.32912317244e-1, 1.4, 118],
        "E": [
            -12.128154129, 0.57156092139, 16.094611148, 3.6954086158e3,
            -8.088980118e2, 68.46443564, -2.1241135912
        ],
        "rhoc":
        0.315
    }
    # "E": [-12.128154129, 68.46443564, 11.2569594404402, -565.76279020055,
    # 9.56677570672e-2, -.355533724265011, 618.536783201947],
    # "rhoc": 11.2435750999429}

    visco2 = {
        "__name__": "Stephan (1987)",
        "__doi__": {
            "autor": "Stephan, K., Krauss, R., Laesecke, A.",
            "title": "Viscosity and Thermal Conductivity of Nitrogen "
            "for a Wide Range of Fluid States",
            "ref": "J. Phys. Chem. Ref. Data 16(4) (1987) 993-1023",
            "doi": "10.1063/1.555798"
        },
        "eq": 1,
        "omega": 1,
        "ek": 100.01654,
        "sigma": 0.36502496,
        "n_chapman": 0.141290 / M**0.5,
        "collision": [0.46649, -0.57015, 0.19164, -0.03708, 0.00241],
        "rhoref_res": 314,
        "muref_res": 14.,
        "nr": [-5.8470232, -1.4470051, -0.027766561, -0.21662362],
        "tr": [0, 0, 0, 0],
        "dr": [0, 1, 2, 3],
        "nr_num": [-20.09997],
        "tr_num": [0],
        "dr_num": [0],
        "nr_den": [1.0, -3.4376416],
        "tr_den": [0, 0],
        "dr_den": [1, 0]
    }

    _viscosity = visco0, visco1, visco2

    thermo0 = {
        "__name__": "Lemmon (2004)",
        "__doi__": {
            "autor": "Lemmon, E.W., Jacobsen, R.T.",
            "title": "Viscosity and Thermal Conductivity Equations for "
            "Nitrogen, Oxygen, Argon, and Air",
            "ref": "Int. J. Thermophys., 25(1) (2004) 21-69",
            "doi": "10.1023/B:IJOT.0000022327.04529.f3"
        },
        "eq": 1,
        "Toref": 126.192,
        "koref": 1e-3,
        "no_visco": 1.511,
        "no": [2.117, -3.332],
        "to": [1, 0.7],
        "Tref_res": 126.192,
        "rhoref_res": 11.1839 * M,
        "kref_res": 1e-3,
        "nr": [8.862, 31.11, -73.13, 20.03, -0.7096, 0.2672],
        "tr": [0, 0.03, 0.2, 0.8, 0.6, 1.9],
        "dr": [1, 2, 3, 4, 8, 10],
        "cr": [0, 0, 1, 2, 2, 2],
        "gr": [0, 0, 1, 1, 1, 1],
        "critical": 3,
        "gnu": 0.63,
        "gamma": 1.2415,
        "R0": 1.01,
        "Xio": 0.17e-9,
        "gam0": 0.055,
        "qd": 0.40e-9,
        "Tcref": 252.384
    }

    thermo1 = {
        "eq":
        3,
        "__name__":
        "Younglove (1982)",
        "__doi__": {
            "autor": "Younglove, B.A.",
            "title":
            "Thermophysical Properties of Fluids. I. Argon, Ethylene, Parahydrogen, Nitrogen, Nitrogen Trifluoride, and Oxygen",
            "ref":
            "J. Phys. Chem. Ref. Data, Vol. 11, Suppl. 1, pp. 1-11, 1982.",
            "doi": ""
        },
        "ek":
        118,
        "sigma":
        0.354,
        "Nchapman":
        0.141286429751707,
        "tchapman":
        0,
        "b": [
            -.15055520615565, 0.183477124982509, 1.45008451566007,
            -4.88031780663869, 6.68390592664363, -4.90242883649539,
            2.02630917877999, -.439826733340102, 3.91906706514e-2
        ],
        "F": [1.50938067650e-3, 1.70975795748e-4, 1.2, 118],
        "E": [
            -38.613291627, -31.826109485, 26.0197970589236, -27.2869897441495,
            0, 0, 0
        ],
        "rhoc":
        35.6938892061679,
        "ff":
        1.67108,
        "rm":
        0.00000003933
    }

    thermo2 = {
        "eq": 1,
        "critical": 0,
        "__name__": "Stephan (1987)",
        "__doi__": {
            "autor": "Stephan, K., Krauss, R., and Laesecke, A.",
            "title":
            "Viscosity and Thermal Conductivity of Nitrogen for a Wide Range of Fluid States",
            "ref": "J. Phys. Chem. Ref. Data, 16(4):993-1023, 1987.",
            "doi": "10.1063/1.555798"
        },
        "__test__": """
                    >>> st=N2(T=80, P=1e5, thermo=2)
                    >>> print "%0.2f" % st.k.mWmK
                    7.73
                    >>> st=N2(T=80, P=1e7, thermo=2)
                    >>> print "%0.2f" % st.k.mWmK
                    153.7
                    >>> st=N2(T=300, P=1e6, thermo=2)
                    >>> print "%0.2f" % st.k.mWmK
                    26.51
                    >>> st=N2(T=1100, P=1e7, thermo=2)
                    >>> print "%0.2f" % st.k.mWmK
                    72.32
                    >>> st=N2(T=100, P=4.5e7, thermo=2)
                    >>> print "%0.2f" % st.k.mWmK
                    166.13
                    >>> st=N2(T=80, P=2e7, thermo=2)
                    >>> print "%0.2f" % st.k.mWmK
                    162.75
                    >>> st=N2(T=200, P=5e7, thermo=2)
                    >>> print "%0.2f" % st.k.mWmK
                    80.58
                    >>> st=N2(T=1100, P=1e8, thermo=2)
                    >>> print "%0.2f" % st.k.mWmK
                    83.68
                    """,  # Table B1, Pag 1018
        "Tref": 1,
        "kref": 1e-3,
        "no": [0.6950401, 0.03643102],
        "co": [-97, -98],
        "Trefb": 1,
        "rhorefb": 11.2088889,
        "krefb": 4.17e-3,
        "nb": [3.3373542, 0.37098251, 0.89913456, 0.16972505],
        "tb": [0, 0, 0, 0],
        "db": [1, 2, 3, 4],
        "cb": [0, 0, 0, 0]
    }

    _thermal = thermo0, thermo1, thermo2
Example #26
0
class Butene_1(MEoS):
    """Multiparameter equation of state for 1-butene"""
    name = "butene"
    CASNumber = "106-98-9"
    formula = "CH3-CH2-CH=CH2"
    synonym = ""
    rhoc = unidades.Density(237.8907968)
    Tc = unidades.Temperature(419.29)
    Pc = unidades.Pressure(4005.1, "kPa")
    M = 56.10632  # g/mol
    Tt = unidades.Temperature(87.8)
    Tb = unidades.Temperature(266.84)
    f_acent = 0.192
    momentoDipolar = unidades.DipoleMoment(0.339, "Debye")
    id = 24

    Fi1 = {
        "ao_log": [1, 2.9197],
        "pow": [0, 1],
        "ao_pow": [-0.00101126, 2.3869174],
        "ao_exp": [2.9406, 6.5395, 14.5395, 5.8971],
        "titao": [274 / Tc, 951 / Tc, 2127 / Tc, 5752 / Tc]
    }

    helmholtz1 = {
        "__type__": "Helmholtz",
        "__name__":
        "short Helmholtz equation of state for 1-butene of Lemmon and Ihmels (2005)",
        "__doi__": {
            "autor": "Lemmon, E.W., Ihmels, E.C.",
            "title":
            "Thermodynamic properties of the butenes: Part II. Short fundamental equations of state",
            "ref": "Fluid Phase Equilibria 228 – 229 (2004), 173 – 187.",
            "doi": "10.1016/j.fluid.2004.09.004"
        },
        "__test__": """
            >>> st=Butene_1(T=350, rho=0)
            >>> print "%0.0f %0.1f %0.1f %0.5g %0.5g %0.5g %0.5g" % (st.T, st.rhoM, st.P.MPa, st.hM.kJkmol, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            350 0.0 0.0 29617 88.208 96.522 238.24
            >>> st=Butene_1(T=350, rho=0.3*56.10632)
            >>> print "%0.0f %0.1f %.5g %.5g %0.5g %0.5g %0.5g %0.5g" % (st.T, st.rhoM, st.P.MPa, st.hM.kJkmol, st.sM.kJkmolK, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            350 0.3 0.75679 28321 87.626 92.719 108.45 211.38
            >>> st=Butene_1(T=350, rho=10*56.10632)
            >>> print "%0.0f %0.1f %.5g %.5g %0.5g %0.5g %0.5g %0.5g" % (st.T, st.rhoM, st.P.MPa, st.hM.kJkmol, st.sM.kJkmolK, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            350 10.0 17.864 11377 31.563 97.760 135.36 843.31
            >>> st=Butene_1(T=440, rho=4*56.10632)
            >>> print "%0.0f %0.1f %.5g %.5g %0.5g %0.5g %0.5g %0.5g" % (st.T, st.rhoM, st.P.MPa, st.hM.kJkmol, st.sM.kJkmolK, st.cvM.kJkmolK, st.cpM.kJkmolK, st.w)
            440 4.0 5.3245 29454 80.191 124.13 416.03 151.49
            """,  # Table 9, Pag 186
        "R": 8.314472,
        "cp": Fi1,
        "ref": "NBP",
        "Tmin": Tt,
        "Tmax": 525.,
        "Pmax": 70000.0,
        "rhomax": 14.59,
        "Pmin": 0.0000000008,
        "rhomin": 14.58,
        "nr1": [0.78084, -2.8258, 0.99403, 0.017951, 0.088889, 0.00024673],
        "d1": [1, 1, 1, 2, 3, 7],
        "t1": [0.12, 1.3, 1.74, 2.1, 0.28, 0.69],
        "nr2": [0.22846, -0.074009, -0.22913, -0.062334, -0.025385, 0.011040],
        "d2": [2, 5, 1, 4, 3, 4],
        "t2": [0.75, 2., 4.4, 4.7, 15., 14.],
        "c2": [1, 1, 2, 2, 3, 3],
        "gamma2": [1] * 6
    }

    eq = helmholtz1,

    _surface = {"sigma": [0.05644], "exp": [1.248]}
    _vapor_Pressure = {
        "eq": 5,
        "ao": [-0.71727e1, 0.26360e1, -0.20781e1, -0.28860e1, -0.13041e1],
        "exp": [1, 1.5, 2, 4.35, 16.]
    }
    _liquid_Density = {
        "eq": 1,
        "ao": [0.16857e2, -0.46280e2, 0.53727e2, -0.23314e2, 0.18889e1],
        "exp": [0.547, 0.73, 0.92, 1.14, 2.1]
    }
    _vapor_Density = {
        "eq":
        3,
        "ao": [
            -0.31106e1, -0.63103e1, -0.19272e2, -0.48739e2, -0.99898e2,
            -0.19001e3
        ],
        "exp": [0.415, 1.27, 3.34, 7.0, 14.5, 28.0]
    }

    trnECS = {
        "eq": "ecs",
        "__name__": "Extended Corresponding States model",
        "__doi__": {
            "autor": "Huber, M.L., Laesecke, A., and Perkins, R.A.",
            "title":
            "Model for the Viscosity and Thermal Conductivity of Refrigerants, Including a New Correlation for the Viscosity of R134a",
            "ref": "Ind. Eng. Chem. Res., 2003, 42 (13), pp 3163–3178",
            "doi": "10.1021/ie0300880"
        },
        "ref": C3,
        "ref_eq": "helmholtz1",
        "eq_visco": "visco1",
        "eq_thermo": "thermo0",
        "sigma": 0.4998,
        "ek": 332.95,
        "fint": [1.32e-3],
        "fint_t": [0],
        "psi": [1.0],
        "psi_t": [0],
        "psi_d": [0],
        "phi": [1.0],
        "phi_t": [0],
        "phi_d": [0]
    }

    _viscosity = trnECS,
    _thermal = trnECS,
Example #27
0
class C3(MEoS):
    """Multiparameter equation of state for propane"""
    name = "propane"
    CASNumber = "74-98-6"
    formula = "CH3CH2CH3"
    synonym = "R-290"
    rhoc = unidades.Density(220.4781)
    Tc = unidades.Temperature(369.89)
    Pc = unidades.Pressure(4251.2, "kPa")
    M = 44.09562  # g/mol
    Tt = unidades.Temperature(85.525)
    Tb = unidades.Temperature(231.036)
    f_acent = 0.1521
    momentoDipolar = unidades.DipoleMoment(0.084, "Debye")
    id = 4
    _Tr = unidades.Temperature(354.964211)
    _rhor = unidades.Density(221.906745)
    _w = 0.149041513

    Fi1 = {
        "ao_log": [1, 3],
        "pow": [0, 1],
        "ao_pow": [-4.970583, 4.29352],
        "ao_exp": [3.043, 5.874, 9.337, 7.922],
        "titao": [393 / Tc, 1237 / Tc, 1984 / Tc, 4351 / Tc],
        "ao_hyp": [],
        "hyp": []
    }

    Fi2 = {
        "ao_log": [1, 3.02939],
        "pow": [0, 1],
        "ao_pow": [31.602908195, -84.463284382],
        "ao_exp": [],
        "titao": [],
        "ao_hyp": [6.60569, 3.197, 19.1921, -8.37267],
        "hyp": [1.297521801, 0.543210978, 2.583146083, 2.777773271]
    }

    Fi3 = {
        "ao_log": [1, 3.02256195],
        "pow": [0, 1],
        "ao_pow": [10.14394256, -4.79513693],
        "ao_exp": [2.90591124, 4.68495401, 10.2971154, 8.08977905],
        "titao": [1.0515052038, 3.0961635368, 5.0845797877, 11.4329447982],
        "ao_hyp": [],
        "hyp": []
    }

    Fi4 = {
        "ao_log": [1, 3.021394],
        "pow": [0, 1],
        "ao_pow": [-4.992402, 4.291476],
        "ao_exp": [2.889980, 4.474243, 8.139803, 10.48251],
        "titao": [1.048309, 3.053170, 11.42280, 5.042815],
        "ao_hyp": [],
        "hyp": []
    }

    CP5 = {
        "ao":
        -5.4041204338,
        "an": [
            3.1252450099e6, -1.1415253638e5, 1.4971650720e3, 3.9215452897e-2,
            -2.1738913926e-5, 4.8274541303e-9
        ],
        "pow": [-3, -2, -1.001, 1, 2, 3],
        "ao_exp": [3.1907016349],
        "exp": [1500],
        "ao_hyp": [],
        "hyp": []
    }

    helmholtz1 = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for propane of Lemmon et al. (2009)",
        "__doi__": {
            "autor": "Lemmon, E.W., McLinden, M.O., Wagner, W.",
            "title":
            "Thermodynamic Properties of Propane.  III.  A Reference Equation of State for Temperatures from the Melting Line to 650 K and Pressures up to 1000 MPa",
            "ref": "J. Chem. Eng. Data, 2009, 54 (12), pp 3141–3180",
            "doi": "10.1021/je900217v"
        },
        "__test__":
        # Table 5, Pag AH
        """
            >>> st=C3(T=200, rhom=14)
            >>> print "%0.1f %0.1f %0.8g %0.8g %0.8g %0.8g" % (\
                st.T, st.rhoM, st.P.MPa, st.cvM.JmolK, st.cpM.JmolK, st.w)
            200.0 14.0 2.3795138 61.078424 93.475362 1381.9552
            >>> st=C3(T=300, rhom=12)
            >>> print "%0.1f %0.1f %0.8g %0.8g %0.8g %0.8g" % (\
                st.T, st.rhoM, st.P.MPa, st.cvM.JmolK, st.cpM.JmolK, st.w)
            300.0 12.0 19.053797 73.972542 108.61529 958.4052
            >>> st=C3(T=300, rhom=0.4)
            >>> print "%0.1f %0.1f %0.8g %0.8g %0.8g %0.8g" % (\
                st.T, st.rhoM, st.P.MPa, st.cvM.JmolK, st.cpM.JmolK, st.w)
            300.0 0.4 0.84694991 69.021875 85.753997 221.88959
            >>> st=C3(T=400, rhom=5)
            >>> print "%0.1f %0.1f %0.8g %0.8g %0.8g %0.8g" % (\
                st.T, st.rhoM, st.P.MPa, st.cvM.JmolK, st.cpM.JmolK, st.w)
            400.0 5.0 6.646284 97.017439 271.07044 194.65847
            >>> st=C3(T=369.9, rhom=5)
            >>> print "%0.1f %0.1f %0.8g %0.8g %0.8g %0.8g" % (\
                st.T, st.rhoM, st.P.MPa, st.cvM.JmolK, st.cpM.JmolK, st.w)
            369.9 5.0 4.2519399 117.71621 753625 130.898
            """

        # Table A1, Pag A1
        """
            >>> st=C3(T=C3.Tt, x=0.5)
            >>> print "%0.6g %0.4e %0.2f %0.2e %0.5g %0.5g %0.4g %0.4g %0.4g %0.4g %0.4g %0.4g %0.1f %0.1f" % (\
                st.T.C, st.P.MPa, st.Liquido.rho, st.Gas.rho, st.Liquido.h.kJkg, st.Gas.h.kJkg, \
                st.Liquido.s.kJkgK, st.Gas.s.kJkgK, st.Liquido.cv.kJkgK, st.Gas.cv.kJkgK, \
                st.Liquido.cp.kJkgK, st.Gas.cp.kJkgK, st.Liquido.w, st.Gas.w)
            -187.625 1.7203e-10 733.13 1.07e-08 -196.64 366.26 -1.396 5.186 1.355 0.6907 1.916 0.8792 2136.4 143.3
            >>> st=C3(T=-110+273.15, x=0.5)
            >>> print "%0.6g %0.5g %0.2f %0.5f %0.5g %0.5g %0.4g %0.4g %0.4g %0.4g %0.4g %0.4g %0.1f %0.1f" % (\
                st.T.C, st.P.MPa, st.Liquido.rho, st.Gas.rho, st.Liquido.h.kJkg, st.Gas.h.kJkg, \
                st.Liquido.s.kJkgK, st.Gas.s.kJkgK, st.Liquido.cv.kJkgK, st.Gas.cv.kJkgK, \
                st.Liquido.cp.kJkgK, st.Gas.cp.kJkgK, st.Liquido.w, st.Gas.w)
            -110 0.0011644 654.05 0.03790 -43.988 445.38 -0.1298 2.87 1.343 0.9614 2.032 1.151 1611.8 191.7
            >>> st=C3(T=-50+273.15, x=0.5)
            >>> print "%0.6g %0.5g %0.1f %0.4g %0.5g %0.5g %0.4g %0.4g %0.4g %0.4g %0.4g %0.4g %0.1f %0.1f" % (\
                st.T.C, st.P.MPa, st.Liquido.rho, st.Gas.rho, st.Liquido.h.kJkg, st.Gas.h.kJkg, \
                st.Liquido.s.kJkgK, st.Gas.s.kJkgK, st.Liquido.cv.kJkgK, st.Gas.cv.kJkgK, \
                st.Liquido.cp.kJkgK, st.Gas.cp.kJkgK, st.Liquido.w, st.Gas.w)
            -50 0.070569 589.9 1.727 82.753 516.48 0.5298 2.473 1.428 1.182 2.212 1.397 1212.5 216.5
            >>> st=C3(T=273.15, x=0.5)
            >>> print "%0.6g %0.5g %0.2f %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g %0.4g %0.4g %0.4g %0.1f %0.1f" % (\
                st.T.C, st.P.MPa, st.Liquido.rho, st.Gas.rho, st.Liquido.h.kJkg, st.Gas.h.kJkg, \
                st.Liquido.s.kJkgK, st.Gas.s.kJkgK, st.Liquido.cv.kJkgK, st.Gas.cv.kJkgK, \
                st.Liquido.cp.kJkgK, st.Gas.cp.kJkgK, st.Liquido.w, st.Gas.w)
            0 0.47446 528.59 10.351 200 574.87 1 2.372 1.572 1.427 2.493 1.739 885.5 221.3
            >>> st=C3(T=20+273.15, x=0.5)
            >>> print "%0.6g %0.5g %0.2f %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g %0.4g %0.4g %0.4g %0.1f %0.1f" % (\
                st.T.C, st.P.MPa, st.Liquido.rho, st.Gas.rho, st.Liquido.h.kJkg, st.Gas.h.kJkg, \
                st.Liquido.s.kJkgK, st.Gas.s.kJkgK, st.Liquido.cv.kJkgK, st.Gas.cv.kJkgK, \
                st.Liquido.cp.kJkgK, st.Gas.cp.kJkgK, st.Liquido.w, st.Gas.w)
            20 0.83646 500.06 18.082 251.64 595.95 1.18 2.354 1.647 1.544 2.666 1.949 752.9 217.2
            >>> st=C3(T=40+273.15, x=0.5)
            >>> print "%0.6g %0.5g %0.2f %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g %0.4g %0.4g %0.4g %0.1f %0.1f" % (\
                st.T.C, st.P.MPa, st.Liquido.rho, st.Gas.rho, st.Liquido.h.kJkg, st.Gas.h.kJkg, \
                st.Liquido.s.kJkgK, st.Gas.s.kJkgK, st.Liquido.cv.kJkgK, st.Gas.cv.kJkgK, \
                st.Liquido.cp.kJkgK, st.Gas.cp.kJkgK, st.Liquido.w, st.Gas.w)
            40 1.3694 467.46 30.165 307.15 614.21 1.359 2.34 1.732 1.678 2.913 2.263 617.0 208.6
            >>> st=C3(T=60+273.15, x=0.5)
            >>> print "%0.6g %0.5g %0.2f %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g %0.4g %0.4g %0.4g %0.1f %0.1f" % (\
                st.T.C, st.P.MPa, st.Liquido.rho, st.Gas.rho, st.Liquido.h.kJkg, st.Gas.h.kJkg, \
                st.Liquido.s.kJkgK, st.Gas.s.kJkgK, st.Liquido.cv.kJkgK, st.Gas.cv.kJkgK, \
                st.Liquido.cp.kJkgK, st.Gas.cp.kJkgK, st.Liquido.w, st.Gas.w)
            60 2.1168 427.97 49.493 368.14 627.36 1.543 2.321 1.832 1.836 3.337 2.841 474.2 194.1
            >>> st=C3(T=80+273.15, x=0.5)
            >>> print "%0.6g %0.5g %0.2f %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g %0.4g %0.4g %0.4g %0.1f %0.1f" % (\
                st.T.C, st.P.MPa, st.Liquido.rho, st.Gas.rho, st.Liquido.h.kJkg, st.Gas.h.kJkg, \
                st.Liquido.s.kJkgK, st.Gas.s.kJkgK, st.Liquido.cv.kJkgK, st.Gas.cv.kJkgK, \
                st.Liquido.cp.kJkgK, st.Gas.cp.kJkgK, st.Liquido.w, st.Gas.w)
            80 3.1319 373.29 84.406 438.93 628.73 1.742 2.279 1.969 2.057 4.545 4.707 314.9 171.6
            >>> st=C3(T=85+273.15, x=0.5)
            >>> print "%0.6g %0.5g %0.2f %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g %0.4g %0.4g %0.4g %0.1f %0.1f" % (\
                st.T.C, st.P.MPa, st.Liquido.rho, st.Gas.rho, st.Liquido.h.kJkg, st.Gas.h.kJkg, \
                st.Liquido.s.kJkgK, st.Gas.s.kJkgK, st.Liquido.cv.kJkgK, st.Gas.cv.kJkgK, \
                st.Liquido.cp.kJkgK, st.Gas.cp.kJkgK, st.Liquido.w, st.Gas.w)
            85 3.4361 353.96 98.818 459.81 624.75 1.798 2.259 2.023 2.144 5.433 6.182 269.1 164.1
            >>> st=C3(T=90+273.15, x=0.5)
            >>> print "%0.6g %0.5g %0.2f %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g %0.4g %0.4g %0.4g %0.1f %0.1f" % (\
                st.T.C, st.P.MPa, st.Liquido.rho, st.Gas.rho, st.Liquido.h.kJkg, st.Gas.h.kJkg, \
                st.Liquido.s.kJkgK, st.Gas.s.kJkgK, st.Liquido.cv.kJkgK, st.Gas.cv.kJkgK, \
                st.Liquido.cp.kJkgK, st.Gas.cp.kJkgK, st.Liquido.w, st.Gas.w)
            90 3.7641 328.83 119 483.71 616.47 1.862 2.227 2.107 2.26 7.623 9.888 218.3 155.5
            >>> st=C3(T=95+273.15, x=0.5)
            >>> print "%0.6g %0.5g %0.2f %0.5g %0.5g %0.5g %0.4g %0.4g %0.4g %0.4g %0.4g %0.4g %0.1f %0.1f" % (\
                st.T.C, st.P.MPa, st.Liquido.rho, st.Gas.rho, st.Liquido.h.kJkg, st.Gas.h.kJkg, \
                st.Liquido.s.kJkgK, st.Gas.s.kJkgK, st.Liquido.cv.kJkgK, st.Gas.cv.kJkgK, \
                st.Liquido.cp.kJkgK, st.Gas.cp.kJkgK, st.Liquido.w, st.Gas.w)
            95 4.1195 286.51 156.31 516.33 595.81 1.948 2.164 2.302 2.467 23.59 36.07 158.1 144.1
            """,
        "R":
        8.314472,
        "cp":
        Fi1,
        "ref": {
            "Tref": 273.15,
            "Pref": 1,
            "ho": 26148.48,
            "so": 157.9105
        },
        "Tmin":
        Tt,
        "Tmax":
        650.0,
        "Pmax":
        1000000.0,
        "rhomax":
        20.6,
        "Pmin":
        0.00000017,
        "rhomin":
        16.63,
        "nr1":
        [0.42910051e-1, 0.17313671e1, -0.24516524e1, 0.34157466, -0.46047898],
        "d1": [4, 1, 1, 2, 2],
        "t1": [1, 0.33, 0.8, 0.43, 0.9],
        "nr2": [
            -0.66847295, 0.20889705, 0.19421381, -0.22917851, -0.60405866,
            0.66680654e-1
        ],
        "d2": [1, 3, 6, 6, 2, 3],
        "t2": [2.46, 2.09, 0.88, 1.09, 3.25, 4.62],
        "c2": [1, 1, 1, 1, 2, 2],
        "gamma2": [1] * 6,
        "nr3": [
            0.17534618e-1, 0.33874242, 0.22228777, -0.23219062, -0.92206940e-1,
            -0.47575718, -0.17486824e-1
        ],
        "d3": [1, 1, 1, 2, 2, 4, 1],
        "t3": [0.76, 2.50, 2.75, 3.05, 2.55, 8.40, 6.75],
        "alfa3": [0.963, 1.977, 1.917, 2.307, 2.546, 3.28, 14.6],
        "beta3": [2.33, 3.47, 3.15, 3.19, 0.92, 18.8, 547.8],
        "gamma3": [0.684, 0.829, 1.419, 0.817, 1.500, 1.426, 1.093],
        "epsilon3": [1.283, 0.6936, 0.788, 0.473, 0.8577, 0.271, 0.948]
    }

    helmholtz2 = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for propane of Bücker and Wagner (2006)",
        "__doi__": {
            "autor": "Bücker, D., Wagner, W.",
            "title":
            "Reference Equations of State for the Thermodynamic Properties of Fluid Phase n-Butane and Isobutane",
            "ref": "J. Phys. Chem. Ref. Data 35, 929 (2006)",
            "doi": "10.1063/1.1901687"
        },
        "R":
        8.314472,
        "cp":
        Fi3,
        "ref":
        "OTO",
        "Tmin":
        Tt,
        "Tmax":
        500.0,
        "Pmax":
        100000.0,
        "rhomax":
        17.41,
        "Pmin":
        0.00000017,
        "rhomin":
        16.62,
        "nr1": [
            .21933784906951e1, -.38432884604893e1, .56820219711755,
            .11235233289697, -.13246623110619e-1, .14587076590314e-1,
            .19654925217128e-1
        ],
        "d1": [1, 1, 1, 2, 3, 4, 4],
        "t1": [0.50, 1.00, 1.50, 0.00, 0.50, 0.50, 0.75],
        "nr2": [
            .73811022854042, -.85976999811290, .14331675665712,
            -.23280677426427e-1, -.98713669399783e-4, .45708225999895e-2,
            -.27766802597861e-1, -.10523131087952, .97082793466314e-1,
            .20710537703751e-1, -.54720320371501e-1, .64918009057295e-3,
            .74471355056336e-2, -.27504616979066e-3, -.77693374632348e-2,
            -.17367624932157e-2
        ],
        "d2": [1, 1, 2, 7, 8, 8, 1, 2, 3, 3, 4, 5, 5, 10, 2, 6],
        "t2": [
            2.00, 2.50, 2.50, 1.50, 1.00, 1.50, 4.00, 7.00, 3.00, 7.00, 3.00,
            1.00, 6.00, 0.00, 6.00, 13.00
        ],
        "c2": [1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 3, 3],
        "gamma2": [1] * 16,
        "nr3": [-.38248057095416e-1, -.68797254435490e-2],
        "d3": [1, 2],
        "t3": [2., 0.],
        "alfa3": [10, 10],
        "beta3": [150, 200],
        "gamma3": [1.16, 1.13],
        "epsilon3": [0.85, 1.]
    }

    MBWR = {
        "__type__":
        "MBWR",
        "__name__":
        "MBWR equation of state for propane of Younglove and Ely (1987)",
        "__doi__": {
            "autor": "Younglove, B.A. and Ely, J.F.",
            "title":
            "Thermophysical Properties of Fluids. II. Methane, Ethane, Propane, Isobutane, and Normal Butane",
            "ref": "J. Phys. Chem. Ref. Data 16, 577 (1987)",
            "doi": "10.1063/1.555785"
        },
        "R":
        8.31434,
        "cp":
        CP5,
        "ref": {
            "Tref": 298.15,
            "Pref": 101.325,
            "ho": 14740.2,
            "so": 270.203
        },
        "Tmin":
        Tt,
        "Tmax":
        600.0,
        "Pmax":
        100000.0,
        "rhomax":
        17.36,
        "Pmin":
        1.685e-7,
        "rhomin":
        16.617,
        "b": [
            None, -0.2804337729e-2, 0.1180666107e1, -0.3756325860e2,
            0.5624374521e4, -0.9354759605e6, -0.4557405505e-3, 0.1530044332e1,
            -0.1078107476e4, 0.2218072099e6, 0.6629473971e-4, -0.6199354447e-1,
            0.6754207966e2, 0.6472837570e-2, -0.6804325262, -0.9726162355e2,
            0.5097956459e-1, -0.1004655900e-2, 0.4363693352, -0.1249351947e-1,
            0.2644755879e6, -0.7944237270e8, -0.7299920845e4, 0.5381095003e9,
            0.3450217377e2, 0.9936666689e4, -0.2166699036e1, -0.1612103424e6,
            -0.3633126990e-2, 0.1108612343e2, -0.1330932838e-3,
            -0.3157701101e-1, 0.1423083811e1
        ]
    }

    GERG = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for propane of Kunz and Wagner (2004).",
        "__doi__": {
            "autor": "Kunz, O., Wagner, W.",
            "title":
            "The GERG-2008 Wide-Range Equation of State for Natural Gases and Other Mixtures: An Expansion of GERG-2004",
            "ref": "J. Chem. Eng. Data, 2012, 57 (11), pp 3032–3091",
            "doi": "10.1021/je300655b"
        },
        "R":
        8.314472,
        "cp":
        Fi2,
        "ref":
        "OTO",
        "Tmin":
        85.48,
        "Tmax":
        500.0,
        "Pmax":
        100000.0,
        "rhomax":
        17.41,
        #        "Pmin": 73.476, "rhomin": 29.249,
        "nr1": [
            0.10403973107358e1, -0.28318404081403e1, 0.84393809606294,
            -0.76559591850023e-1, 0.94697373057280e-1, 0.24796475497006e-3
        ],
        "d1": [1, 1, 1, 2, 3, 7],
        "t1": [0.25, 1.125, 1.5, 1.375, 0.25, 0.875],
        "nr2": [
            0.27743760422870, -0.43846000648377e-1, -0.26991064784350,
            -0.69313413089860e-1, -0.29632145981653e-1, 0.14040126751380e-1
        ],
        "d2": [2, 5, 1, 4, 3, 4],
        "t2": [0.625, 1.75, 3.625, 3.625, 14.5, 12.],
        "c2": [1, 1, 2, 2, 3, 3],
        "gamma2": [1] * 6
    }

    helmholtz4 = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for propane of Miyamoto and Watanabe (2001)",
        "__doi__": {
            "autor": "Miyamoto, H. and Watanabe, K.",
            "title": "A Thermodynamic Property Model for Fluid-Phase Propane",
            "ref": "Int. J. Thermophys., 21(5):1045-1072, 2000.",
            "doi": "10.1023/A:1026441903474"
        },
        "R":
        8.314472,
        "cp":
        Fi4,
        "ref":
        "IIR",
        "Tmin":
        Tt,
        "Tmax":
        623.0,
        "Pmax":
        103000.0,
        "rhomax":
        17.41,
        "Pmin":
        0.00000017,
        "rhomin":
        16.64,
        "nr1": [
            2.698378e-1, -1.339252, -2.273858e-2, 2.414973e-1, -3.321461e-2,
            2.203323e-3, 5.935588e-5, -1.137457e-6
        ],
        "d1": [1, 1, 2, 2, 3, 5, 8, 8],
        "t1": [-0.25, 1.5, -0.75, 0, 1.25, 1.5, 0.5, 2.5],
        "nr2": [
            -2.379299, 2.337373, 1.242344e-3, -7.352787e-3, 1.965751e-3,
            -1.402666e-1, -2.093360e-2, -2.475221e-4, -1.482723e-2,
            -1.303038e-2, 3.634670e-5
        ],
        "d2": [3, 3, 8, 5, 6, 1, 5, 7, 2, 3, 15],
        "t2": [1.5, 1.75, -0.25, 3, 3, 4, 2, -1, 2, 19, 5],
        "c2": [1, 1, 1, 1, 1, 2, 2, 2, 3, 3, 3],
        "gamma2": [1] * 11
    }

    helmholtz5 = {
        "__type__":
        "Helmholtz",
        "__name__":
        "short Helmholtz equation of state for propane of Span and Wagner (2003)",
        "__doi__": {
            "autor": "Span, R., Wagner, W.",
            "title":
            "Equations of state for technical applications. II. Results for nonpolar fluids.",
            "ref": "Int. J. Thermophys. 24 (2003), 41 – 109.",
            "doi": "10.1023/A:1022310214958"
        },
        "__test__":
        """
            >>> st=C3(T=700, rho=200, eq=5)
            >>> print "%0.4f %0.3f %0.4f" % (st.cp0.kJkgK, st.P.MPa, st.cp.kJkgK)
            3.2350 21.175 3.5658
            >>> st2=C3(T=750, rho=100, eq=5)
            >>> print "%0.2f %0.5f" % (st2.h.kJkg-st.h.kJkg, st2.s.kJkgK-st.s.kJkgK)
            212.66 0.41879
            """,  # Table III, Pag 46
        "R":
        8.31451,
        "cp":
        Fi1,
        "ref": {
            "Tref": 273.15,
            "Pref": 1,
            "ho": 26148.48,
            "so": 157.9105
        },
        "Tmin":
        Tt,
        "Tmax":
        600.0,
        "Pmax":
        100000.0,
        "rhomax":
        17.36,
        "Pmin":
        0.00000015304,
        "rhomin":
        16.706,
        "nr1": [
            0.10403973e1, -0.28318404e1, 0.8439381, -0.76559592e-1,
            0.94697373e-1, 0.24796475e-3
        ],
        "d1": [1, 1, 1, 2, 3, 7],
        "t1": [0.25, 1.125, 1.5, 1.375, 0.25, 0.875],
        "nr2": [
            0.2774376, -0.43846001e-1, -0.26991065, -0.69313413e-1,
            -0.29632146e-1, 0.14040127e-1
        ],
        "d2": [2, 5, 1, 4, 3, 4],
        "t2": [0.625, 1.75, 3.625, 3.625, 14.5, 12.],
        "c2": [1, 1, 2, 2, 3, 3],
        "gamma2": [1] * 6
    }

    helmholtz6 = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for propane of Sun and Ely (2004)",
        "__doi__": {
            "autor": "Sun, L. and Ely, J.F.",
            "title":
            "Universal equation of state for engineering application: Algorithm and  application to non-polar and polar fluids",
            "ref": "Fluid Phase Equilib., 222-223:107-118, 2004.",
            "doi": "10.1016/j.fluid.2004.06.028"
        },
        "R":
        8.314472,
        "cp":
        Fi1,
        "ref": {
            "Tref": 273.15,
            "Pref": 1,
            "ho": 26148.48,
            "so": 157.9105
        },
        "Tmin":
        Tt,
        "Tmax":
        620.0,
        "Pmax":
        800000.0,
        "rhomax":
        40.,
        "Pmin":
        0.1,
        "rhomin":
        40.,
        "nr1": [
            9.70439249e-1, 9.73671323e-1, -2.96661981, 7.84340496e-2,
            2.78440866e-4, -6.77622221e-2
        ],
        "d1": [1, 1, 1, 3, 7, 2],
        "t1": [1.5, 0.25, 1.25, 0.25, 0.875, 1.375],
        "nr2": [
            -8.56371936e-2, 1.77467443e-1, 3.91636018e-1, -8.03312946e-3,
            -2.60385851e-1, -1.91104746e-2, -6.31331470e-2, -2.27769095e-2
        ],
        "d2": [1, 1, 2, 5, 1, 1, 4, 2],
        "t2": [0, 2.375, 2., 2.125, 3.5, 6.5, 4.75, 12.5],
        "c2": [1, 1, 1, 1, 2, 2, 2, 3],
        "gamma2": [1] * 8
    }

    eq = helmholtz1, MBWR, helmholtz2, GERG, helmholtz4, helmholtz5, helmholtz6

    _surface = {"sigma": [0.05334, -0.01748], "exp": [1.235, 4.404]}
    _dielectric = {
        "eq": 4,
        "Tref": 273.16,
        "rhoref": 1000.,
        "a0": [0.1573071],
        "expt0": [-1.],
        "expd0": [1.],
        "a1": [15.85, 0.036],
        "expt1": [0, 1],
        "expd1": [1, 1],
        "a2": [172.75, 505.67, -388.21, -2078.8],
        "expt2": [0, 1, 0, 1],
        "expd2": [2, 2, 2.35, 2.35]
    }
    _melting = {
        "eq": 1,
        "Tref": Tt,
        "Pref": 0.00000017,
        "Tmin": Tt,
        "Tmax": 2000.0,
        "a1": [-4230000000000, 4230000000001],
        "exp1": [0, 1.283],
        "a2": [],
        "exp2": [],
        "a3": [],
        "exp3": []
    }
    _vapor_Pressure = {
        "eq": 5,
        "ao": [-6.7722, 1.6938, -1.3341, -3.1876, 0.94937],
        "exp": [1, 1.5, 2.2, 4.8, 6.2]
    }
    _liquid_Density = {
        "eq": 1,
        "ao": [1.82205, 0.65802, 0.21109, 0.083973],
        "exp": [0.345, 0.74, 2.6, 7.2]
    }
    _vapor_Density = {
        "eq": 3,
        "ao": [-2.4887, -5.1069, -12.174, -30.495, -52.192, -134.89],
        "exp": [0.3785, 1.07, 2.7, 5.5, 10., 20.]
    }

    visco0 = {
        "eq":
        1,
        "omega":
        1,
        "collision": [0.25104574, -0.47271238, 0, 0.060836515],
        "__name__":
        "Vogel (1998)",
        "__doi__": {
            "autor":
            "Vogel, E., Kuechenmeister, C., Bich, E., and Laesecke, A.",
            "title": "Reference Correlation of the Viscosity of Propane",
            "ref": "J. Phys. Chem. Ref. Data 27, 947 (1998)",
            "doi": "10.1063/1.556025"
        },
        "__test__":

        # Table 4, pag 961
        """
                  >>> st=C3(T=90, P=1e4, eq=1)
                  >>> print "%0.4f %0.3f %0.4f" % (st.cp0.kJkgK, st.P.MPa, st.cp.kJkgK)
                  3.2350 21.175 3.5658
                  """,
        "ek":
        263.88,
        "sigma":
        0.49748,
        "Tref":
        1,
        "rhoref":
        1. * M,
        "etaref":
        1.,
        "n_chapman":
        0.141824 / M**0.5,
        "n_virial": [
            -19.572881, 219.73999, -1015.3226, 2471.01251, -3375.1717,
            2491.6597, -787.26086, 14.085455, -0.34664158
        ],
        "t_virial": [0.0, -0.25, -0.5, -0.75, -1, -1.25, -1.5, -2.5, -5.5],
        "Tref_virial":
        263.88,
        "etaref_virial":
        0.0741445,
        "Tref_res":
        369.82,
        "rhoref_res":
        5. * M,
        "etaref_res":
        1,
        "n_packed": [0.250053938863e1, 0.215175430074e1],
        "t_packed": [0, 0.5],
        "n_poly": [
            0.359873030195e2,
            -0.180512188564e3,
            0.877124888223e2,
            -0.105773052525e3,
            0.205319740877e3,
            -0.129210932610e3,
            0.589491587759e2,
            -0.129740033100e3,
            0.766280419971e2,
            -0.959407868475e1,
            0.210726986598e2,
            -0.143971968187e2,
            -0.161688405374e4,
        ],
        "t_poly": [0, -1, -2, 0, -1, -2, 0, -1, -2, 0, -1, -2, 0],
        "d_poly": [2, 2, 2, 3, 3, 3, 4, 4, 4, 5, 5, 5, 1],
        "g_poly": [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1],
        "c_poly": [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1],
        "n_num": [0.161688405374e4],
        "t_num": [0],
        "d_num": [1],
        "g_num": [0],
        "c_num": [0],
        "n_den": [1, -1],
        "t_den": [0, 0],
        "d_den": [0, 1],
        "g_den": [1, 0],
        "c_den": [1, 0]
    }

    visco1 = {
        "eq":
        2,
        "omega":
        2,
        "__name__":
        "Younglove (1987)",
        "__doi__": {
            "autor": "Younglove, B.A. and Ely, J.F.",
            "title":
            "Thermophysical Properties of Fluids. II. Methane, Ethane, Propane, Isobutane, and Normal Butane ",
            "ref": "J. Phys. Chem. Ref. Data 16, 577 (1987)",
            "doi": "10.1063/1.555785"
        },
        "ek":
        358.9,
        "sigma":
        0.47,
        "n_chapman":
        0.177273976 / M**0.5,
        "F": [0, 0, 1.12, 359.],
        "E": [
            -14.113294896, 968.22940153, 13.686545032, -12511.628378,
            0.0168910864, 43.527109444, 7659.45434720
        ],
        "rhoc":
        5.0
    }

    visco2 = {
        "eq": 4,
        "omega": 1,
        "__name__": u"Quiñones-Cisneros (2006)",
        "__doi__": {
            "autor": "S.E.Quiñones-Cisneros and U.K. Deiters",
            "title":
            "Generalization of the Friction Theory for Viscosity Modeling",
            "ref": "J. Phys. Chem. B, 2006, 110 (25), pp 12820–12834",
            "doi": "10.1021/jp0618577"
        },
        "Tref": 369.825,
        "muref": 1.0,
        "ek": 358.9,
        "sigma": 0.47,
        "n_chapman": 0,
        "n_ideal": [12.3057, -42.5793, 40.3486],
        "t_ideal": [0, 0.25, 0.5],
        "a":
        [-9.34267734206329e-6, -4.93309341792654e-5, 1.46749885301233e-13],
        "b": [9.60710434008784e-5, -8.18030722274335e-5, 3.00126073333685e-12],
        "c": [7.68800436177747e-5, -4.18871321795657e-5, -7.2008794976648e-15],
        "A": [-8.49308621313605e-9, -4.91414639525551e-10, 0.0],
        "B": [2.08794813407621e-8, 9.21785453914614e-10, 0.0],
        "C": [-4.05944109221870e-7, 1.31730904193479e-7, 0.0],
        "D": [0.0, 0.0, 0.0]
    }

    _viscosity = visco0, visco1, visco2

    thermo0 = {
        "eq":
        1,
        "__name__":
        "Marsh (2002)",
        "__doi__": {
            "autor": "Marsh, K., Perkins, R., and Ramires, M.L.V.",
            "title":
            "Measurement and Correlation of the Thermal Conductivity of Propane from 86 to 600 K at Pressures to 70 MPa",
            "ref": "J. Chem. Eng. Data, 2002, 47 (4), pp 932–940",
            "doi": "10.1021/je010001m"
        },
        "Tref":
        369.85,
        "kref":
        1.,
        "no": [-1.24778e-3, 8.16371e-3, 1.99374e-2],
        "co": [0, 1, 2],
        "Trefb":
        369.85,
        "rhorefb":
        5.,
        "krefb":
        1.,
        "nb": [
            -3.69500e-2, 4.82798e-2, 1.48658e-1, -1.35636e-1, -1.19986e-1,
            1.17588e-1, 4.12431e-2, -4.36911e-2, -4.86905e-3, 6.16079e-3
        ],
        "tb": [0, 1] * 5,
        "db": [1, 1, 2, 2, 3, 3, 4, 4, 5, 5],
        "cb": [0] * 10,
        "critical":
        3,
        "gnu":
        0.63,
        "gamma":
        1.239,
        "R0":
        1.03,
        "Xio":
        0.194e-9,
        "gam0":
        0.0496,
        "qd":
        0.716635e-9,
        "Tcref":
        554.73
    }

    thermo1 = {
        "eq":
        2,
        "omega":
        2,
        "__name__":
        "Younglove (1987)",
        "__doi__": {
            "autor": "Younglove, B.A. and Ely, J.F.",
            "title":
            "Thermophysical Properties of Fluids. II. Methane, Ethane, Propane, Isobutane, and Normal Butane ",
            "ref": "J. Phys. Chem. Ref. Data 16, 577 (1987)",
            "doi": "10.1063/1.555785"
        },
        "visco":
        visco1,
        "n_chapman":
        1.77273976e-1,
        "G": [0.1422605e1, -0.179749],
        "E": [
            0.3113890422e-2, -0.225755973, 0.5674370999e2, -0.7840963643e-4,
            0.2291785465e-1, -0.2527939890e1, -0.6265334654e-1, 0.2518064809e1
        ],
        "critical":
        2,
        "X": [3.98, 5.45, 0.468067, 1.08],
        "Z":
        8.117e-10
    }

    _thermal = thermo0, thermo1
Example #28
0
class RE347mcc(MEoS):
    """Multiparameter equation of state for RE347mcc"""
    name = "methyl-heptafluoropropyl-ether"
    CASNumber = "375-03-1"
    formula = "CF3CF2CF2OCH3"
    synonym = "HFE-7000"
    rhoc = unidades.Density(524.143687088)
    Tc = unidades.Temperature(437.7)
    Pc = unidades.Pressure(2476.2, "kPa")
    M = 200.0548424  # g/mol
    Tt = unidades.Temperature(250)
    Tb = unidades.Temperature(307.349)
    f_acent = 0.403
    momentoDipolar = unidades.DipoleMoment(3.13, "Debye")
    id = 671
    # id = 1817

    CP1 = {
        "ao": 13.09,
        "an": [],
        "pow": [],
        "ao_exp": [],
        "exp": [],
        "ao_hyp": [13.78, 14.21, 0, 0],
        "hyp": [2045, 850, 0, 0]
    }

    helmholtz1 = {
        "__type__":
        "Helmholtz",
        "__name__":
        "Helmholtz equation of state for RE347mcc of Zhou et al. (2012)",
        "__doi__": {
            "autor": "Zhou, Y. and Lemmon, E.W.",
            "title": "preliminary equation, 2012.",
            "ref": "",
            "doi": ""
        },
        "R":
        8.314472,
        "cp":
        CP1,
        "ref":
        "NBP",
        "Tmin":
        Tt,
        "Tmax":
        500.0,
        "Pmax":
        20000.0,
        "rhomax":
        7.662,
        "Pmin":
        6.825,
        "rhomin":
        7.66,
        "nr1": [
            0.0330627, 2.606165, -4.902937, 2.228012, 1.494115, -2.420459,
            0.160067
        ],
        "d1": [4, 1, 1, 1, 2, 2, 3],
        "t1": [1, 0.34, 0.77, 1.02, 0.79, 1.017, 0.634],
        "nr2": [1.383893, -2.092005, -0.5904708],
        "d2": [2, 1, 2],
        "t2": [1.35, 2.25, 2.5],
        "c2": [1, 2, 2],
        "gamma2": [1] * 6,
        "nr3": [
            -0.701794, 2.765425, 0.6860982, -2.208170, 0.1739594, -0.9028007,
            -0.0213123
        ],
        "d3": [1, 1, 2, 2, 3, 3, 1],
        "t3": [2, 1.66, 1.33, 2.0, 1.87, 1.75, 1.05],
        "alfa3": [0.593, 1.36, 1.73, 1.483, 0.617, 1.596, 9.64],
        "beta3": [0.0872, 1.176, 1.53, 0.78, 0.088, 1.04, 263.0],
        "gamma3": [1.06, 1.22, 0.92, 1.08, 1.21, 0.85, 1.12],
        "epsilon3": [1.12, 0.79, 1.055, 0.5, 0.84, 0.85, 0.91]
    }

    eq = helmholtz1,

    _vapor_Pressure = {
        "eq": 5,
        "ao": [-8.0456, 2.6285, -2.7498, -5.4277, -4.3693],
        "exp": [1.0, 1.5, 2., 4.25, 12.8]
    }
    _liquid_Density = {
        "eq": 1,
        "ao": [1.5144, 2.3745, -2.6363, 2.0830, 0.50537],
        "exp": [0.29, 0.85, 1.5, 2.2, 9.]
    }
    _vapor_Density = {
        "eq": 3,
        "ao": [-2.0640, -6.4226, -18.982, -58.689, -117.64, -253.93],
        "exp": [0.321, 0.96, 2.75, 5.9, 12., 22.]
    }

    visco0 = {
        "eq": 5,
        "omega": 3,
        "__doi__": {
            "autor": "T-H. Chung, Ajlan, M., Lee, L.L. and Starling, K.E",
            "title":
            "Generalized Multiparameter Correlation for Nonpolar and Polar Fluid Transport Properties",
            "ref": "Ind. Eng. Chem. Res., 1988, 27 (4), pp 671–679",
            "doi": "10.1021/ie00076a024"
        },
        "__name__": "Chung (1988)",
        "w": 0.411,
        "mur": 0.0,
        "k": 0.0
    }

    _viscosity = visco0,
Example #29
0
class R236ea(MEoS):
    """Multiparameter equation of state for R236ea"""
    name = "1,1,1,2,3,3-hexafluoropropane"
    CASNumber = "431-63-0"
    formula = "CF3CHFCHF2"
    synonym = "R236ea"
    _refPropName = "R236EA"
    _coolPropName = "R236EA"
    rhoc = unidades.Density(565.)
    Tc = unidades.Temperature(412.44)
    Pc = unidades.Pressure(3420.0, "kPa")
    M = 152.0384  # g/mol
    Tt = unidades.Temperature(170.0)
    Tb = unidades.Temperature(279.322)
    f_acent = 0.369
    momentoDipolar = unidades.DipoleMoment(1.129, "Debye")
    # id = 1873

    Fi1 = {"ao_log": [1, 2.762],
           "pow": [0, 1],
           "ao_pow": [-14.121424135, 10.2355589225],
           "ao_exp": [0.7762, 10.41, 12.18, 3.332],
           "titao": [144/Tc, 385/Tc, 1536/Tc, 7121/Tc]}

    CP1 = {"ao": 5.30694,
           "an": [0.03973, -1.859e-5], "pow": [1, 2],
           "ao_exp": [], "exp": []}

    rui = {
        "__type__": "Helmholtz",
        "__name__": "Helmholtz equation of state for R236ea of Rui (2013)",
        "__doi__": {"autor": "Rui, X., Pan, J., Wang, Y.",
                    "title": "An Equation of State for Thermodynamic "
                             "Properties of 1,1,1,2,3,3-Hexafluoropropane "
                             "(R236ea)",
                    "ref": "Fluid Phase Equilibria 341 (2013) 78-85",
                    "doi": "10.1016/j.fluid.2012.12.026"},

        "R": 8.314472,
        "cp": Fi1,
        "ref": {"Tref": 273.15, "Pref": 1.,
                "ho": 56317.4970978844, "so": 282.8465334259},

        "Tmin": Tt, "Tmax": 420.0, "Pmax": 6000.0, "rhomax": 10.5,

        "nr1": [0.051074, 2.5584, -2.9180, -0.71485, 0.15534],
        "d1": [4, 1, 1, 2, 3],
        "t1": [1., 0.264, 0.5638, 1.306, 0.2062],

        "nr2": [-1.5894, -0.784, 0.85767, -0.67235, -0.017953],
        "d2": [1, 3, 2, 2, 7],
        "t2": [2.207, 2.283, 1.373, 2.33, 0.6376],
        "c2": [2, 2, 1, 2, 1],
        "gamma2": [1]*5,

        "nr3": [1.3165, -0.42023, -0.28053, -1.4134, -0.0000062617],
        "d3": [1, 1, 3, 3, 2],
        "t3": [1.08, 1.67, 3.502, 4.357, 0.6945],
        "alfa3": [1.019, 1.341, 1.034, 5.264, 24.44],
        "beta3": [1.3, 2.479, 1.068, 79.85, 49.06],
        "gamma3": [1.13, 0.6691, 0.465, 1.28, 0.8781],
        "epsilon3": [0.7119, 0.9102, 0.678, 0.7091, 1.727]}

    eq = rui,

    _surface = {"sigma": [0.306974, -0.247277], "exp": [1.12614, 1.09899]}
    _vapor_Pressure = {
        "eq": 3,
        "n": [-7.9095, 2.3374, -2.6453, -5.7058],
        "t": [1, 1.5, 2.15, 4.75]}
    _liquid_Density = {
        "eq": 1,
        "n": [1.6074, 1.5021, -1.106, 0.91146],
        "t": [0.31, 0.75, 1.3, 1.9]}
    _vapor_Density = {
        "eq": 2,
        "n": [-2.7426, -6.2268, -15.109, -49.524, -114.11],
        "t": [0.376, 1.1, 2.7, 5.5, 11]}

    trnECS = {"__name__": "Huber (2003)",

              "__doi__": {
                  "autor": "Huber, M.L., Laesecke, A., Perkins, R.A.",
                  "title": "Model for the Viscosity and Thermal Conductivity "
                           "of Refrigerants, Including a New Correlation for "
                           "the Viscosity of R134a",
                  "ref": "Ind. Eng. Chem. Res., 42(13) (2003) 3163-3178",
                  "doi": "10.1021/ie0300880"},

              "eq": "ecs",

              "ref": R134a,
              "visco": "visco0",
              "thermo": "thermo0",

              "ek": 318.33, "sigma": 0.5604, "omega": 5,

              "psi": [1.12216, -2.73101e-2], "psi_d": [0, 1],
              "fint": [1.70267e-3, -4.91063e-7], "fint_t": [0, 1],
              "chi": [0.9617, 3.37897e-2], "chi_d": [0, 1],

              "critical": 3,
              "gnu": 0.63, "gamma": 1.239, "R0": 1.03,
              "Xio": 0.194e-9, "gam0": 0.0496, "qd": 5e-10, "Tcref": 1.5*Tc}

    _viscosity = trnECS,
    _thermal = trnECS,
Example #30
0
class R13(MEoS):
    """Multiparameter equation of state for R13"""
    name = "chlorotrifluoromethane"
    CASNumber = "75-72-9"
    formula = "CClF3"
    synonym = "R13"
    _refPropName = "R13"
    _coolPropName = "R13"
    rhoc = unidades.Density(582.88)
    Tc = unidades.Temperature(302.0)
    Pc = unidades.Pressure(3879.0, "kPa")
    M = 104.459  # g/mol
    Tt = unidades.Temperature(92.0)
    Tb = unidades.Temperature(191.67)
    f_acent = 0.1723
    momentoDipolar = unidades.DipoleMoment(0.51, "Debye")
    id = 215

    # Cp⁰ coefficient for Tr term, so divide by Tc
    CP1 = {"ao": 1.86012334,
           "an": [8.07314520/Tc, -1.87713639/Tc**2, 3.17242858e-2/Tc**3],
           "pow": [1, 2, 3],
           "ao_exp": [], "exp": [],
           "ao_hyp": [], "hyp": []}

    CP2 = {"ao": 2.4766458,
           "an": [0.018074269, 2.1945535e-5, -8.5810657e-8, 6.3199171e-11],
           "pow": [1, 2, 3, 4],
           "ao_exp": [], "exp": [],
           "ao_hyp": [], "hyp": []}

    magee = {
        "__type__": "MBWR",
        "__name__": "MBWR equation of state for R-13 of Magee et al. (2000)",
        "__doi__": {"autor": "Magee, J.W., Outcalt, S.L., Ely, J.F.",
                    "title": "Molar Heat Capacity Cv, Vapor Pressure, and "
                             "(p, ρ, T) Measurements from 92 to 350 K at "
                             "Pressures to 35 MPa and a New Equation of State "
                             "for Chlorotrifluoromethane (R13)",
                    "ref": "Int. J. Thermophys., 21(5):1097-1121, 2000.",
                    "doi": "10.1023/A:1026446004383"},

        "R": 8.314471,
        "Tc": 302, "Pc": 3879., "rhoc": 5.58, "M": 104.459,
        "cp": CP1,
        "ref": "IIR",

        "Tmin": Tt, "Tmax": 403.0, "Pmax": 35000.0, "rhomax": 17.85,
        "Pmin": 0.00033, "rhomin": 17.84,

        "b": [None, 0.427710490378e-2, 0.106603397093e1, -0.383065097813e2,
              0.661580211522e4, -0.800160780370e6, -0.406405755462e-2,
              0.561380767634e1, -0.247694806929e4, -0.639834580892e5,
              0.198818486764e-3, -0.206916891385, 0.749317872337e2,
              -0.431471653965e-2, 0.181741326553e1, -0.206066849491e2,
              -0.136681208829, 0.260496240940e-2, 0.287244312242,
              -0.105459756169e-1, 0.582404815872e6, -0.455721947029e8,
              0.114174177352e5, 0.265590236008e6, 0.135249873550e3,
              0.128289104267e4, 0.800900540368, -0.703307137789e4,
              0.235567665577e-2, 0.131830636112e1, -0.115187941781e-4,
              0.564530387616e-2, 0.336242130107]}

    platzer = {
        "__type__": "Helmholtz",
        "__name__": "Bender equation of state for R-13 of Platzer (1990)",
        "__doi__": {"autor": "Platzer, B., Polt, A., Maurer, G.",
                    "title": "Thermophysical Properties of refrigerants",
                    "ref": "Berlin:  Springer-Verlag, 1990.",
                    "doi": ""},
        "R": 8.31451,
        "cp": CP2,
        "ref": "IIR",

        "Tmin": Tt, "Tmax": 450.0, "Pmax": 50000.0, "rhomax": 17.699806,
        "Pmin": 0.0009047, "rhomin": 17.6998,

        "nr1": [-0.628346559920, 0.792797111341, -0.134038992692,
                0.761143010172, -0.194465098795e1, 0.940938700406,
                -0.108107050239e1, 0.117501564976, 0.228305167217,
                -0.403338888789, 0.375585713420, -0.617543677315e-1,
                0.170326226881, 0.536612457231e-1, -0.151603010301,
                0.252033265074e-1],
        "d1": [0, 0, 0, 1, 1, 1, 1, 1, 2, 2, 2, 3, 3, 4, 4, 5],
        "t1": [3, 4, 5, 0, 1, 2, 3, 4, 0, 1, 2, 0, 1, 0, 1, 1],

        "nr2": [0.628346559920, -0.792797111341, 0.134038992692,
                -0.399863840975e-1, 0.436410910529, -0.448724904991],
        "d2": [0, 0, 0, 2, 2, 2],
        "t2": [3, 4, 5, 3, 4, 5],
        "c2": [2]*6,
        "gamma2": [0.98230055]*6}

    eq = magee, platzer

    _surface = {"sigma": [0.05045], "exp": [1.269]}
    _vapor_Pressure = {
        "eq": 3,
        "n": [-0.69311e1, 0.18281e1, -0.21901e1, -0.38177e1, 0.20803e1],
        "t": [1.0, 1.5, 2.5, 6.0, 8.0]}
    _liquid_Density = {
        "eq": 1,
        "n": [0.95469e1, -0.24017e2, 0.33365e2, -0.26837e2, 0.10638e2],
        "t": [0.51, 0.72, 0.94, 1.2, 1.4]}
    _vapor_Density = {
        "eq": 2,
        "n": [-0.31949e1, -0.73425e1, -0.21966e2, -0.51459e2, -0.85359e2],
        "t": [0.414, 1.41, 3.7, 7.7, 15.0]}

    trnECS = {"eq": "ecs",
              "__name__": "Extended Corresponding States model",
              "__doi__": {"autor": "Huber, M.L., Laesecke, A., and Perkins, R.A.",
                          "title": "Model for the Viscosity and Thermal Conductivity of Refrigerants, Including a New Correlation for the Viscosity of R134a",
                          "ref": "Ind. Eng. Chem. Res., 2003, 42 (13), pp 3163–3178",
                          "doi": "10.1021/ie0300880"},

              "ref": C3,
              "ref_eq": "helmholtz1",
              "eq_visco": "visco0",
              "eq_thermo": "thermo0",

              "fint": [1.07447e-3, 6.42373e-7], "fint_t": [0, 1],
              "psi": [0.976177, 1.48047e-2], "psi_t": [0, 0], "psi_d": [0, 1],
              "phi": [1.1394, -3.65562e-2], "phi_t": [0, 0], "phi_d": [0, 1],

              "critical": 3,
              "gnu": 0.63, "gamma": 1.239, "R0": 1.03,
              "Xio": 0.194e-9, "gam0": 0.0496, "qd": 3.49636e-10, "Tcref": 453.0}

    _viscosity = trnECS,
    _thermal = trnECS,