1 files changed, 16 insertions, 0 deletions
diff --git a/965/CH2/EX2.78/78.sci b/965/CH2/EX2.78/78.sci
new file mode 100644
index 000000000..47dae472c
--- /dev/null
+++ b/965/CH2/EX2.78/78.sci
@@ -0,0 +1,16 @@
+clc;
+clear all;
+disp("Heat transfer coefficient")
+L=2/100;//m thickness of slab
+qg=7*10^(6);// W/m^3
+k=26;// W/(m*C)
+tmax=180;// degree C
+ta=30;//degree C
+
+//tmax=qg*(L/(2*h)+L*L/(8*k))+ta
+delT=tmax-ta;
+X=delT/qg;
+Y=X-L*L/(8*k);
+Z=L/(2*Y);
+h=Z;
+disp("W/(m^2*C)",h,"heat transfer coefficient h = ")