blob: 90217347d89fd0664e955235e8ead17c45b31bd9 (
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
|
//Chapter-2, Illustration 6, Page 61
//Title: Gas Power Cycles
//=============================================================================
clc
clear
//INPUT DATA
rv=14;//Compression ratio
c=0.06;//Cut-off percentage
y=1.4;//Ratio of specific heats
//CALCULATIONS
rc=1.78;//Cut-off ratio
nth=(1-(((rc^y)-1)/((rv^(y-1))*y*(rc-1))))*100;//Thermal efficiency
//OUTPUT
mprintf('Air standard efficiency is %3.1f percent',nth)
//==============================END OF PROGRAM=================================
|