//clear//
clear;
clc;

//Example 4.2
//Applying Eq.(4.25)
//Pa = Pb, Ua = 0
// Zb = 0, Za = 5m

//The velocity at streamline discharge
Ub = sqrt(5*2*9.80665)//[m/s]
disp('m/s',Ub,'streamline discharge velocity (Ub) =')