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)