From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 3511/CH6/EX6.6/Ex6_6.sce | 23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)
 create mode 100644 3511/CH6/EX6.6/Ex6_6.sce

(limited to '3511/CH6/EX6.6/Ex6_6.sce')

diff --git a/3511/CH6/EX6.6/Ex6_6.sce b/3511/CH6/EX6.6/Ex6_6.sce
new file mode 100644
index 000000000..644f9b9b9
--- /dev/null
+++ b/3511/CH6/EX6.6/Ex6_6.sce
@@ -0,0 +1,23 @@
+clc;
+rp=11.3137; // Pressure ratio
+WN=0; // Net work output
+Q=476.354; // Heat added per kg of air mass in kJ
+T01=300; // Inlet air total temperature in kelvin
+eff_T=0.71; // turbine efficiency
+Cpa=1.005;// Specific heat of air  at constant pressure in kJ/kg K
+Cpg=1.147;// Specific heat of fuel at constant pressure in kJ/kg K
+rg=1.33;// Specific heat ratio of fuel
+r=1.4; // Specific heat ratio of air
+
+T_02=T01*rp^((r-1)/r);
+T03_T02=Q/Cpa;
+T03_T_04=rp^((r-1)/r);
+T04_T03=1-(eff_T*(1/T03_T_04)*(T03_T_04-1));
+T04=T01+(T03_T02);
+T03=T04/T04_T03;
+t=T03/T01; //Temperature ratio
+T02=T03-T03_T02;
+eff_C=(T_02-T01)/(T02-T01); // Compressor efficiency
+
+disp ("%",eff_C*100,"Compressor Efficiency = ",);
+disp (t,"Temperature ratio = ");
-- 
cgit