summaryrefslogtreecommitdiff
path: root/2870/CH8/EX8.14/Ex8_14.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2870/CH8/EX8.14/Ex8_14.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 '2870/CH8/EX8.14/Ex8_14.sce')
-rwxr-xr-x2870/CH8/EX8.14/Ex8_14.sce24
1 files changed, 24 insertions, 0 deletions
diff --git a/2870/CH8/EX8.14/Ex8_14.sce b/2870/CH8/EX8.14/Ex8_14.sce
new file mode 100755
index 000000000..ae2b4079f
--- /dev/null
+++ b/2870/CH8/EX8.14/Ex8_14.sce
@@ -0,0 +1,24 @@
+clc;clear;
+//Example 8.14
+
+//given data
+TR=1200;
+T0=300;
+P0=100;
+Tsys=400;
+P1=350;
+V1=0.01;
+V2=2*V1;
+
+//calculations
+W=P1*V1*log(V2/V1);
+Wsurr=P0*(V2-V1);
+Wu=W-Wsurr;
+disp(Wu,'the useful work output in kJ');
+// Qin - W = m*Cv*dT, Since dt=0
+Q=W;
+Sgen=Q/Tsys-Q/TR;
+Xdestroyed=T0*Sgen;
+disp(Xdestroyed,'the exergy destroyed in kJ/K');
+Wrev=T0*Q/Tsys-Wsurr+(1-T0/TR)*Q;
+disp(Wrev,'the reversible work is done in the process in kJ');