summaryrefslogtreecommitdiff
path: root/1073/CH4/EX4.6/4_6.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1073/CH4/EX4.6/4_6.sce
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 '1073/CH4/EX4.6/4_6.sce')
-rwxr-xr-x1073/CH4/EX4.6/4_6.sce18
1 files changed, 18 insertions, 0 deletions
diff --git a/1073/CH4/EX4.6/4_6.sce b/1073/CH4/EX4.6/4_6.sce
new file mode 100755
index 000000000..9f41ff8cb
--- /dev/null
+++ b/1073/CH4/EX4.6/4_6.sce
@@ -0,0 +1,18 @@
+
+clc;
+clear;
+//EXample 4.6
+sigma=5.67*10^-8 //[W/m^2.K^4]
+e1=0.79;
+e2=0.93;
+T1=500 ; //[K]
+T2=300 ; //[K]
+D=70 //[mm]
+D=D/1000 //[m]
+L=3 //[m]
+W=0.3 //Side of conduit [m]
+A1=%pi*D*L //[sq m]
+A1=0.659 //Approximate calculation in book in [m^2]
+A2=4*(L*W) //[sq m]
+Q=sigma*A1*(T1^4-T2^4)/(1/e1+((A1/A2)*(1/e2-1))) //[W]
+printf("\n Heat lost by radiation is %f W",Q);