summaryrefslogtreecommitdiff
path: root/3685/CH7/EX7.10/Ex7_10.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3685/CH7/EX7.10/Ex7_10.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3685/CH7/EX7.10/Ex7_10.sce')
-rw-r--r--3685/CH7/EX7.10/Ex7_10.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/3685/CH7/EX7.10/Ex7_10.sce b/3685/CH7/EX7.10/Ex7_10.sce
new file mode 100644
index 000000000..5bd69334b
--- /dev/null
+++ b/3685/CH7/EX7.10/Ex7_10.sce
@@ -0,0 +1,17 @@
+clc
+A = 5*7 // Area of wall in m^2
+k = 0.71// Thermal conductivity in W/mK
+L = 0.32 // Thickness of wall in m
+Ti = 21 // Room temperature in degree Celsius
+To = 6 // Surrounding temperature in degree Celsius
+printf("\n Example 7.10")
+Q = k*A*(Ti-To)/L // Heat transfer
+Sgen_wall = Q/(To+273) - Q/(Ti+273) // Entropy generation in wall
+printf("\n The rate of heat transfer through the wall is %f W",Q)
+printf("\n The rate of entropy through the wall is %f W/K",Sgen_wall)
+Tr = 27 // Inner surface temperature of wall in degree Celsius
+Ts = 2 // Outer surface temperature of wall in degree Celsius
+Sgen_total = Q/(Ts+273)-Q/(Tr+273) // Total entropy generation in process
+printf("\n The rate of total entropy generation with this heat transfer process is %f W/K",Sgen_total)
+
+