blob: 162944d362e1061f0e3e06fd914c484db1c89a1f (
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
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
|
//pathname=get_absolute_file_path('12.02.sce')
//filename=pathname+filesep()+'12.02-data.sci'
//exec(filename)
//Pressure at which steam is supplied(in bar):
p1=10
//Diameter of the cylinder(in m):
d=0.3
//Length of stroke(in m):
L=0.6
//Pressure to which steam is expanded(in bar):
p2=0.75
//Pressure at which steam is released in the condensor(in bar):
p3=0.25
//From steam tables:
h1=2676.2 //kJ/kg
s1=7.3614 //kJ/kg.K
s2=s1
v2=2.1833 //m^3/kg
h2=2628.35 //kJ/kg
h4=271.93 //kJ/kg
s6=s2
h6=2459.38 //kJ/kg
s6=7.3614 //kJ/kg.K
v6=5.784 //m^3/kg
//Work output from engine cycle per kg of steam(in kJ/kg):
W=h1-h2+v2*(p2-p3)*10^2
//Heat input per kg of steam(in kJ/kg):
Q=h1-h4
//Efficiency of modified Rankine cycle:
n=W/Q*100
//Volume of the cylinder(in m^3):
V=%pi*d^2*L/4
//Mass of steam in a stroke(in kg):
m=V/v2
//Volume requiremnet at 6(in m^3):
V1=m*v6
//New stroke length(in m):
L1=V1*4/(%pi*d^2)
printf("\n RESULT \n")
printf("\nModified Rankine cycle efficiency = %f percent",n)
printf("\nNew stroke length = %f cm",L1*100)
|
