summaryrefslogtreecommitdiff
path: root/1919/CH8/EX8.10
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1919/CH8/EX8.10
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 '1919/CH8/EX8.10')
-rwxr-xr-x1919/CH8/EX8.10/Ex8_10.sce22
1 files changed, 22 insertions, 0 deletions
diff --git a/1919/CH8/EX8.10/Ex8_10.sce b/1919/CH8/EX8.10/Ex8_10.sce
new file mode 100755
index 000000000..fd41b9c40
--- /dev/null
+++ b/1919/CH8/EX8.10/Ex8_10.sce
@@ -0,0 +1,22 @@
+
+// Theory and Problems of Thermodynamics
+// Chapter 8
+// Power and Refrigeration Cycles
+// Example 10
+
+clear ;clc;
+
+//Given data
+r0 = 8 // Compression ratio of Otto cycle
+T1 = 300 // initial temperature of air in K
+P1 = 0.1 // initial pressure of air in MPa
+q1 = 25 // amount of energy added during combustion cycle
+gam = 1.4 // heat capacity ratio
+
+// calculations
+n = 1-(1/r0)^(gam-1) // Thermal efficiency of cycle
+W = n*q1 // work done per mole of air
+
+// Output Results
+mprintf('Thermal efficiency of Otto cycle = %4.3f' ,n);
+mprintf('\n Work done per mole of air = %4.3f kJ/mol' ,W);