summaryrefslogtreecommitdiff
path: root/2510/CH19/EX19.18/Ex19_18.sce
diff options
context:
space:
mode:
Diffstat (limited to '2510/CH19/EX19.18/Ex19_18.sce')
-rwxr-xr-x2510/CH19/EX19.18/Ex19_18.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/2510/CH19/EX19.18/Ex19_18.sce b/2510/CH19/EX19.18/Ex19_18.sce
new file mode 100755
index 000000000..74fe78441
--- /dev/null
+++ b/2510/CH19/EX19.18/Ex19_18.sce
@@ -0,0 +1,17 @@
+//Variable declaration:
+Lf = 6/12 //Length of firebrick (ft)
+kf = 0.61 //Thermal conductivity of firebrick (Btu/h.ft. F)
+A = 480 //Surface area of wall (ft^2)
+Lw = 8/12 //Length of rock wool (ft)
+kw = 0.023 //Thermal conductivity of rock wool (Btu/h.ft. F)
+T1 = 1900 //Temperature of insulation of firebrick ( F)
+T2 = 140 //Temperature of insulation of rock wool ( F)
+
+//Calculation:
+Rf = Lf/(kf*A) //Resistance of firebrick (h. F/Btu)
+Rw = Lw/(kw*A) //Resistance of rock wool (h. F/Btu)
+R = Rf+Rw //Total resitance (h. F/Btu)
+Q = (T1-T2)/R //Heat loss through the wall (Btu/h)
+
+//Result:
+printf("The heat loss through the wall is : %.0f Btu/h .",Q)