diff options
| author | priyanka | 2015-06-24 15:03:17 +0530 |
|---|---|---|
| committer | priyanka | 2015-06-24 15:03:17 +0530 |
| commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
| tree | ab291cffc65280e58ac82470ba63fbcca7805165 /2471/CH4/EX4.6 | |
| download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip | |
initial commit / add all books
Diffstat (limited to '2471/CH4/EX4.6')
| -rwxr-xr-x | 2471/CH4/EX4.6/Ex4_6.sce | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/2471/CH4/EX4.6/Ex4_6.sce b/2471/CH4/EX4.6/Ex4_6.sce new file mode 100755 index 000000000..ec8eda231 --- /dev/null +++ b/2471/CH4/EX4.6/Ex4_6.sce @@ -0,0 +1,24 @@ +clear ;
+clc;
+// Example 4.6
+printf('Example 4.6\n\n');
+printf('Page No. 98\n\n');
+
+// given
+v = 1.23;// velocity in m/s
+d = 25*10^-3;// diameter in m
+p = 980;// density in kg/m^3
+u = 0.502*10^-3;// viscosity in Ns/m^2
+Cp = 3.76*10^3;// Specific heat capacity in J/kg-K
+K = 0.532;// Thermal conductivity in W/m-K
+
+Re = (d*v*p)/u;//Reynolds Number
+Pr = (Cp*u)/K;// Prandtl Number
+Re_d = (Re)^0.8;
+Pr_d = (Pr)^0.4;
+
+// By Dittus-Boelter Equation
+//Nu = 0.0232 * Re^0.8 Pr^0.4 = (hd)/K
+Nu = 0.0232 * Re_d * Pr_d;// Nusselt Number
+h = (Nu*K)/d;//W/m^2-K
+printf('The film heat transfer coefficient is %3.2f W/sq.m K\n',h)// Deviation in answer due to direct substitution
|