summaryrefslogtreecommitdiff
path: root/1373/CH8/EX8.7
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1373/CH8/EX8.7
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1373/CH8/EX8.7')
-rwxr-xr-x1373/CH8/EX8.7/Chapter8_Example7.sce27
1 files changed, 27 insertions, 0 deletions
diff --git a/1373/CH8/EX8.7/Chapter8_Example7.sce b/1373/CH8/EX8.7/Chapter8_Example7.sce
new file mode 100755
index 000000000..8f243cccf
--- /dev/null
+++ b/1373/CH8/EX8.7/Chapter8_Example7.sce
@@ -0,0 +1,27 @@
+//Chapter-8, Example 8.7, Page 348
+//=============================================================================
+clc
+clear
+
+//INPUT DATA
+LH=0.08;//Horizantal length in m
+LV=0.12;//Vertical length in m
+Ts=50;//Surface temperature in degree C
+Ta=0;//Temeprature of air in degree C
+
+//CALCULATIONS
+L=(LH*LV)/(LH+LV);//Characteristic length in m
+Tb=(Ts+Ta)/2;//Film temperature in degree C
+p=0.707;//Density in kg/m^3
+k=0.0263;//Thermal conductivity in W/m.K
+v1=(15.89*10^-6);//Kinematic viscosity in m^2/s
+b=(1/300);//Coefficient of thermal expansion in 1/K
+Pr=0.707;//Prantl number
+Gr=((9.81*b*L^3*(Ts-Ta))/(v1^2));//Grashof number
+Nu=0.55*Gr^(0.25);//Nussults number
+h=(Nu*k)/L;//Heat transfer coefficient in W/m^2.K
+
+//OUTPUT
+mprintf('Heat transfer coefficient is %3.2f W/m^2.K',h)
+
+//=================================END OF PROGRAM==============================