From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 1752/CH1/EX1.6/exa_1_6.sce | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)
 create mode 100755 1752/CH1/EX1.6/exa_1_6.sce

(limited to '1752/CH1/EX1.6')

diff --git a/1752/CH1/EX1.6/exa_1_6.sce b/1752/CH1/EX1.6/exa_1_6.sce
new file mode 100755
index 000000000..9a706e8ba
--- /dev/null
+++ b/1752/CH1/EX1.6/exa_1_6.sce
@@ -0,0 +1,25 @@
+//Exa 1.6
+clc;
+clear;
+close
+// given data
+T1=50;// in degree C
+T1=T1+273;// in K
+T2=20;// in degree C
+T2=T2+273;// in K
+d=5*10^-2;//in m
+h=6.5;// in W/m^2K
+l=1;//in meter
+epsilon=0.8;
+sigma=5.67*10^-8;
+A=%pi*d*l;// in Square meter
+q_conv = h*A*(T1-T2);// in W/m
+disp(q_conv,"The heat loss by convection in W/m")
+// formula q= sigma*A*F_g12*(T1^4-T2^4) = sigma*A*epsilon*(T1^4-T2^4)    (since A1<<A2, so F_g12=epsilon)
+q_rad = sigma*A*epsilon*(T1^4-T2^4);// in W/m
+disp(q_rad," Heat loss by radiation in W/m")
+q_total= q_conv+q_rad;
+disp(q_total,"Total heat loss in W/m is :")
+
+
+
-- 
cgit