initial commit / add all books

4 files changed, 83 insertions, 0 deletions

diff --git a/2339/CH9/EX9.1.1/Ex9_1.sce b/2339/CH9/EX9.1.1/Ex9_1.sce
new file mode 100755
index 000000000..8afe6593f
--- /dev/null
+++ b/2339/CH9/EX9.1.1/Ex9_1.sce
@@ -0,0 +1,33 @@
+clc
+clear
+
+D=0.3;
+L=0.6;
+N=60;
+Hs=5;
+Hd=10;
+Ep=0.8;
+Qa=0.075;
+
+A=(22/7)*(1/4)*D*D;
+Rho=1000;
+g=9.81;
+
+F1=Rho*g*Hs*A;
+F2=Rho*g*Hd*A;
+
+TF=F1+F2;
+printf('Total Force Required: %2.2f kN',TF/1000);
+printf('\n');
+
+Q=(2*L*A*N)/60;
+Qa=0.075;
+Slip=(Q-Qa)/Q;
+printf('Percentage Slip: %2.2f Percent',Slip*100);
+printf('\n');
+
+Cd=Qa/Q;
+
+P=(Rho*g*Qa*(Hs+Hd))/Ep;
+printf('Power input: %2.2f kW',P/1000);
+printf('\n');
diff --git a/2339/CH9/EX9.2.1/Ex9_2.sce b/2339/CH9/EX9.2.1/Ex9_2.sce
new file mode 100755
index 000000000..21edafb40
--- /dev/null
+++ b/2339/CH9/EX9.2.1/Ex9_2.sce
@@ -0,0 +1,16 @@
+clc

+clear

+

+Qa=0.025;

+Hm=20;

+L=0.4;

+D=0.3;

+

+A=(22/7)*(1/4)*D*D;

+Slip=0.02;

+Q=25/[1000*(1-Slip)];

+

+N=(Q*60)/(L*A);

+

+printf('Speed of Pump: %2.2f RPM',N);

+printf('\n');

diff --git a/2339/CH9/EX9.3.1/Ex9_3.sce b/2339/CH9/EX9.3.1/Ex9_3.sce
new file mode 100755
index 000000000..ac7aa0cbc
--- /dev/null
+++ b/2339/CH9/EX9.3.1/Ex9_3.sce
@@ -0,0 +1,16 @@
+clc

+clear

+

+Hs=32;

+N=1450;

+Eff=0.85;

+Q=0.05;

+Hfs=1;

+Hfd=6;

+Hm=Hs+Hfd+Hfs;

+Rho=1000;

+g=9.81;

+

+P=[Rho*g*Q*Hm]/Eff;

+printf('Power Consumed: %2.2f kW',P/1000);

+printf('\n');

diff --git a/2339/CH9/EX9.4.1/Ex9_4.sce b/2339/CH9/EX9.4.1/Ex9_4.sce
new file mode 100755
index 000000000..ae212d734
--- /dev/null
+++ b/2339/CH9/EX9.4.1/Ex9_4.sce
@@ -0,0 +1,18 @@
+clc

+clear

+

+Pm=25;

+Em=0.9;

+Q=0.063;

+Hs=4;

+Hd=25;

+Rho=1000;

+Hm=Hs+Hd;

+g=9.81;

+

+Ph=Rho*g*Q*Hm/1000;

+Ps=Em*Pm;

+Ep=Ph/Ps;

+

+printf('Efficiency of Pump: %2.2f Percent',Ep*100);

+printf('\n');