General Fin Solution

M.M. Yovanovich

FINGENSOL.MWS

General fin solution.

Constant cross-section extended surface (fin) with area [Maple Math] , perimeter [Maple Math] , length [Maple Math] , and thickness [Maple Math] . The thermal conductivity is [Maple Math] . The heat transfer coefficient along the lateral boundary is [Maple Math] , and the contact conductance at the fin base is [Maple Math] , and the heat transfer coefficient at the fin tip is [Maple Math] . The fin base temperature is [Maple Math] , and the surrounding fluid temperature is [Maple Math] .

The temperature excess is defined as [Maple Math] , and the fin parameter is defined as [Maple Math] .

There are three dimensionless parameters defined as [Maple Math] which must be less than [Maple Math] to ensure that the temperature is one-dimensional, i.e. [Maple Math] , [Maple Math] which cannot be zero, and [Maple Math] which lies in the range [Maple Math] .

> restart:

System parameters.

> syspar:= (A, P, L, k, h, h[c], h[e], T[b], T[f]);

[Maple Math]

Dimensionless parameters.

> BiotNos:= [Bi = h*t/k, Bi[c] = h[c]*L/k, Bi[e] = h[e]*L/k];

[Maple Math]

Governing differential equation and its solution.

> ode:= Diff(theta(x),x$2) - m^2*theta = 0;

[Maple Math]

> sol:= C[1]*cosh(m*x) + C[2]*sinh(m*x);

[Maple Math]

Robin boundary conditions at the fin base [Maple Math] and at the fin tip [Maple Math] .

> bc1:= Diff(theta(x),x)[x=0] = -h[c]/k*(theta[b] - theta(0));

[Maple Math]

> bc2:= Diff(theta(x),x)[x=L] = - h[e]/k*theta(L);

[Maple Math]

Constants of integration.

> C[1]:= theta[b]/(1 + (m*L*phi)/Bi[c]);

[Maple Math]

> C[2]:= - theta[b]*phi/(1 + (m*L*phi)/Bi[c]);

[Maple Math]

> phi:= (m*L*tanh(m*L) + Bi[e])/(m*L + Bi[e]*tanh(m*L));

[Maple Math]

Heat transfer through the fin base.

> Q[base]:= - k*A[base]*Diff(theta(x),x)[x=0];

[Maple Math]

> Q[fin]:= - k*A[base]*m*C[2];

[Maple Math]

Fin resistance.

> R[fin]:= theta[b]/Q[fin];

[Maple Math]

General expressions have been presented for fin equation, fin solution, fin heat transfer rate and the fin resistance. These general solution can be used to find many special cases such as

1. Perfect contact at the base where [Maple Math] and therefore [Maple Math] . This parameter will not appear in the temperature distribution, the fin heat transfer rate and the fin resistance.

2. Perfect contact with [Maple Math] , and adiabatic fin tip where [Maple Math] , therefore [Maple Math] . Here the fin parameter [Maple Math] .

3. Perfect contact with [Maple Math] , and perfect contact at fin tip where [Maple Math] , therefore [Maple Math] . Here the fin parameter [Maple Math] .

4. Perfect contact with [Maple Math] , infinitely long fin, i.e. [Maple Math] , and [Maple Math] .