summaryrefslogtreecommitdiff
path: root/2339/CH4/EX4.11.1/Ex4_11.sce
blob: a9152485831a9936f8cff42851fa7ea5e33df670 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
clc
clear

//At 20 degree Celcius
Cpw=4.187;              //in kJ/kg
Tw=20;
H1=Cpw*Tw;

//At 8 bar condition
m=4;                //mass in kg
Cps=2.1;            //in kJ/kg
Tsat=170.4+273;     //in K
Hg=2769.1;          //in kJ/kg
Tsup=200+273;       //in K
H2=Hg+(Cps*(Tsup-Tsat));
Q=m*(H2-H1);
printf('Heat to be added: %3.1f kJ',Q);
printf('\n');