initial commit / add all books

1 files changed, 22 insertions, 0 deletions

diff --git a/1752/CH7/EX7.6/exa_7_6.sce b/1752/CH7/EX7.6/exa_7_6.sce
new file mode 100755
index 000000000..97bb715d0
--- /dev/null
+++ b/1752/CH7/EX7.6/exa_7_6.sce
@@ -0,0 +1,22 @@
+//Exa 7.6

+clc;

+clear;

+close;

+//given data

+d=20*10^-2;//diameter of pipe in m

+l=1;// length of pipe in m

+s=30*10^-2;// side of duct in m

+A1=%pi*d*l;// area of pipe in m^2

+A2=4*s*s;// area of duct in m^2

+epsilon1=0.8;

+epsilon2=0.9;

+T1=200+273;// in K

+T2=20+273;// in K

+// Formula Fg12=1/((1/epsilon1+(1/epsilon2-1)*A1/A2))

+Fg12=1/((1/epsilon1+(1/epsilon2-1)*A1/A2));

+// Heat transfer rate between pipe and duct

+sigma=5.67*10^-8;

+q12=sigma*Fg12*A1*(T1^4-T2^4);// in W

+disp(q12,"Heat transfer rate between pipe and duct in W");

+

+//Note: Answer in the book is wrong
\ No newline at end of file