blob: 334c60417af62c0f5c75d3b0044aacece005238d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
clc
clear
//INPUT DATA
p1=100;//Boiler pressure in Bar
p2=20;//low pressure turbine pressure in Bar
p3=0.1;//condenser pressure in Bar
T=500;//Temperature inlet to turbine in Degree C
h1=3373.7;//Enthalpy in kJ/kg
h2=2797.2;//Enthalpy in kJ/kg
h5=191.8;//Enthalpy in kJ/kg
h9=2584.7;//Enthalpy in kJ/kg
S5=0.649;//Entropy in kJ/kg.K
S9=8.15;//Entropy in kJ/kg.K
Wn=1500;//Net work done in kJ/kg
nRi=401;//Rankine efficiency in percentage
//CALCULATIONS
Qs=(Wn/nRi)*1000;//heat supplied in kJ/kg
h3=Qs-(h1-h5-h2);//Enthalpy in kJ/kg
t3=450+(((h3-3357.5)*(T-450))/(3467.6-3357.5));//Temperature in degree C
//OUTPUT
printf('Temperature of steam leaving is %3.2f degree C',t3)
|