diff options
Diffstat (limited to '2141/CH5/EX5.3/Ex5_3.sce')
-rwxr-xr-x | 2141/CH5/EX5.3/Ex5_3.sce | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/2141/CH5/EX5.3/Ex5_3.sce b/2141/CH5/EX5.3/Ex5_3.sce new file mode 100755 index 000000000..f49e8770c --- /dev/null +++ b/2141/CH5/EX5.3/Ex5_3.sce @@ -0,0 +1,24 @@ +
+clc
+//initialisation of variables
+v=100//ft^3
+vliq=1 //ft^3
+w=99 //ft^3
+wvap=14.7 //lbf/in^2
+vf=0.01672 //lbm
+vg=26.80 //lbm
+p=294 //lbf/in^2
+Tu=1.575 //lbf
+u2=1117.0//Btu/lbm
+vg1=1077.5//ft^3
+p1=180.0//lbf/in^2
+//CALCULATIONS
+mliq=(vliq/vf)//lbm
+m1vap=(w/vg)//lbm
+U=(mliq*p1)+(m1vap*vg1)//Btu
+m=mliq+m1vap //lbm
+v2=v/m//ft^3/lbm
+U2=m*u2//Btu
+Q2=(U2-U)//Btu
+//RESULTS
+printf('The heat transfer for this process=% f Btu',Q2)
|