summaryrefslogtreecommitdiff
path: root/686/CH7
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /686/CH7
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 '686/CH7')
-rwxr-xr-x686/CH7/EX7.1/Ex7_1.sci24
1 files changed, 24 insertions, 0 deletions
diff --git a/686/CH7/EX7.1/Ex7_1.sci b/686/CH7/EX7.1/Ex7_1.sci
new file mode 100755
index 000000000..0ec6eb9ed
--- /dev/null
+++ b/686/CH7/EX7.1/Ex7_1.sci
@@ -0,0 +1,24 @@
+clc();
+clear;
+
+
+// to calculate the heat tranaferv coefficient for a plate in an air stream
+
+x = 4/12; // distance from leading edge in ft
+u = 33; // air velocity in fps
+Ts = 125; //
+Tw = 255; // surface temperature in F
+k = 0.0178; // Thermal conductivity in Btu/hr-ft-F
+Re = 46600; // Reynolds number
+Pr = 0.695; // Prandtls number
+
+Nu = 0.332*Re^.5*Pr^(1/3); // Nusselt number
+h = Nu*k/x; // Local heat transfer coefficient
+ha = h*12; // Heat transfer coefficient average
+b = 1; // Width of plate in ft
+x = 4/12; // Length of plate
+
+q = ha*b*x*(Ts-Tw); // Heat loss in Btu/hr
+
+printf("The heat transfer coefficient for a plate in an air stream is %.2f Btu/hr-ft^2-F ",h);
+