summaryrefslogtreecommitdiff
path: root/3751/CH4/EX4.3/Ex4_3.sce
diff options
context:
space:
mode:
Diffstat (limited to '3751/CH4/EX4.3/Ex4_3.sce')
-rw-r--r--3751/CH4/EX4.3/Ex4_3.sce44
1 files changed, 44 insertions, 0 deletions
diff --git a/3751/CH4/EX4.3/Ex4_3.sce b/3751/CH4/EX4.3/Ex4_3.sce
new file mode 100644
index 000000000..fc2fc5073
--- /dev/null
+++ b/3751/CH4/EX4.3/Ex4_3.sce
@@ -0,0 +1,44 @@
+//Fluid system - By - Shiv Kumar
+//Chapter 4 - Pelton Turbine (Impulse Turbine)
+//Example 4.3
+ clc
+ clear
+
+//Given Data:-
+ H=30; //Effective Head, m
+ AoD=165; //Jet Deflection Angle, degrees
+ Cv=0.98; //Co-efficient of Velocity
+ Ku=0.45; //Speed ratio
+ d=22; //Diameter of Jet, mm
+ //As relative velocity at outlet is 0.98 times relative velocity at inlet,
+ Vro_by_Vri=0.98; // Vro/Vri
+
+//Data Used:-
+ rho=1000; //Density of water, kg/m^3
+ g=9.81; //Acceleration due to gravity, m/s^2
+
+//Computations:-
+ d=d/1000; //m
+ beta_O=180-AoD; //degrees
+ Vi=Cv*sqrt(2*g*H); //Absolut Velocity of Jet, m/s
+ Vwi=Vi;
+ u=Ku*sqrt(2*g*H); //peripheral velocity of runner, m/s
+ ui=u;
+ uo=u;
+ Vri=Vi-ui; //m/s
+ Vro=Vro_by_Vri*Vri; //m/s
+ Vrwo=Vro*cosd(beta_O); //m/s
+ Vwo=Vrwo-uo; //m/s
+
+ //(a)Power given by water to runner, P
+ Q=(%pi/4)*d^2*Vi; //m^3/s
+ P=rho*Q*(Vwi+Vwo)*u/1000; //kW
+
+ //(b)The hydraulic efficiency, eta_H
+ eta_H=2*(Vwi+Vwo)*u/Vi^2*100; //In percentage
+
+//Results:-
+ printf("(a)The Power given by water to the runner=%.3f kW \n", P) //The answer vary due to round off error
+ printf("(b)The Hydraulic Efficiency, eta_H=%.2f percent \n", eta_H) //The answer vary due to round off error
+
+