1 files changed, 13 insertions, 0 deletions
diff --git a/172/CH8/EX8.8/ex8.sce b/172/CH8/EX8.8/ex8.sce
new file mode 100755
index 000000000..d5a5dbad8
--- /dev/null
+++ b/172/CH8/EX8.8/ex8.sce
@@ -0,0 +1,13 @@
+//example 3
+//calculating increase in entropy
+clear
+clc
+m=1 //mass of saturated water vapour
+sfg=6.0480 //in kJ/K
+T=25 //temperature of surrounding air in celsius
+dScm=-m*sfg //change in entropy of control mass in kJ/K
+hfg=2257.0 //in kJ/kg
+Qtosurroundings=m*hfg //heat transferred to surroundings in kJ
+dSsurroundings=Qtosurroundings/(T+273.15) //in kJ/K
+dSnet=dScm+dSsurroundings //net increase in entropy in kJ/K
+printf(" hence,net increase in entropy of water plus surroundings is dSnet=%.4f kJ/K.\n",dSnet)  
+\ No newline at end of file