1 files changed, 20 insertions, 0 deletions
diff --git a/2870/CH2/EX2.19/Ex2_19.sce b/2870/CH2/EX2.19/Ex2_19.sce
new file mode 100755
index 000000000..cb6972908
--- /dev/null
+++ b/2870/CH2/EX2.19/Ex2_19.sce
@@ -0,0 +1,20 @@
+clc;clear;
+//Example 2.19
+
+//constants used
+e=.95;//Emissivity
+tc=5.67*10^-8;//thermal conductivity in W/m^2 K^4
+
+//given values
+h=6;
+A=1.6;
+Ts=29;
+Tf=20;
+
+//calculation
+//convection rate
+Q1=h*A*(Ts-Tf);
+//radiation rate
+Q2=e*tc*A*((Ts+273)^4-(Tf+273)^4)
+Qt=Q1+Q2;
+disp(Qt,'the total rate of heat transfer in W')