diff options
author | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
---|---|---|
committer | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
commit | 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch) | |
tree | dbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3751/CH12/EX12.12/Ex12_12.sce | |
parent | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff) | |
download | Scilab-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.sce | 57 |
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 + + |