diff options
Diffstat (limited to '3831/CH3/EX3.5')
-rw-r--r-- | 3831/CH3/EX3.5/Ex3_5.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/3831/CH3/EX3.5/Ex3_5.sce b/3831/CH3/EX3.5/Ex3_5.sce new file mode 100644 index 000000000..77b853daf --- /dev/null +++ b/3831/CH3/EX3.5/Ex3_5.sce @@ -0,0 +1,16 @@ +// Example 3_5
+clc;funcprot(0);
+// Given data
+V=0.500;// ft^3
+p_c=3203.8;// psia
+T_c=1165.1;// R
+v_c=0.05053;// ft^3/lbm
+p_1=14.696;// psia
+T_1=212;// °F
+v_f1=0.01672;// ft^3/lbm
+v_g1=26.8;// ft^3/lbm
+
+// Solution
+m=V/v_c;// lbm
+x_1=((v_c-v_f1)/(v_g1-v_f1))*100;// % percentage
+printf('\nThe initial quality in the vessel,x_1=%0.3f percentage vapor',x_1);
|