summaryrefslogtreecommitdiff
path: root/3511/CH5/EX5.11/Ex5_11.sce
blob: be77d3868c0cd709fcb279e4d8c128d02671fc9a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
clc;
Tmin=5+273; // Minimum operating temperature in kelvin
Tmax=839+273; // Maximum operating temperature in kelvin 
Cp=1.005; // Specific heat at constant pressure in kJ/kg K
r=1.4; // Specific heat ratio

eff_carnot=1-Tmin/Tmax; // Efficiency of the carnot cycle
c=1/(1-eff_carnot);
p2_p1=c^(r/(r-1)); // Pressure ratio
disp (p2_p1,"(i).Pressure ratio at which efficiency equals Carnot cycle efficiency = ");
t=Tmax/Tmin; // Temperature ratio
// Pressure ratio for maximum work is obtained when
c=sqrt (t); 
p2_p1=c^(r/(r-1)); // Pressure ratio
eff=1-1/c;// Efficiency at maximum work output
disp (p2_p1,"(ii).Pressure ratio at which maximum work is obtained = ");
disp ("%",eff*100,"(iii).Efficiency at maximum work output = ");