diff options
Diffstat (limited to '1022/CH8/EX8.2')
-rwxr-xr-x | 1022/CH8/EX8.2/8_2.sce | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/1022/CH8/EX8.2/8_2.sce b/1022/CH8/EX8.2/8_2.sce new file mode 100755 index 000000000..5eea878be --- /dev/null +++ b/1022/CH8/EX8.2/8_2.sce @@ -0,0 +1,17 @@ +clc
+//initialisation of variables
+P= 10 //bar
+P1= 38 //bar
+T= 310 //C
+v= 64.03 //cm^3/gm
+s= 6.4415 //J/gm K
+vf= 1.12773 //cm^3/gm
+vg= 194.44 //cm^3/gm
+sf= 2.1387 //J/gm K
+sfg= 4.4478 //J/gm K
+//CALCULATIONS
+x= (v-vf)/(vg-vf)
+sx= sf+x*sfg
+S= s-sx
+//RESULTS
+printf ('Change in Entropy= %.3f J/gm',S)
|