summaryrefslogtreecommitdiff
path: root/965/CH2/EX2.22
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.22
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.22')
-rw-r--r--965/CH2/EX2.22/22.sci23
1 files changed, 23 insertions, 0 deletions
diff --git a/965/CH2/EX2.22/22.sci b/965/CH2/EX2.22/22.sci
new file mode 100644
index 000000000..e33ce024e
--- /dev/null
+++ b/965/CH2/EX2.22/22.sci
@@ -0,0 +1,23 @@
+clc;
+clear all;
+disp("upper surface temperature")
+thf=1020;// temperature of hot gases
+L=1.2*10^(-3);// thickness of blade
+k=12;//W/(m*C)
+A=1;// area
+hhf=2750;//W/(m^2*C) heat transfer coefficients
+hcf=1400;//W/(m^2*C) heat transfer coefficients
+t1=900;// temperature of the upper surface
+Q=hhf*A*(thf-t1);//W/m^2 rate of heat transfer per unit area
+disp ("W/m^2",Q,"rate of heat transfer per unit area = ")
+//Q=k*A*(t1-t2)/L;
+t2=t1-(Q*L/(k*A));
+disp("degree C",t2,"t2 is =")
+//Q=hcf*A*(t2-tcf)
+tcf=t2-(Q/(hcf*A));
+disp("degree C",tcf,"tcf is =")
+
+
+
+
+