summaryrefslogtreecommitdiff
path: root/2021/CH10/EX10.2/EX10_2.sce
blob: 003c6f0f5928b009f888e3fab1c03b9ecc77d5d2 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
//Finding of bed slope and conveyance of channel
//Given
q=0.15;
B=.70;
y=.40;
C=60;
A=B*y;
P=B+(2*y);
R=(A/P);
//To Find
sb=((q^2)*(P))/((A^3)*C^2)
K=A*C*sqrt(R);
disp("Bed of slope ="+string(sb)+" no units");
disp("conveyance of channel ="+string(K)+" m^3/sec");