diff options
| author | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
|---|---|---|
| committer | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
| commit | 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch) | |
| tree | dbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3831/CH13/EX13.6/Ex13_6.sce | |
| parent | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff) | |
| download | Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2 Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip | |
initial commit / add all books
Diffstat (limited to '3831/CH13/EX13.6/Ex13_6.sce')
| -rw-r--r-- | 3831/CH13/EX13.6/Ex13_6.sce | 66 |
1 files changed, 66 insertions, 0 deletions
diff --git a/3831/CH13/EX13.6/Ex13_6.sce b/3831/CH13/EX13.6/Ex13_6.sce new file mode 100644 index 000000000..156eb076b --- /dev/null +++ b/3831/CH13/EX13.6/Ex13_6.sce @@ -0,0 +1,66 @@ +// Example 13_6
+clc;funcprot(0);
+// Given data
+p_1=200;// psia
+p_2s=1.00;// psia
+p_4=80.0;// psia
+
+// Calculation
+// (a)
+// Station 1
+p_1=200.0;// psia
+x_1=1.00;// The dryness fraction
+h_1=1199.3;// Btu/lbm
+s_1=1.5466;// Btu/lbm.R
+// Station 2s
+p_2=1.00;// psia
+p_2s=p_2;// psia
+s_2s=s_1;// Btu/(lbm.R)
+s_f2=0.1326;// Btu/(lbm.R)
+s_fg2=1.8455;// Btu/(lbm.R)
+h_f2=69.7;// Btu/lbm
+h_fg2=1036.0;// Btu/lbm
+// Station 3
+p_3=1.00;// psia
+x_3=0.00;// The dryness fraction
+s_3=0.1326;// Btu/(lbm.R)
+h_3=69.7;// Btu/lbm
+v_3=0.01614;/// ft^3/lbm
+// Station 4s
+p_4=200;// psia
+p_4s=p_4;// psia
+s_4s=s_3;// Btu/lbm.R
+h_4s=h_3+(v_3*(p_4s-p_3)*(144/778.16));// Btu/lbm
+x_2s=(s_2s-s_f2)/s_fg2;// The dryness fraction
+h_2s=h_f2+(x_2s*h_fg2);// Btu/lbm
+n_T_Rankine=(((h_1-h_2s)-(h_4s-h_3))/(h_1-h_4s))*100;// The thermal efficiency in %
+// (b)
+// Station 4s
+p_4=200;// psia
+p_4s=p_4;// psia
+s_4s=s_3;// Btu/lbm.R
+h_4s=h_3+(v_3*(p_4s-p_3)*(144/778.16));// Btu/lbm
+// Station 5s
+p_5s=p_4;// psia
+s_5s=s_1;// Btu/(lbm.R)
+s_f5s=0.4535;// Btu/(lbm.R)
+s_fg5s=1.1681;// Btu/(lbm.R)
+x_5s=(s_5s-s_f5s)/s_fg5s;// The dryness fraction
+h_f5s=282.2;// Btu/lbm
+h_fg5s=901.4;// Btu/lbm
+h_5s=h_f5s+(x_5s*h_fg5s);// Btu/lbm
+h_5s=1125.7;// Btu/lbm
+// Station 6
+p_6=80.0;// psia
+x_6=0.00;// The dryness fraction
+s_6=0.4535;// Btu/(lbm.R)
+h_6=282.2;// Btu/lbm
+v_6=0.01757;// ft^3/lbm
+// Station 7s
+p_7=200;// psia
+p_7s=p_7;// psia
+s_7s=s_6;// Btu/(lbm.R)
+h_7s=h_6+(v_6*(p_7-p_6)*(144/778.16));// Btu/lbm
+r=(h_6-h_4s)/(h_5s-h_4s);// The mass fraction of steam
+n_T_reg=(1-(((h_2s-h_3)/(h_1-h_7s))*(1-r)))*100;// %
+printf("\n(a)The isentropic Rankine cycle thermal efficiency of the system without regeneration present,(n_T)_isentropic Rankine=%2.1f percentage.\n(b)The isentropic Rankine cycle thermal efficiency of the system,(n_T)_Rankine cycle with 1 regenerator=%2.1f percentage",n_T_Rankine,n_T_reg);
|