blob: 20d2f678fd4a8ae1d0b08175ad9a3a76ea74b104 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
clc
Vs=0.0053; //m^3
Vc=0.00035; //m^3
V3=Vc;
V2=V3;
p3=65; //bar
p4=65; //bar
T1=353; //K
p1=0.9; //bar
y=1.4;
r=(Vs+Vc)/Vc;
rho=(5/100*Vs+V3)/V3;
p2=p1*(r)^y;
B=p3/p2;
n_dual=1-1/r^(y-1)*[(B*rho^y-1)/((B-1)+B*y*(rho-1))];
disp("Efficiency of the cycle =")
disp(n_dual)
|
