2021/CH10/EX10.22/EX10_22.sce


1
2
3
4
5
6
7
8
9
10
11
12
13
14

//Finding of Water surface Slope
//Given
sb=1/4000;
sf=.00004;
T=10;
B=10;
g=9.81;
y=1.5;
v=1;
//To Find
A=B*y;
q=A*v;
z=(sb-sf)/(1-((q^2*T)/(g*A^3)));
disp("Water surface slope ="+string(z)+"no units ")