## calculate scour depth accordint to Froehlich without bedload
v <- 2.7
Fr <- 0.52
h <- 3.31
J <- 0.0022
L <- 5
d16 <- 50
dm <- 80
d84 <- 200
Ks <- 0.82
delta <- 60
scour_groyne(
v = v, Fr = Fr, h = h, J = J, L = L,
d16 = d16, dm = dm, d84 = d84,
Ks = Ks, delta = delta
)
## calculate scour depth accordint to Froehlich with bedload
v <- 2.7
Fr <- 0.52
h <- 3.31
J <- 0.0022
L <- 5
Ks <- 0.82
delta <- 60
scour_groyne(
v = v, Fr = Fr, h = h, J = J, L = L,
d16 = d16, dm = dm, d84 = d84,
Ks = Ks, delta = delta, bedload = TRUE
)
Run the code above in your browser using DataLab