diff options
Diffstat (limited to '3751/CH5/EX5.10/Ex5_10.sce')
-rw-r--r-- | 3751/CH5/EX5.10/Ex5_10.sce | 44 |
1 files changed, 44 insertions, 0 deletions
diff --git a/3751/CH5/EX5.10/Ex5_10.sce b/3751/CH5/EX5.10/Ex5_10.sce new file mode 100644 index 000000000..c991d4b00 --- /dev/null +++ b/3751/CH5/EX5.10/Ex5_10.sce @@ -0,0 +1,44 @@ +//Fluid Systems - By Shiv Kumar +//Chapter 5- Francis Turbine +//Example 5.10 +//To Determine (i) The Guide Blade Angle (ii) The Wheel Vane Angle at Inlet (iii) Diameter of Wheel at inlet (iv)Width of Wheel at Inlet + + clc + clear + +//Given Data:- + //Data Required + rho=1000; //Density of water, Kg/m^3 + g=9.81; //Acceleration due to gravity, m/s^2 + + eta_o=75/100; //Overall Efficiency + P=148.25; //Power Produced, kW + H=7.62; // Working Head, m + ui=0.26*sqrt(2*g*H); //Peripheral Velocity at Inlet, m/s + Vfi=0.96*sqrt(2*g*H); //Velocity of Flow at Inlet, m/s + N=150; //Speed, rpm + H_loss=22; //Percentage of Hydraulic Losses in the Turbine (of Available Energy) + //As Discharge is Radial, + alpha_o=90; //Degrees //Vfo=Vo + Vwo=0; + +//Computations:- + Do=ui*60/(%pi*N); //m + Q=P*1000/(rho*g*H*eta_o); //m^3/s + bo=Q/(%pi*Do*Vfi); //m + + //By Energy Balance Equation, + Vwi=(g*H-(H_loss/100)*g*H)/ui; //m/s + + alpha_i=atand(Vfi/Vwi); //degrees + beta_i=atand(Vfi/(Vwi-ui)); //degrees + + +//Results:- + printf(" (i)The Guide Blade Angle , alpha_i=%.2f Degrees\n",alpha_i) + printf(" (ii) The Wheel Vane Angle at Inlet, beta_i =%.2f Degrees\n", beta_i ) //The Answer Vary due to Round off Error + printf(" (iii) Diameter of Wheel at Inlet, Do =%.4f m\n",Do) //The Answer Vary due to Round off Error + printf(" (iv)Width of Wheel at Inlet , bo =%.4f m\n",bo) //The Answer Vary due to Round off Error + + + |