clear; clc; funcprot(0); //given data N = 300000;//in rpm Q = 10;//in L/min p01 = 3;//in bar T01 = 300;//in K p02 = 1;//in bar rho = 1.16;//in kg/m^3 Cp = 1005;//in J/(kg.K) gamma = 1.4; //Calculations N = N/60;//in rev/s Qe = Q/(1000*60); delh0s = Cp*T01*(1-(p02/p01)^((gamma-1)/gamma)); Ns = N*sqrt(Qe)*(delh0s^-0.75); omega_s = Ns*2*%pi; P = rho*Qe*delh0s; //Results printf('The specific speed of the turbine = %.3f rad.',omega_s); printf('\n The type of machine required for this very low specific speed is a Pelton wheel.'); printf('\n The power consumption of the turbine = %.1f W.',P); printf('\n The majority of this power will be dissipated as heat through friction in the bearings, \n losses in the Pelton wheel and friction with the tooth.')