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/CH4/EX4.1/Ex4_1.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/CH4/EX4.1/Ex4_1.sce')
| -rw-r--r-- | 3831/CH4/EX4.1/Ex4_1.sce | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/3831/CH4/EX4.1/Ex4_1.sce b/3831/CH4/EX4.1/Ex4_1.sce new file mode 100644 index 000000000..eae71bdc4 --- /dev/null +++ b/3831/CH4/EX4.1/Ex4_1.sce @@ -0,0 +1,20 @@ +// Example 4_1
+clc;funcprot(0);
+// Given data
+p_1=10.0;// psia
+x_1=1.00;// The quality of saturated vapor
+V_1=25000;// mph
+Z_1=200;// miles
+v_1=38.42;// ft^3/lbm
+m=3.0;// lbm
+u_2=950.0;// The final specific internal energy in Btu/lbm
+v_2=v_1;;// ft^3/lbm
+g=32.174;// The acceleration due to gravity in m/s^2
+
+// Solution
+// Table C.2a in Thermodynamic Tables to accompany Modern Engineering Thermodynamics gives
+u_1=1072.2;// Btu/lbm
+U_1=m*u_1;// Btu
+U_2=m*u_2;// Btu
+E_T=(U_2-U_1)-([((m/2)*(V_1*(5280/3600))^2)]*((1/(g*778.16))))-[((m*g)/g)*Z_1*5280/778.16];// Btu
+printf('\nThe energy transport is required to decelerate the water to zero velocity and bring it down to the surface of the Earth,E_T=%5.0f Btu',E_T);
|