summaryrefslogtreecommitdiff
path: root/3685/CH6
diff options
context:
space:
mode:
Diffstat (limited to '3685/CH6')
-rw-r--r--3685/CH6/EX6.1/Ex6_1.sce12
-rw-r--r--3685/CH6/EX6.1/Ex6_1.txt3
-rw-r--r--3685/CH6/EX6.2/Ex6_2.sce9
-rw-r--r--3685/CH6/EX6.2/Ex6_2.txt2
-rw-r--r--3685/CH6/EX6.3/Ex6_3.sce35
-rw-r--r--3685/CH6/EX6.3/Ex6_3.txt9
-rw-r--r--3685/CH6/EX6.5/Ex6_5.sce8
-rw-r--r--3685/CH6/EX6.5/Ex6_5.txt2
-rw-r--r--3685/CH6/EX6.6/Ex6_6.sce14
-rw-r--r--3685/CH6/EX6.6/Ex6_6.txt2
-rw-r--r--3685/CH6/EX6.7/Ex6_7.sce9
-rw-r--r--3685/CH6/EX6.7/Ex6_7.txt3
12 files changed, 108 insertions, 0 deletions
diff --git a/3685/CH6/EX6.1/Ex6_1.sce b/3685/CH6/EX6.1/Ex6_1.sce
new file mode 100644
index 000000000..913e36b47
--- /dev/null
+++ b/3685/CH6/EX6.1/Ex6_1.sce
@@ -0,0 +1,12 @@
+clc
+T1 = 800 // Source temperature in degree Celsius
+T2 = 30 // Sink temperature in degree Celsius
+e_max = 1-((T2+273)/(T1+273)) // maximum possible efficiency
+Wnet = 1 // in kW
+Q1 = Wnet/e_max // Least rate of heat required in kJ/s
+Q2 = Q1-Wnet // Least rate of heat rejection kJ/s
+
+printf("\n Example 6.1")
+printf("\n Least rate of heat rejection is %f kW",Q2)
+//The answers vary due to round off error
+
diff --git a/3685/CH6/EX6.1/Ex6_1.txt b/3685/CH6/EX6.1/Ex6_1.txt
new file mode 100644
index 000000000..7f6bbcd84
--- /dev/null
+++ b/3685/CH6/EX6.1/Ex6_1.txt
@@ -0,0 +1,3 @@
+
+ Example 6.1
+ Least rate of heat rejection is 0.393506 kW \ No newline at end of file
diff --git a/3685/CH6/EX6.2/Ex6_2.sce b/3685/CH6/EX6.2/Ex6_2.sce
new file mode 100644
index 000000000..512dfdf2c
--- /dev/null
+++ b/3685/CH6/EX6.2/Ex6_2.sce
@@ -0,0 +1,9 @@
+clc
+T1 = -15 // Source temperature in degree Celsius
+T2 = 30 // Sink temperature in degree Celsius
+Q2 = 1.75 // in kJ/sec
+printf("\n Example 6.2")
+W= Q2*((T2+273)-(T1+273))/(T1+273) // Least Power necessary to pump the heat out
+ printf("\n Least Power necessary to pump the heat out is %f kW",W)
+//The answers vary due to round off error
+
diff --git a/3685/CH6/EX6.2/Ex6_2.txt b/3685/CH6/EX6.2/Ex6_2.txt
new file mode 100644
index 000000000..9e10bf72c
--- /dev/null
+++ b/3685/CH6/EX6.2/Ex6_2.txt
@@ -0,0 +1,2 @@
+ Example 6.2
+ Least Power necessary to pump the heat out is 0.305233 kW \ No newline at end of file
diff --git a/3685/CH6/EX6.3/Ex6_3.sce b/3685/CH6/EX6.3/Ex6_3.sce
new file mode 100644
index 000000000..852f4bda8
--- /dev/null
+++ b/3685/CH6/EX6.3/Ex6_3.sce
@@ -0,0 +1,35 @@
+clc
+//Given
+T1 = 600 // Source temperature of heat engine in degree Celsius
+T2 = 40 // Sink temperature of heat engine in degree Celsius
+T3 = -20 // Source temperature of refrigerator in degree Celsius
+Q1 = 2000 // Heat transfer to heat engine in kJ
+W = 360 // Net work output of plant in kJ
+// Part (a)
+e_max = 1-((T2+273)/(T1+273)) // maximum efficiency
+W1 = e_max*Q1 // maximum work output
+COP = (T3+273)/((T2-273)-(T3-273)) // coefficient of performance of refrigerator
+W2 = W1-W // work done to drive refrigerator
+Q4 = COP*W2 // Heat extracted by refrigerator
+Q3 = Q4+W2 // Heat rejected by refrigerator
+Q2 = Q1-W1 // Heat rejected by heat engine
+Qt = Q2+Q3 // combined heat rejection by heat engine and refrigerator
+printf("\n Example 6.3")
+printf("\n\n Part A:")
+printf("\n The heat transfer to refrigerant is %d kJ",Q2)
+printf("\n The heat rejection to the 40 degree reservoir is %f kJ",Qt)
+
+// Part (b)
+printf("\n\n Part B:")
+e_max_ = 0.4*e_max // maximum efficiency
+W1_ = e_max_*Q1 // maximum work output
+W2_ = W1_-W // work done to drive refrigerator
+COP_ = 0.4*COP // coefficient of performance of refrigerator
+Q4_ = COP_*W2_ // Heat extracted by refrigerator
+Q3_ = Q4_+W2_ // Heat rejected by refrigerator
+Q2_ = Q1-W1_ // Heat rejected by heat engine
+QT = Q2_+Q3_// combined heat rejection by heat engine and refrigerator
+printf("\n The heat transfer to refrigerant is %f kJ",Q2_)
+printf("\n The heat rejection to the 40 degree reservoir is %f kJ",QT)
+//The answers vary due to round off error
+
diff --git a/3685/CH6/EX6.3/Ex6_3.txt b/3685/CH6/EX6.3/Ex6_3.txt
new file mode 100644
index 000000000..32b8a5a9b
--- /dev/null
+++ b/3685/CH6/EX6.3/Ex6_3.txt
@@ -0,0 +1,9 @@
+ Example 6.3
+
+ Part A:
+ The heat transfer to refrigerant is 717 kJ
+ The heat rejection to the 40 degree reservoir is 5531.698358 kJ
+
+ Part B:
+ The heat transfer to refrigerant is 1486.827033 kJ
+ The heat rejection to the 40 degree reservoir is 1898.351737 kJ \ No newline at end of file
diff --git a/3685/CH6/EX6.5/Ex6_5.sce b/3685/CH6/EX6.5/Ex6_5.sce
new file mode 100644
index 000000000..b04d362cd
--- /dev/null
+++ b/3685/CH6/EX6.5/Ex6_5.sce
@@ -0,0 +1,8 @@
+clc
+T1 = 473 // Boiler temperature in K
+T2 = 293 // Home temperature in K
+T3 = 273 // Outside temperature in K
+printf("\n Example 6.5")
+MF = (T2*(T1-T3))/(T1*(T2-T3))
+printf("\n The multiplication factor is %f ",MF)
+//The answers vary due to round off error
diff --git a/3685/CH6/EX6.5/Ex6_5.txt b/3685/CH6/EX6.5/Ex6_5.txt
new file mode 100644
index 000000000..984fe1194
--- /dev/null
+++ b/3685/CH6/EX6.5/Ex6_5.txt
@@ -0,0 +1,2 @@
+ Example 6.5
+ The multiplication factor is 6.194503 \ No newline at end of file
diff --git a/3685/CH6/EX6.6/Ex6_6.sce b/3685/CH6/EX6.6/Ex6_6.sce
new file mode 100644
index 000000000..63c61276c
--- /dev/null
+++ b/3685/CH6/EX6.6/Ex6_6.sce
@@ -0,0 +1,14 @@
+clc
+T1 = 90 // Operating temperature of power plant in degree Celsius
+T2 = 20 // Atmospheric temperature in degree Celsius
+W = 1 // Power production from power plant in kW
+E = 1880 // Capability of energy collection in kJ/m^2 h
+
+printf("\n Example 6.6")
+e_max = 1-((T2+273)/(T1+273)) // maximum efficiency
+Qmin = W/e_max // Minimum heat requirement per second
+Qmin_ = Qmin*3600 // Minimum heat requirement per hour
+Amin = Qmin_/E // Minimum area requirement
+printf("\n Minimum area required for the collector plate is %d m^2",ceil(Amin))
+
+
diff --git a/3685/CH6/EX6.6/Ex6_6.txt b/3685/CH6/EX6.6/Ex6_6.txt
new file mode 100644
index 000000000..2420c711c
--- /dev/null
+++ b/3685/CH6/EX6.6/Ex6_6.txt
@@ -0,0 +1,2 @@
+ Example 6.6
+ Minimum area required for the collector plate is 10 m^2 \ No newline at end of file
diff --git a/3685/CH6/EX6.7/Ex6_7.sce b/3685/CH6/EX6.7/Ex6_7.sce
new file mode 100644
index 000000000..1b5e004ed
--- /dev/null
+++ b/3685/CH6/EX6.7/Ex6_7.sce
@@ -0,0 +1,9 @@
+clc
+T1 = 1000 // Temperature of hot reservoir in K
+W = 1000 // Power requirement in kW
+K = 5.67e-08 // constant
+printf("\n Example 6.7")
+Amin = (256*W)/(27*K*T1^4) // minimum area required
+printf("\n Area of the panel %f m^2",Amin)
+
+
diff --git a/3685/CH6/EX6.7/Ex6_7.txt b/3685/CH6/EX6.7/Ex6_7.txt
new file mode 100644
index 000000000..64e8d1f15
--- /dev/null
+++ b/3685/CH6/EX6.7/Ex6_7.txt
@@ -0,0 +1,3 @@
+
+ Example 6.7
+ Area of the panel 0.167222 m^2 \ No newline at end of file