diff options
Diffstat (limited to '1709/CH3/EX3.3')
-rwxr-xr-x | 1709/CH3/EX3.3/3_3.sce | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/1709/CH3/EX3.3/3_3.sce b/1709/CH3/EX3.3/3_3.sce new file mode 100755 index 000000000..b8ab8b1ce --- /dev/null +++ b/1709/CH3/EX3.3/3_3.sce @@ -0,0 +1,22 @@ +clc
+//Initialization of variables
+V1=1.735*10^-4 //ft^3
+v1=0.016080 //ft^3/lbm
+h1=70.61 //B/lbm
+P1=100 //psia
+V2=1 //ft^3
+//calculations
+u1=h1-P1*v1*144/778
+m=V1/v1
+v2=V2/m
+vf2=0.01613
+vfg2=350.3
+x2=(v2-vf2)/vfg2
+hf2=67.97
+hfg2=1037.2
+h2=hf2+x2*hfg2
+P2=0.9492
+u2=h2- P2*144*v2/778
+Q=m*(u2-u1)
+//results
+printf("Enthalpy change = %.2f Btu",Q)
|