summaryrefslogtreecommitdiff
path: root/172/CH12/EX12.4/ex4.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /172/CH12/EX12.4/ex4.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 '172/CH12/EX12.4/ex4.sce')
-rwxr-xr-x172/CH12/EX12.4/ex4.sce13
1 files changed, 13 insertions, 0 deletions
diff --git a/172/CH12/EX12.4/ex4.sce b/172/CH12/EX12.4/ex4.sce
new file mode 100755
index 000000000..58b5c9499
--- /dev/null
+++ b/172/CH12/EX12.4/ex4.sce
@@ -0,0 +1,13 @@
+//ques4
+//Calculation of work in the given cycle
+clear
+clc
+R=0.287;//gas constant
+T1=288.2;//compressor temperature K
+T2=1373.2;//K turbine temperature K
+//Pe/Pi=c=10, Pi/Pe=1/c from example 12.1
+c=10;
+wc=-R*T1*log(c);
+printf('Isothermal work in compressor = %.1f kJ/kg \n',wc);
+wt=-R*T2*log(1/c);
+printf(' Isothermal work in turbine = %.1f kJ/kg\n',wt); \ No newline at end of file