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

---
 779/CH8/EX8.12/8_12.sce | 35 +++++++++++++++++++++++++++++++++++
 1 file changed, 35 insertions(+)
 create mode 100755 779/CH8/EX8.12/8_12.sce

(limited to '779/CH8/EX8.12')

diff --git a/779/CH8/EX8.12/8_12.sce b/779/CH8/EX8.12/8_12.sce
new file mode 100755
index 000000000..1c8db2fff
--- /dev/null
+++ b/779/CH8/EX8.12/8_12.sce
@@ -0,0 +1,35 @@
+Qr = 500; // Heat release in kW
+Tr = 2000;
+T0 = 300;
+// Part (a)
+Qa = 480; Ta = 1000;
+n1a = (Qa/Qr);
+n2a = n1a*(1-(T0/Ta))/(1-(T0/Tr));
+disp("PART (A)")
+disp("%",n1a*100,"The first law efficiency is")
+disp("%",n2a*100,"The Second law efficiency is")
+// Part (b)
+Qb = 450; Tb = 500;
+n1b = (Qb/Qr);
+n2b = n1b*(1-(T0/Tb))/(1-(T0/Tr));
+disp("PART (B)")
+disp("%",n1b*100,"The first law efficiency is")
+disp("%",n2b*100,"The Second law efficiency is")
+// Part (c)
+Qc = 300; Tc = 320;
+n1c = (Qc/Qr);
+n2c = n1c*(1-(T0/Tc))/(1-(T0/Tr));
+disp("PART (C)")
+disp("%",n1c*100,"The first law efficiency is")
+disp("%",n2c*100,"The Second law efficiency is")
+// Part (d)
+Qd = 450; 
+n1d = (Qd/Qr);
+n2a_= n1d*(1-(T0/Ta))/(1-(T0/Tr));
+n2b_= n1d*(1-(T0/Tb))/(1-(T0/Tr));
+n2c_= n1d*(1-(T0/Tc))/(1-(T0/Tr));
+disp("Part (D)")
+disp("%",n1d*100,"The first law efficiency is")
+disp("%",n2a_*100,"The Second law efficiency of part (a) is")
+disp("%",n2b_*100,"The Second law efficiency of part (b) is")
+disp("%",n2c_*100,"The Second law efficiency of part (c) is")
\ No newline at end of file
-- 
cgit