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

---
 2504/CH6/EX6.5/6_5.sce | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)
 create mode 100755 2504/CH6/EX6.5/6_5.sce

(limited to '2504/CH6/EX6.5/6_5.sce')

diff --git a/2504/CH6/EX6.5/6_5.sce b/2504/CH6/EX6.5/6_5.sce
new file mode 100755
index 000000000..bc9360600
--- /dev/null
+++ b/2504/CH6/EX6.5/6_5.sce
@@ -0,0 +1,28 @@
+clc
+//initialisation of variables
+clear
+r= 1.4
+ma2= 2.5 //ft/sec
+g= 32.17 //ft/sec^2
+p2= 1 //lbf/in^2
+ps= 17.08 //lbf/in^2
+ps2= 75 //lbf/in^2
+Ts= 720 //R
+R= 53.3 //lbf ft/lbm
+A= 4 //ft^2
+ps3= 0.4 //lbf/in^2
+A2= 0.685 //ft^2
+P= 5 //per cent
+//CALCULATIONS
+R1= (1+0.5*(r-1)*ma2^2)^(r/(r-1))
+R2= (2*(r/(r-1))*(p2/ps)^(2/(r))*(1-(p2/ps)^((r-1)/r)))^0.5
+m2= R2*ps2*144*(g/(R*Ts))^0.5*0.1
+m= m2*A
+At= A*R2/A2
+m1= m*(1-(P/100))
+mrp= (1-(P/100))*R2
+//RESULTS
+printf ('Mass flow rate= %.1f lbm/sec',m)
+printf ('\n Area of throat= %.3f ft^2',At)
+printf ('\n Mass flow rate= %.1f lbm/sec',m1)
+printf ('\n Mass flow rate parameter = %.4f',mrp)
-- 
cgit