summaryrefslogtreecommitdiff
path: root/534/CH12/EX12.11/12_11_Solar_Collector.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /534/CH12/EX12.11/12_11_Solar_Collector.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 '534/CH12/EX12.11/12_11_Solar_Collector.sce')
-rw-r--r--534/CH12/EX12.11/12_11_Solar_Collector.sce28
1 files changed, 28 insertions, 0 deletions
diff --git a/534/CH12/EX12.11/12_11_Solar_Collector.sce b/534/CH12/EX12.11/12_11_Solar_Collector.sce
new file mode 100644
index 000000000..645ac0b7b
--- /dev/null
+++ b/534/CH12/EX12.11/12_11_Solar_Collector.sce
@@ -0,0 +1,28 @@
+clear;
+clc;
+printf('FUNDAMENTALS OF HEAT AND MASS TRANSFER \n Incropera / Dewitt / Bergman / Lavine \n EXAMPLE 12.11 Page 774 \n')// Example 12.11
+
+// Useful heat removal rate per unit area
+// Efficiency of the collector
+
+Ts = 120+273; //[K] temperature of surface
+Gs = 750; //[W/m^2] Solar irradiation
+Tsky = -10+273; //[K] Temperature of Sky
+Tsurr = 30+273; //[K] Temperature os surrounding Air
+e = .1 ;// emissivity
+as = .95 ;// Absorptivity of Surface
+asky = e ;// Absorptivity of Sky
+stfncnstt = 5.67*10^-8; //[W/m^2.K^4] Stefan-Boltzmann constant
+h = 0.22*(Ts - Tsurr)^.3334 ;//[W/m^2.K] Convective Heat transfer Coeff
+//From equation 12.67
+Gsky = stfncnstt*Tsky^4; //[W/m^2] Irradiadtion from sky
+qconv = h*(Ts-Tsurr); //[W/m^2] Convective Heat transfer
+E = e*stfncnstt*Ts^4; //[W/m^2] Irradiadtion from Surface
+
+//From energy Balance
+q = as*Gs + asky*Gsky - qconv - E;
+
+//Collector efficiency
+eff = q/Gs;
+
+printf('\n Useful heat removal rate per unit area by Energy Conservation = %i W/m^2 \n Collector efficiency defined as the fraction of solar irradiation extracted as useful energy is %.2f',q,eff); \ No newline at end of file