summaryrefslogtreecommitdiff
path: root/2510/CH11/EX11.10/Ex11_10.sce
diff options
context:
space:
mode:
Diffstat (limited to '2510/CH11/EX11.10/Ex11_10.sce')
-rwxr-xr-x2510/CH11/EX11.10/Ex11_10.sce12
1 files changed, 12 insertions, 0 deletions
diff --git a/2510/CH11/EX11.10/Ex11_10.sce b/2510/CH11/EX11.10/Ex11_10.sce
new file mode 100755
index 000000000..234813c06
--- /dev/null
+++ b/2510/CH11/EX11.10/Ex11_10.sce
@@ -0,0 +1,12 @@
+//Variable declaration:
+TH = 140.0+460.0 //Absolute outside temperature of pipe (ft^2)
+TC = 60.0+460.0 //Absolute temperature of surrounding atmosphere (ft^2)
+A = 10.0 //Area of pipe (ft^2)
+E = 0.9 //Emissivity of pipe
+
+//Calculation:
+Q = E*A*0.173*((TH/100.0)**4-(TC/100.0)**4) //Heat loss due to radiation (Btu/h)
+Q = round(Q*10**-1)/10**-1
+
+//Result:
+printf("The heat loss due to radiation is : %f Btu/h.",Q)