diff options
Diffstat (limited to '587/CH13/EX13.11/example13_11.sce')
-rwxr-xr-x | 587/CH13/EX13.11/example13_11.sce | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/587/CH13/EX13.11/example13_11.sce b/587/CH13/EX13.11/example13_11.sce new file mode 100755 index 000000000..16b12ad01 --- /dev/null +++ b/587/CH13/EX13.11/example13_11.sce @@ -0,0 +1,11 @@ +clear;
+clc;
+
+//Example13.11[Radiation Shields]
+//given:-
+e=0.1;//Emissivity of aluminium sheet
+T1=800,T2=500;//Temperatures of two parallel plates[K]
+e1=0.2,e2=0.7;//Emissivities of plates
+//So9lution:-
+q12=((5.67*10^(-8))*((T1^4)-(T2^4)))/((1/e1)+(1/e2)-1+(1/e)+(1/e)-1);//[W/m^2]
+disp("W/m^2",round(q12),"Radiation Heat Transfer")
|