summaryrefslogtreecommitdiff
path: root/2510/CH14/EX14.16/Ex14_16.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2510/CH14/EX14.16/Ex14_16.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '2510/CH14/EX14.16/Ex14_16.sce')
-rwxr-xr-x2510/CH14/EX14.16/Ex14_16.sce16
1 files changed, 16 insertions, 0 deletions
diff --git a/2510/CH14/EX14.16/Ex14_16.sce b/2510/CH14/EX14.16/Ex14_16.sce
new file mode 100755
index 000000000..f1cc5f60e
--- /dev/null
+++ b/2510/CH14/EX14.16/Ex14_16.sce
@@ -0,0 +1,16 @@
+
+//Variable declaration:
+hw = 200.0 //Water heat coefficient (Btu/h.ft^2.°F)
+ho = 50.0 //Oil heat coefficient (Btu/h.ft^2.°F)
+hf = 1000.0 //Fouling heat coefficient (Btu/h.ft^2.°F)
+DTlm = 90.0 //Log mean temperature difference (°F)
+A = 15.0 //Area of wall (ft^2)
+
+//Calculation:
+X = 1.0/hw+1.0/ho+1.0/hf //Equation 14.34 for constant A
+U = 1.0/X //Overall heat coeffocient (Btu/h.ft^2.°F)
+Q = U*A*DTlm //Heat transfer rate (Btu/h)
+Q = round(Q*10**-1)/10**-1
+
+//Result:
+printf("The heat transfer rate is : %f Btu/h.",Q)