summaryrefslogtreecommitdiff
path: root/555/CH6/EX6.6/6.sce
diff options
context:
space:
mode:
Diffstat (limited to '555/CH6/EX6.6/6.sce')
-rw-r--r--555/CH6/EX6.6/6.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/555/CH6/EX6.6/6.sce b/555/CH6/EX6.6/6.sce
new file mode 100644
index 000000000..dcb734622
--- /dev/null
+++ b/555/CH6/EX6.6/6.sce
@@ -0,0 +1,17 @@
+// Implementation of example 6.6
+// Basic and Applied Thermodynamics by P.K.Nag
+
+clc
+clear
+
+//Energy collected by plate per unit area E
+//Temperature of plate T1, Atmospheric temperature T2
+T1 = 90+273;//K
+T2 = 20+273;//K
+W = 1;//kJ/s
+E = 1880;//kJ/m^2 h
+nmax = 1 - T2/T1;
+Qmin = W/nmax;
+A = Qmin*3600/E;
+printf('Minimum Area of collector required, A = %0.0f m^2',A);
+// end \ No newline at end of file