From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books
---
572/CH9/EX9.7/c9_7.sce | 27 +++++++++++++++++++++++++++
1 file changed, 27 insertions(+)
create mode 100755 572/CH9/EX9.7/c9_7.sce
(limited to '572/CH9/EX9.7/c9_7.sce')
diff --git a/572/CH9/EX9.7/c9_7.sce b/572/CH9/EX9.7/c9_7.sce
new file mode 100755
index 000000000..12b4230c9
--- /dev/null
+++ b/572/CH9/EX9.7/c9_7.sce
@@ -0,0 +1,27 @@
+//(9.7) A regenerator is incorporated in the cycle of Example 9.4. (a) Determine the thermal efficiency for a regenerator effectiveness of 80%. (b) Plot the thermal efficiency versus regenerator effectiveness ranging from 0 to 80%.
+
+//solution
+
+
+//part(a)
+etareg = .8 //regenerator effectiveness of 80%.
+//from example 9.4
+h1 = 300.19 //in kj/kg
+h2 = 579.9 //in kj/kg
+h3 = 1515.4 //in kj/kg
+h4 = 808.5 //in kj/kg
+
+hx = etareg*(h4-h2)+h2 //in kj/kg
+eta = ((h3-h4)- (h2-h1))/(h3-hx) //thermal efficiency
+printf('the thermal efficiency is: %f',eta)
+
+//part(b)
+etareg = linspace(0,.8,50)
+for i= 1:50
+ hx(1,i) = etareg(1,i)*(h4-h2)+h2
+end
+for i = 1:50
+ eta(1,i) = ((h3-h4)- (h2-h1))/(h3-hx(1,i))
+end
+plot(etareg,eta)
+xtitle("","Regenerator effectiveness","Thermal efficiency")
\ No newline at end of file
--
cgit