summaryrefslogtreecommitdiff
path: root/3751/CH12/EX12.12/Ex12_12.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3751/CH12/EX12.12/Ex12_12.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3751/CH12/EX12.12/Ex12_12.sce')
-rw-r--r--3751/CH12/EX12.12/Ex12_12.sce57
1 files changed, 57 insertions, 0 deletions
diff --git a/3751/CH12/EX12.12/Ex12_12.sce b/3751/CH12/EX12.12/Ex12_12.sce
new file mode 100644
index 000000000..443aeb95e
--- /dev/null
+++ b/3751/CH12/EX12.12/Ex12_12.sce
@@ -0,0 +1,57 @@
+//Fluid Systems - By - Shiv Kumar
+//Chapter 12- Reciprocating Pumps
+//Example 12.12
+//To Find the Maximum Speed at which the Pump may run without seperation.
+
+ clc
+ clear
+
+//Given Data:-
+ D=10; //Plunger Diameter, cm
+ L=20; //Stroke Length, cm
+ H_s=4; //Suction Head, m
+ H_d=14; //Delivery Head, m
+ d_s=4; //Diameter of Suction Pipe, cm
+ l_s=6; //Length of Suction Pipe, m
+ d_d=3; //Diameter of Delivery Pipe, cm
+ l_d=18; //Length of Delivery Pipe, m
+ p=7.85; //Pressure (below atm.) for seperation, N/cm^2
+ H_a=10.3; //Atmospheric Pressure Head, m of water
+
+
+//Data Used:-
+ g=9.81; //Acceleration due to gravity, m/s^2
+ rho=1000; //Density of water, kg/m^3
+
+
+//Computations:-
+ d_s=d_s/100; //m
+ d_d=d_d/100; //m
+ D=D/100; //m
+ L=L/100; //m
+
+ a_s=(%pi/4)*d_s^2; //m^2
+ a_d=(%pi/4)*d_d^2; //m^2
+ A=(%pi/4)*D^2; //m^2
+ r=L/2; //m
+
+ H_sp=p*100^2/(rho*g); //Pressure Head of water for seperation, m (below atmosphere) (Value given in textbook is wrong due to incorrect value of p is used)
+ H_abs=H_a-H_sp; //Absolute Pressure Head of water for seperation, m
+ H_as_by_omega2=(l_s/g)*(A/a_s)*r; //H_as/omega^2
+ omega=sqrt((H_sp-H_s)/H_as_by_omega2); //rad/s
+ N_s=omega*60/(2*%pi); //rpm
+
+ H_ad_by_omega2=(l_d/g)*(A/a_d)*r; //H_as/omega^2
+ omega=sqrt((H_sp+H_d)/H_ad_by_omega2); //rad/s
+ N_d=omega*60/(2*%pi); //rpm
+
+ //Selecting maximum speed,
+ if N_s>N_d then
+ N=N_s;
+ else
+ N=N_d;
+
+//Result:-
+ printf("Hence, The Maximum Speed at which Pump should be Run is %.2f rpm\n",N) //The answer vary due to round off error
+
+