summaryrefslogtreecommitdiff
path: root/1775/CH2/EX2.18
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1775/CH2/EX2.18
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1775/CH2/EX2.18')
-rwxr-xr-x1775/CH2/EX2.18/Chapter2_Example18.sce26
1 files changed, 26 insertions, 0 deletions
diff --git a/1775/CH2/EX2.18/Chapter2_Example18.sce b/1775/CH2/EX2.18/Chapter2_Example18.sce
new file mode 100755
index 000000000..679c1d90a
--- /dev/null
+++ b/1775/CH2/EX2.18/Chapter2_Example18.sce
@@ -0,0 +1,26 @@
+//Chapter-2, Illustration 18, Page 76
+//Title: Gas Power Cycles
+//=============================================================================
+clc
+clear
+
+//INPUT DATA
+Tmin=300;//Minimum temperature in K
+Tmax=1073;//Maximum temperature in K
+Cp=1.005;//Specific heat at constant pressure in kJ/kg-K
+
+//CALCULATIONS
+Wmax=Cp*((sqrt(Tmax)-sqrt(Tmin))^2);//Maximum work output in kJ/kg
+nB=(1-sqrt(Tmin/Tmax))*100;//Brayton cycle efficiency
+nC=(1-(Tmin/Tmax))*100;//Carnot efficiency
+r=nB/nC;//Ratio of brayton cycle efficiency to carnot efficieny
+
+//OUTPUT
+mprintf('Maximum work per kg of air is %3.2f kJ/kg \n Cycle efficiency is %3.0f percent \n Ratio of brayton cycle efficiency to carnot efficieny is %3.3f',Wmax,nB,r)
+
+
+
+
+
+
+//==============================END OF PROGRAM=================================