summaryrefslogtreecommitdiff
path: root/1244/CH1/EX1.1/Example11.sce
blob: 336809ca4582793ebaf0d7959823bdb668d7f113 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37


// Display mode
mode(0);

// Display warning for floating point exception
ieee(1);

clc;
disp("Principles of Heat Transfer, 7th Ed. Frank Kreith et. al Chapter - 1 Example # 1.1 ")

//Temperature Inside in F
Ti = 55;
//Temperature outside in F
To = 45;
//Thickness of the wall in ft
t = 1;
//Heat loss through the wall in Btu/h-ft2
q = 3.4;

//Converting Btu/h-ft2 to W/m2
disp("Heat loss through the wall in W/m2 is")
//Heat loss through the wall in W/m2 
qdash = (q*0.2931)/0.0929

//Heat loss for a 100ft2 surface over a 24-h period
disp("Heat loss for a 100ft2 surface over a 24-h period in Btu is")
//Heat loss for a 100ft2 surface over a 24-h period in Btu 
Q = (q*100)*24

//Q in SI units i.e. kWh
Q = (Q*0.2931)/1000;

//At price of 10c/kWh, the total price shall be
disp("So, the total price in c are")
//Total price in c
Price = 10*Q