根据国际水和水蒸气性质学会1997年9月于德国埃尔兰根IAPWS1997年关于工业用水和水蒸气热力学性质计算公式的公布，编写的Fortran程序，可以改写为C程序，或者参照文件内的C源码。(According to the publication of IAPWS 1997 in Erlangen, Germany, by the international society of water and steam properties on the calculation formula of t