summaryrefslogtreecommitdiff
path: root/3843/CH10/EX10.4/Ex10_4.sce
blob: b9c555be6b32dc869cbe2a1d5dd2b98501c59a53 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
// Example 10_4
clc;funcprot(0);
// Given data
P_1=2;// kPa
T_1=17.5+273;// K
P_2=1;// kPa
h_fg=2480;// kJ/kg
R=0.462;// kJ/kg.K

// Calculation
T_2=1/((1/T_1)-((R/h_fg)*log(P_2/P_1)));// K
printf("\nT_2=%3.0f K or %1.0f°C",T_2,T_2-273);