summaryrefslogtreecommitdiff
path: root/1752/CH1/EX1.6
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1752/CH1/EX1.6
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/CH1/EX1.6')
-rwxr-xr-x1752/CH1/EX1.6/exa_1_6.sce25
1 files changed, 25 insertions, 0 deletions
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 :")
+
+
+