summaryrefslogtreecommitdiff
path: root/965/CH2/EX2.40/40.sci
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /965/CH2/EX2.40/40.sci
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '965/CH2/EX2.40/40.sci')
-rw-r--r--965/CH2/EX2.40/40.sci26
1 files changed, 26 insertions, 0 deletions
diff --git a/965/CH2/EX2.40/40.sci b/965/CH2/EX2.40/40.sci
new file mode 100644
index 000000000..e499875ed
--- /dev/null
+++ b/965/CH2/EX2.40/40.sci
@@ -0,0 +1,26 @@
+clc;
+clear all;
+disp("heat loss per hour")
+r1=120;//mm
+r2=r1+50;//mm
+r3=r2+40;//mm
+kA=0.092;//W/(m*C)
+kB=0.062;//W/(m*C)
+t1=390;// degree C
+t3=40;// degree C
+L=210;//m
+Q1=2*3.1416*L*(t1-t3)/((log(r2/r1))/kA+(log (r3/r2))/kB);
+Q=(3600/1000)*2*3.1416*L*(t1-t3)/((log(r2/r1))/kA+(log (r3/r2))/kB);
+disp("kJ/hr",Q,"total heat loss per hour =")
+X=2*3.1416*r1*L
+qp=Q*1000/X;
+disp("kJ/(m^2*hr)",qp,"total heat loss per m^2 of pipe surface =")
+
+qo=Q*1000/(2*3.1416*r3*L);
+disp("kJ/(m^2*hr)",qo,"total heat loss per m^2 of outer surface =")
+
+//Q=2*3.1416*L(t1-t2)/(log(r2/r1)/kA)
+t2=t1-Q1/(2*3.1416*L/(log(r2/r1)/kA));
+disp ("degree C",t2,"temperature between two layers =")
+
+