Saturated Water Properties

M.M. Yovanovich

WATERPROPS2.MWS

Correlation equation for saturated water properties from 0 to 100 degrees C.

> restart:

> k:= T->-.9866071429e-5*T^2+.2238035714e-2*T+.5536071429:
rho:= T->-.3582589286e-2*T^2-.6559821429e-1*T+1002.676071: cp:=T->-.1554398148e-3*T^3+.3851686508e-1*T^2-2.313042328*T+4216.855556:
nu:=T->.3177083333e-13*T^4-.8965277778e-11*T^3+.9827083333e-9*T^2-.5532222222e-7*T+.1787666667e-5:
alpha:= T->-.1015625000e-14*T^4+.2320601852e-12*T^3-.1855902778e-10*T^2+.9248148148e-9*T+.1307055556e-6:
Pr:= T-> .3046875000e-6*T^4-.8457175926e-4*T^3+.8985763889e-2*T^2-.4760621693*T+13.59579365:

> T1:= 60:

> waterprops1:= evalf([k=k(T1), rho=rho(T1), cp=cp(T1), nu=nu(T1), alpha=alpha(T1), Pr=Pr(T1)],4);

>