diff options
Diffstat (limited to '2175/CH16/EX16.25/16_25.sce')
-rwxr-xr-x | 2175/CH16/EX16.25/16_25.sce | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/2175/CH16/EX16.25/16_25.sce b/2175/CH16/EX16.25/16_25.sce new file mode 100755 index 000000000..86d80ec25 --- /dev/null +++ b/2175/CH16/EX16.25/16_25.sce @@ -0,0 +1,17 @@ +clc;
+eta=0.8;
+F1_2=5.67*10^-8;
+T1=533;//K
+T2=293;//K
+alpha=eta*F1_2*(T1^2+T2^2)*(T1+T2);
+
+A=%pi*0.6*0.9;
+Q1=alpha*A*(T1-T2);
+
+alpha=8.8;
+A=5;
+Q2=alpha*A*(T1-T2);
+
+Q=Q1+Q2;
+disp("total heat loss is:");
+disp("kW",Q/1000)
|