R134A.xls

R134a is also known as Tetrafluoroethane (CF3CH2F) from the family of HFC refrigerant. With the discovery of the damaging effect of CFCs and HCFCs refrigerants to the ozone layer, the HFC family of refrigerant has been widely used as their replacement. It is now being used as a replacement for R-12 CFC refrigerant in the area of centrifugal, rotary screw, scroll and reciprocating compresssors. It is safe for normal handling as it is non-toxic, non-flammable and non-corrosive. Currently it is also being widely used in the air conditioning system in newer automotive vehicles. The manufacturing industry use it in plastic foam blowing. Pharmaceuticals industry use it as a propellant.

Attached are the Excel VBA fluid property .bas file for refrigerant R-134a.  This gives curve fits for thermal and transport properties of R-134a, which is the major refrigerant used in residential and automotive air-conditioning. Use the ALT + F11 key to see the functions.

Function RR134a_Ps(x As Double) As Double
'Saturation Pressure (MPa), 0.03% Error

Function RR134a_Ts(x As Double) As Double
'Saturation temperature (oC)

Function RR134a_Dsl(x As Double) As Double
'Density of saturateded liquid (kg/m3) 0.01% Error

Function RR134a_Dsv(x As Double) As Double
'Density of saturateded vapor (kg/m3) 0.04% Error

Function RR134a_hsl(x As Double) As Double
'Enthalpy of saturateded liquid (kJ/kg) 0.03% Error

Function RR134a_hsv(x As Double) As Double
'Enthalpy of saturateded vapor (kJ/kg) 0.0007% Error

Function RR134a_Cpsl(x As Double) As Double
'Specific heat of saturateded liquid (kJ/kg.K) 0.02% Error

Function RR134a_ST(x As Double) As Double
'Surface Tension of saturateded liquid (N/m) 0.25% Error

Function RR134a_Ksl(x As Double) As Double
'Thermal Conductivity of saturateded liquid (W/m.K) 0.11% Error

Function RR134a_Ksv(x As Double) As Double
'Thermal Conductivity of saturateded vapor (W/m.K) 0.09% Error

Function RR134a_Vsl(x As Double) As Double
'Viscosity of saturateded liquid (Pa.s) 0.16% Error

Function RR134a_Vsv(x As Double) As Double
'Viscosity of saturateded vapor (Pa.s) 0.23% Error

Function RR134a_Prsl(x As Double) As Double
' Prandtl number for saturated liquid


SUPERHEATED STATE
 Variables : x = Pressure (MPa), y = temperature(oC)

Function RR134a_hv(x As Double, y As Double) As Double
'Enthalpy of superheated vapor (kJ/kg) 0.002% Error

Function RR134a_Dv(x As Double, y As Double) As Double
'Density of superheated vapor (kg/m3) 0.09% Error

Function RR134a_Vv(x As Double, y As Double) As Double
'Viscosity of superheated vapor (Pa.s) 0.006% Error

Function RR134a_Kv(x As Double, y As Double) As Double
'Thermal Conductivity of superheated vapor (W/m.K) 0.02% Error

Function RR134a_Sv(x As Double, y As Double) As Double
'Entropy of superheated vapor (kJ/kg.K) 0.01% Error

Function RR134a_Cpv(x As Double, y As Double) As Double
'Specific heat of superheated vapor (kJ/kg.K) 0.06% Error

Function RR134a_Prv(x As Double, y As Double) As Double
'Prandtl Number for superheated vapor
 

Calculation Reference

Properties of Refrigerants

Fluid Properties of Refrigerants

Fluid Mechanics