summaryrefslogtreecommitdiff
path: root/3751/CH16/EX16.3/Ex16_3.sce
diff options
context:
space:
mode:
Diffstat (limited to '3751/CH16/EX16.3/Ex16_3.sce')
-rw-r--r--3751/CH16/EX16.3/Ex16_3.sce32
1 files changed, 32 insertions, 0 deletions
diff --git a/3751/CH16/EX16.3/Ex16_3.sce b/3751/CH16/EX16.3/Ex16_3.sce
new file mode 100644
index 000000000..1c382287e
--- /dev/null
+++ b/3751/CH16/EX16.3/Ex16_3.sce
@@ -0,0 +1,32 @@
+//Fluid Systems - By Shiv Kumar
+//Chapter 16- Hydraulic Power and Its Transmissions
+//Example 16.3
+//To Determine the Minimum Number of Pipes.
+ clc
+ clear
+
+//Given Data:-
+ l=7500; //Length of each Pipe, m
+ d=125; //Diameter of each Pipe, mm
+ Pr=6000; //Pressure at Discharge End, kPa
+ eta=85/100; //Efficiency
+ P=156; //Power Delivered, kW
+ f=0.006;
+
+//Data Required:-
+ rho=1000; //Density of Water, Kg/m^3
+ g=9.81; //Acceleration due to gravity, m/s^2
+
+//Computations:-
+ H_minus_hf=Pr*10^3/(rho*g); //H-hf, m
+ H=H_minus_hf/eta; //m
+ hf=H-H_minus_hf; //m
+ Q=P*1000/(rho*g*(H-hf)); //m^3/s
+ q=sqrt((hf*2*g*%pi^2*(d/1000)^5)/(64*f*l)); //Discharge in each Pipe, m^3/s
+ n=Q/q; //Number of Pipes
+
+
+//Results:-
+
+ printf("The Minimum Number of Pipes Required=%.f\n",n)
+