Vapore umido con titolo x, calcolare calore per surriscaldare a T più alta

OGGETTO:

n° decimali =

INSERIRE I DATI	Per i decimali mettere il punto Per azzerare i risultati premere F5
p = pressione assoluta		Kg/cmq
ts = temperatura da raggiungere		°C
x = titolo (da 0 a 1)		///
cpm = calore specifico medio tra ts e t (vedi tabelle)		Cal/Kg
r = calore di vaporizzazione (vedi tabelle)		Cal/Kg
t = temperatura di vaporizzazione relativa a cpm (< ts) (vedi tabelle)		°C
RISULTATI	-----------------------
A = (1 - x)r = Calore necessario per essiccare il vapore		Cal/Kg
B = cpm(ts - t) = Calore necessario per surriscaldarlo		Cal/Kg
Q = A + B = Calore totale		Cal/Kg			kJ/Kg
Cal = Kcal /// 1 Kcal/Kg °C=4.187 kJ/Kg K /// 1 Pa = 1 N/m² = 1 Kg/(m·s²)