STEAM
NBS Steam Tables

STEAM is a FORTRAN90 library which computes various physical properties of water, related to temperature, pressure and density.

Most of these routines use a standard set of SI units. The original routines were written in FORTRAN77. This FORTRAN90 version has been extensively rewritten, with some additional routines for computing quantities such as the viscosity, thermal conductivity, and the Prandtl number.

Licensing:

The computer code and data files described and made available on this web page are distributed under the GNU LGPL license.

Languages:

STEAM is available in a FORTRAN90 version.

Related Data and Programs:

STEAM_INTERACT, a FORTRAN90 program which queries the NBS steam table package;

TEST_VALUES, a FORTRAN90 library which stores selected test values of various functions, including certain functions approximated by the steam library.

Reference:

1. Lester Haar, John Gallagher, George Kell,
   NBS/NRC Steam Tables: Thermodynamic and Transport Properties and Computer Programs for Vapor and Liquid States of Water in SI Units,
   Hemisphere Publishing Corporation, Washington, 1984,
   LC: TJ270.H3
2. C A Meyer, R B McClintock, G J Silvestri, R C Spencer,
   ASME Steam Tables: Thermodynamic and Transport Properties of Steam,
   American Society of Mechanical Engineers,
   Fifth Edition, 1983, LC: TJ270.A75.

Source Code:

• steam.f90, the source code;

Examples and Tests:

• steam_test.f90, the calling program;
• steam_test.txt, the sample output.

List of Routines:

• BASE calculates quantities associated with the base Helmholtz function.
• BB calculates the B's of equations 3 and 4.
• CORR evaluates an adjustment to the Gibbs function.
• CP_VALUES returns some values of the specific heat at constant pressure.
• DENSE computes the density for a given pressure and temperature.
• DIELECTRIC returns the static dielectric constant.
• DIELECTRIC_VALUES returns some values of the static dielectric constant.
• GASCON returns the value of the specific gas constant.
• IDEAL computes ideal gas thermodynamic properties of water.
• PRANDTL computes the Prandtl number.
• PRANDTL_VALUES returns some values of the Prandtl number for testing.
• PSAT calculates the vapor pressure, and the liquid and vapor densities.
• PSAT_EST makes a rough estimate of the vapor pressure.
• R8POLY_VAL_HORNER evaluates a polynomial using Horner's method.
• RESID calculates residual contributions to thermodynamic quantities.
• SECVIR calculates the second virial coefficient at a given temperature.
• SECVIR_VALUES returns some values of the second virial coefficient.
• SOUND computes the speed of sound given temperature and pressure.
• SURTEN returns the surface tension as a function of temperature.
• TDPSDT computes the quantity T * dP(Sat)/dT.
• THERCON calculates the thermal conductivity for given temperature and density.
• THERM calculates thermodynamic functions given temperature and density.
• TIMESTAMP prints the current YMDHMS date as a time stamp.
• TSAT calculates the saturation temperature for a given pressure.
• TSAT_EST makes a rough estimate of the saturation temperature.
• VISCOSITY calculates the viscosity for given temperature and density.
• VISCOSITY_VALUES returns some values of the viscosity function for testing.
• VOLUME computes specific volume derivatives given temperature and density.

You can go up one level to the FORTRAN90 source codes.