summaryrefslogtreecommitdiff
path: root/3845/CH14/EX14.9/Ex14_9.sce
diff options
context:
space:
mode:
Diffstat (limited to '3845/CH14/EX14.9/Ex14_9.sce')
-rw-r--r--3845/CH14/EX14.9/Ex14_9.sce13
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