summaryrefslogtreecommitdiff
path: root/965/CH3/EX3.6/6.sci
diff options
context:
space:
mode:
Diffstat (limited to '965/CH3/EX3.6/6.sci')
-rw-r--r--965/CH3/EX3.6/6.sci16
1 files changed, 16 insertions, 0 deletions
diff --git a/965/CH3/EX3.6/6.sci b/965/CH3/EX3.6/6.sci
new file mode 100644
index 000000000..b95cbc9e2
--- /dev/null
+++ b/965/CH3/EX3.6/6.sci
@@ -0,0 +1,16 @@
+clc;
+clear all;
+disp("heat transfer rate, temperature")
+r1=0.600/2;// m
+r2=0.18/2;//m
+D=1.8;//m
+L=90;//m
+tp1=180;// degree C
+tp2=12;// degree C
+k=0.45;// W/(m*C)
+
+Sfc=2*3.1416*L/(acosh((D^2-r1^2-r2^2)/(2*r1*r2)));
+Sfc
+Q=k*Sfc*(tp1-tp2);
+
+disp("W",Q,"Heat loss per meter length, Q =")