diff options
Diffstat (limited to '1073/CH4/EX4.19')
| -rwxr-xr-x | 1073/CH4/EX4.19/4_19.sce | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/1073/CH4/EX4.19/4_19.sce b/1073/CH4/EX4.19/4_19.sce new file mode 100755 index 000000000..97c6bcd66 --- /dev/null +++ b/1073/CH4/EX4.19/4_19.sce @@ -0,0 +1,11 @@ +
+clc;
+clear;
+//Example 4.19
+sigma=5.67*10^-8 //[W/sq m.K^4]
+A1=0.5*1 //[sq m]
+F12=0.285
+T1=1273 ///[K]
+T2=773 //[K]
+Q=sigma*A1*F12*(T1^4-T2^4) //[W]
+printf("\n Net radiant heat exchange between plates is %d W",Q);
|