diff options
Diffstat (limited to '3845/CH14/EX14.9/Ex14_9.sce')
-rw-r--r-- | 3845/CH14/EX14.9/Ex14_9.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/3845/CH14/EX14.9/Ex14_9.sce b/3845/CH14/EX14.9/Ex14_9.sce new file mode 100644 index 000000000..368f2bde2 --- /dev/null +++ b/3845/CH14/EX14.9/Ex14_9.sce @@ -0,0 +1,13 @@ +//Example 14.9
+T1=33;//Person's temperature (C)
+T1=T1+273;//Person's temperature (K)
+T2=22;//Ambient temperature of room (C)
+T2=T2+273;//Ambient temperature of room (K)
+A=1.50;//Surface area of skin (m^2)
+e=0.97;//Emissivity
+sigma=5.67*10^-8;//Stefan-Boltzmann constant (J/s.m^2.K^4)
+rate=sigma*e*A*(T2^4-T1^4);//Rate of radiative heat transfer (J/s)
+printf('Rate of radiative heat transfer = %0.2f W',rate)
+//The answer varies due to round off error
+//Openstax - College Physics
+//Download for free at http://cnx.org/content/col11406/latest
|