1 files changed, 25 insertions, 0 deletions
diff --git a/1073/CH2/EX2.49/2_49.sce b/1073/CH2/EX2.49/2_49.sce
new file mode 100755
index 000000000..2958a99b4
--- /dev/null
+++ b/1073/CH2/EX2.49/2_49.sce
@@ -0,0 +1,25 @@
+
+clc;
+clear;
+//Example 2.49
+//Given
+k=300    //W/(m.K)
+h=20    //W.(sq m.K)
+P=0.05    //[m]
+A=2    //[sq cm]
+A=A/10000    //[sq m]
+T0=503    //[K]
+T_inf=303    //[K]
+theta_0=T0-T_inf    //[K]
+m=sqrt(h*P/(k*A))
+//CASE 1:  6 Fins of 100 mm length
+L1=0.1    //Length of fin in [m]
+Q=sqrt(h*P*k*A)*theta_0*tanh(m*L1)    //[W]
+//For 6 fins
+Q=Q*6    //for 6 fins [W]
+//CASE 2:  10 fins of 60 mm length
+L2=60    //[mm]
+L2=L2/1000    //[m]
+Q2=sqrt(h*P*k*A)*theta_0*tanh(m*L2);    //[W]
+Q2=Q2*10    //For 10 fins
+printf("As,Q for 10 fins of 60 mm length( %f W) is more than Q for 6 fins of 100 mm length (%f W).\n The agreement-->10 fins of 60 mm length is more effective",Q2,Q);