1 files changed, 17 insertions, 0 deletions
diff --git a/2141/CH7/EX7.6/Ex7_6.sce b/2141/CH7/EX7.6/Ex7_6.sce
new file mode 100755
index 000000000..9b70c1bbc
--- /dev/null
+++ b/2141/CH7/EX7.6/Ex7_6.sce
@@ -0,0 +1,17 @@
+
+clc
+//initialisation of variables
+T1=500 //R
+T2=2000 //R
+P1=30 //lbf/in^2
+P2=20 //lbf/in^2
+M=32.00 //ft
+S2=11.515*log(T2/T1)
+s1=2*172*(1/sqrt(T2-1/sqrt(T1)))
+s=-1530*[(1/T2-1/T1)]
+s3=-1.986*log(P2/P1)
+//CALCULATIONS
+S=S2-s1+s+s3//Btu/lb mole R
+S2=S/M//Btu/lbm-R
+//RESULTS
+printf('The change in entropy per =% f Btu/lbm',S2)