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

---
 3685/CH19/EX19.8/Ex19_8.sce | 22 ++++++++++++++++++++++
 3685/CH19/EX19.8/Ex19_8.txt |  7 +++++++
 2 files changed, 29 insertions(+)
 create mode 100644 3685/CH19/EX19.8/Ex19_8.sce
 create mode 100644 3685/CH19/EX19.8/Ex19_8.txt

(limited to '3685/CH19/EX19.8')

diff --git a/3685/CH19/EX19.8/Ex19_8.sce b/3685/CH19/EX19.8/Ex19_8.sce
new file mode 100644
index 000000000..9ab250626
--- /dev/null
+++ b/3685/CH19/EX19.8/Ex19_8.sce
@@ -0,0 +1,22 @@
+clc
+// Given that
+V = 4 // Volume flow rate in m^3/min
+p1 = 1.013 // Pressure in bar
+t1 = 15 // Temperature in degree centigrade
+N = 250 // Speed in RPM
+p4 = 80// Delivery pressure in bar
+v = 3 //Speed of piston in m/sec
+n_mech = .75 // Mechanical efficiency 
+n_vol = .8 // Volumetric efficiency
+n = 1.25 // Polytropic index
+printf("\n Example 19.8\n")
+T1 = t1+273
+p2 = sqrt(p1*p4)
+W = (2*n/(n-1))*(p1*100/n_mech)*(V/60)*((p2/p1)^((n-1)/n) - 1)
+L = v*60/(N*2)
+Vs = V/N
+D_LP = sqrt(Vs*V/(%pi*L*n_vol))
+D_HP = D_LP*sqrt(p1/p2)
+printf("\n Minimum power required by the compressure is %f kW,\n Bore of the compressure in low pressure side is %f cm,\n Bore of the compressure in high pressure side is %f cm,\n Stroke of the compressure is %d cm",W,D_LP*100,D_HP*100,L*100)
+//The answers vary due to round off error
+
diff --git a/3685/CH19/EX19.8/Ex19_8.txt b/3685/CH19/EX19.8/Ex19_8.txt
new file mode 100644
index 000000000..5a15c6210
--- /dev/null
+++ b/3685/CH19/EX19.8/Ex19_8.txt
@@ -0,0 +1,7 @@
+ 
+ Example 19.8
+
+ Minimum power required by the compressure is 49.337005 kW,
+ Bore of the compressure in low pressure side is 26.596152 cm,
+ Bore of the compressure in high pressure side is 8.921722 cm,
+ Stroke of the compressure is 36 cm 
\ No newline at end of file
-- 
cgit