blob: d4d2f0aa56d286e9872a9f2f28a6244ccfde657f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
// Display mode
mode(0);
// Display warning for floating point exception
ieee(1);
clear;
clc;
disp("Introduction to heat transfer by S.K.Som, Chapter 4, Example 3")
//Heat transfer coefficient in W/(m^2*K)
h = 30;
//Thermal conductivity of sphere in W/(m*K)
k = 250;
//Biot number for lumped parameter analysis is 0.1
Bi = 0.1;
//Characteristic dimension of a cube is (a/6) where a is the side of cube in metre
//Maximum dimension in metre
a = ((6*k)*Bi)/h;
disp("Maximum dimension in metre for lumped parameter analysis")
a
|
