summaryrefslogtreecommitdiff
path: root/1752/CH6/EX6.7/exa6_7.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1752/CH6/EX6.7/exa6_7.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 '1752/CH6/EX6.7/exa6_7.sce')
-rwxr-xr-x1752/CH6/EX6.7/exa6_7.sce24
1 files changed, 24 insertions, 0 deletions
diff --git a/1752/CH6/EX6.7/exa6_7.sce b/1752/CH6/EX6.7/exa6_7.sce
new file mode 100755
index 000000000..c7130ca23
--- /dev/null
+++ b/1752/CH6/EX6.7/exa6_7.sce
@@ -0,0 +1,24 @@
+//Exa 6.7
+clc;
+clear;
+close;
+//given data
+L=3;// in m
+delta=0;
+hx='10*x^(-1/4)'
+// (a) Average heat transfer coefficient
+h=1/L*integrate(hx,'x',delta,L);
+disp("(a) Average heat transfer coefficient is : "+string(h)+" W/m^2K")
+
+// (b) Heat transfer rate
+A=3*.3;// in m^2
+Tp=170;// plate temp. in degree C
+Tg=30;// gas temp. in degree C
+del_T=Tp-Tg;
+q=h*A*del_T;// in W
+disp("(b) Heat transfer rate is : "+string(q)+" W")
+
+// (c)
+x=2;// in m
+qx_by_A= 10*x^(-1/4)*(Tp-Tg);
+disp("Local heat flux 2 m from the leading edge is : "+string(qx_by_A)+" W/m^2");