diff options
Diffstat (limited to '2519/CH13/EX13.9/Ex13_9.sce')
| -rwxr-xr-x | 2519/CH13/EX13.9/Ex13_9.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/2519/CH13/EX13.9/Ex13_9.sce b/2519/CH13/EX13.9/Ex13_9.sce new file mode 100755 index 000000000..672e7253f --- /dev/null +++ b/2519/CH13/EX13.9/Ex13_9.sce @@ -0,0 +1,15 @@ +clc
+clear
+//Initialization of variables
+py=20 //psia
+px=3.55 //psia
+R=1.986/29
+//calculations
+pr=py/px
+disp("from table B-19")
+Mx=2
+My=0.577
+pr2=0.721
+ds=R*log(1/pr2)
+//results
+printf("Change in entropy = %.4f Btu/lbm R",ds)
|