summaryrefslogtreecommitdiff
path: root/551/CH15/EX15.32
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /551/CH15/EX15.32
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 '551/CH15/EX15.32')
-rwxr-xr-x551/CH15/EX15.32/32.sce22
1 files changed, 22 insertions, 0 deletions
diff --git a/551/CH15/EX15.32/32.sce b/551/CH15/EX15.32/32.sce
new file mode 100755
index 000000000..dbb3932db
--- /dev/null
+++ b/551/CH15/EX15.32/32.sce
@@ -0,0 +1,22 @@
+clc
+e1=0.3;
+e2=0.8;
+e3=0.04;
+A1=1; //m^2
+A2=A1;
+A3=A1;
+
+// (E_b1 - E_b3)/[(1-e1)/e1+1+(1-e3)/e3]=(E_b3 - E_b2)/[(1-e3)/e3+1+(1-e2)/e2]
+
+// a*(T1^4-T3^4)/(1/e1+1/e3-1)=a*(T3^4-T2^4)/(1/e3+1/e2-1)
+
+// T3^4=0.48*(T1^4+1.08*T2^4)
+
+// Q12=a*(T1^4-T2^4)/(1/e1+1/e2-1)
+// Q13=a*(T1^4-T3^4)/(1/e1+1/e3-1)
+
+// %reduction=(Q_12-Q13)/Q12;
+%reduction=1-0.131*0.52;
+disp("Percentage reduction in heat flow due to shield =")
+disp(%reduction)
+disp("%") \ No newline at end of file