summaryrefslogtreecommitdiff
path: root/2006/CH10/EX10.5/ex10_5.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2006/CH10/EX10.5/ex10_5.sce
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 '2006/CH10/EX10.5/ex10_5.sce')
-rwxr-xr-x2006/CH10/EX10.5/ex10_5.sce10
1 files changed, 10 insertions, 0 deletions
diff --git a/2006/CH10/EX10.5/ex10_5.sce b/2006/CH10/EX10.5/ex10_5.sce
new file mode 100755
index 000000000..b9f433b0d
--- /dev/null
+++ b/2006/CH10/EX10.5/ex10_5.sce
@@ -0,0 +1,10 @@
+clc;
+T=700;// Exhaust gas temperature in degree celcius
+p=120;// Exhaust gas pressure in kPa
+Cpo=1.089; // Specific heat at constant pressure in kJ/kg K
+R=0.287; // characteristic gas constant in kJ/kg K
+p0=100; // Pressure of Surroundings in kPa
+T0=30; // temperature of Surroundings in degree celcius
+Cvo=Cpo-R; // Specific heat at constant volume
+AE=(Cvo*(T-T0))+(p0*R*((T+273)/p-(T0+273)/p0))-((T0+273)*((Cpo*log((T+273)/(T0+273)))-(R*log (p/p0)))); // Available energy
+disp ("kJ",AE,"Available energy in Exhaust gas =");