summaryrefslogtreecommitdiff
path: root/1752/CH3/EX3.8/exa3_8.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1752/CH3/EX3.8/exa3_8.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 '1752/CH3/EX3.8/exa3_8.sce')
-rwxr-xr-x1752/CH3/EX3.8/exa3_8.sce25
1 files changed, 25 insertions, 0 deletions
diff --git a/1752/CH3/EX3.8/exa3_8.sce b/1752/CH3/EX3.8/exa3_8.sce
new file mode 100755
index 000000000..d09bbb3ce
--- /dev/null
+++ b/1752/CH3/EX3.8/exa3_8.sce
@@ -0,0 +1,25 @@
+//Exa 3.8
+clc;
+clear;
+close;
+//given data
+T_0=150;// in degree C
+T_infinite=40;// in degree C
+w=1;// in m
+t=0.75*10^-3;// in m
+d=5*10^-2;// in meter
+L=25*10^-3;// in meter
+k=75;// in W/mK
+h=23.3;// in W/m^2K
+N=12;// numbers of fins
+Ac=w*t;//in square meter
+rho=2*(w+t);// in meter
+delta=Ac/rho;
+L_c=L+delta;
+ML_c=L_c*sqrt(h*rho/(k*Ac))
+q_fin= N*sqrt(h*rho*k*Ac)*(T_0-T_infinite)*tanh(ML_c);
+q_fin=floor(q_fin);
+A_0=%pi*d*w-12*Ac
+q_unfin= h*A_0*(T_0-T_infinite);
+q_total=q_fin+q_unfin;
+disp("Rate of heat transfer is : "+string(q_total)+" watt");