diff options
author | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
---|---|---|
committer | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
commit | 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch) | |
tree | dbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /965/CH2/EX2.23 | |
parent | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff) | |
download | Scilab-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.23')
-rw-r--r-- | 965/CH2/EX2.23/23.sci | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/965/CH2/EX2.23/23.sci b/965/CH2/EX2.23/23.sci new file mode 100644 index 000000000..c15db4cce --- /dev/null +++ b/965/CH2/EX2.23/23.sci @@ -0,0 +1,29 @@ +clc;
+clear all;
+disp("heat transfer rate")
+A=1;
+thf=100;// temperature of hot fluid
+tcf=25;// temperature of cold fluid
+L=4*10^(-3);// thickness of blade
+k=95.5;//W/(m*C)
+hhf=14500;//W/(m^2*C) heat transfer coefficients
+hcf=2250;//W/(m^2*C) heat transfer coefficients
+Rthhf=(1/hhf);
+Rthcf=(1/hcf);
+Rth12=L/k;
+Rtotal=Rthhf+Rthcf+Rth12;
+q=(thf-tcf)/Rtotal;//W/m^2 rate of heat transfer per unit area
+disp ("W/m^2",q,"i)rate of heat transfer per unit area = ")
+//Q=U*A*(thf-tcf)/L;
+U=q/(A*(thf-tcf));
+disp("W/(m^2*C)",U,"ii)overall heat transfer coefficient =")
+//q=delT/Rhfthhf
+delThf=q*Rthhf;
+disp("degree C",delThf,"temperature drop in vapour film =")
+//q=delT12/Rth12
+delT12=q*Rth12;
+disp("degree C",delT12,"temperature drop in metal =")
+//q=delTcf/Rthcf
+delTcf=q*Rthcf;
+disp("degree C",delTcf,"temperature drop in water film =")
+
|