本文给出了基于IAPWS-IF97的水物性计算Fortran90语言程序代码，适用Compaq visual fortran和Intel Fortran 编译环境。目前网上大量水物性包在Intel Fortran调用都会报错，本程序最大优势是可在Intel Fortran 下实现物性调用。本版本基于网上版本修改，使用者若涉及版权问题，本人概不负责。