summaryrefslogtreecommitdiff
path: root/2735/CH9/EX9.7
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2735/CH9/EX9.7
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 '2735/CH9/EX9.7')
-rwxr-xr-x2735/CH9/EX9.7/Ex9_7.sce18
1 files changed, 18 insertions, 0 deletions
diff --git a/2735/CH9/EX9.7/Ex9_7.sce b/2735/CH9/EX9.7/Ex9_7.sce
new file mode 100755
index 000000000..7767c13d5
--- /dev/null
+++ b/2735/CH9/EX9.7/Ex9_7.sce
@@ -0,0 +1,18 @@
+clc
+clear
+//Initialization of variables
+T1=100 //F
+P2=1000 //psia
+x=0.6
+J=778.16
+//calculations
+disp("From table 3,")
+v=0.01613 //ft^3/lbm
+P1=0.9 //psia
+wrev=-v*(P2-P1)*144/J
+dv=0.000051 //ft^3/lbm
+wcomp=(P2+P1)/2 *dv*144/J
+wact=wrev/x
+//results
+printf("Work done = %.1f Btu/lbm",wrev)
+printf("\n In case 2, work required = %.1f Btu/lbm",wact)