-- Cálculo de las características físicas y termodinámicas del fluido, así como el coeficiente
-- de calor por convección metal-fluido de cada trozo en que se ha dividido el lazo de colectores.
-- Entradas a la función: Temperatura del fluido [ºC] caudal [kg/s]
-- Salidas de la función: densidad pf [kg/m3] Calor específico Cf [J/(kgºC)]
-- Coeficiente de transmisión de calor por convección metal-fluido [W/(m2ºC)]
FUNCTION NO_TYPE caract_fluido (IN REAL T, IN REAL caudal, OUT REAL pf, OUT REAL Cf, OUT REAL Ht)
DECLS
REAL Hv
BODY
pf=-0.002549807548*T**2-0.202618731192*T+1003.917572929273
Cf= 0.000000516739*T**4 -0.000156862606*T**3+ 0.027679455287*T**2-1.626420964922*T+ 4207.403959277281
Hv=0.000000001338864e5*T**4-0.000000778905228e5*T**3+0.000187251179615e5*T**2-0.025731157369768e5*T+4.108383857418933e5
Ht=Hv*(caudal)**0.8
END FUNCTION
e-REdING. Biblioteca de la Escuela Superior de Ingenieros de Sevilla.
