summaryrefslogtreecommitdiff
path: root/2510/CH17/EX17.6/Ex17_6.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2510/CH17/EX17.6/Ex17_6.sce
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 '2510/CH17/EX17.6/Ex17_6.sce')
-rwxr-xr-x2510/CH17/EX17.6/Ex17_6.sce18
1 files changed, 18 insertions, 0 deletions
diff --git a/2510/CH17/EX17.6/Ex17_6.sce b/2510/CH17/EX17.6/Ex17_6.sce
new file mode 100755
index 000000000..1ff551c5a
--- /dev/null
+++ b/2510/CH17/EX17.6/Ex17_6.sce
@@ -0,0 +1,18 @@
+//Variable declaration:
+w = 0.2/100.0 //Width of fin (m)
+t = 0.2/100.0 //Thickness of fin (m)
+L = 1.0/100.0 //Length of fin (m)
+h = 16.0 //Heat transfer coefficient (W/m^2.K)
+k = 400.0 //Thermal conductivity of fin (W/m.K)
+Tc = 100.0 //Circuit temperature ( C)
+Ta = 25.0 //Air temperature ( C)
+
+//Calculation:
+P = 4*w //Fin cross-section parameter (m)
+Ac = w*t //Cross-sectional area of fin (m^2)
+Lc = L+Ac/P //Corrected height of fin (m)
+m = sqrt((h*P)/(k*Ac)) //Location of minimum temperature (m^-1)
+Q = (sqrt(h*P*k*Ac))*(Tc-Ta)*atan(h)*(m*Lc) //Heat transfer from each micro-fin (W)
+
+//Result:
+printf("The heat transfer from each micro-fin is : %.2f W .",Q)