flow_depth | R Documentation |
Calculates the flow depth of a CSarbitrary or CScircle object for a given discharge and bottom slope under uniform flow conditions.
flow_depth(object, Q, J, method = "Strickler", ret = "all", plot = FALSE)
object |
A CSarbitrary or CScircle object. |
Q |
Discharge [m3/s]. |
J |
Bottom slope [-]. |
method |
Method to calculate the roughness. Allowed are "Strickler" (equal roughness) "Einstein" (mean roughness) and "Prandtl-Coolebrook-White". |
ret |
Defines the result returned by the function. |
plot |
Logical; if 'TRUE', plots the results. |
A list containing the following hydraulic variables:
Flow depth [m].
Flow velocity [m/s].
Froude number [-].
Mean roughness [m^(1/3)/s] (if method = "Einstein").
Wetted area [m^2].
Wetted perimeter [m].
# Example for CSarbitrary object
x <- c(0, 4, 9, 13)
z <- c(2, 0, 0, 2)
cs <- CSarbitrary(
x = x, z = z, xb_l = 4, xb_r = 9,
kSt_B = 35, kSt_l = 45, kSt_r = 45
)
flow_depth(cs, Q = 8.677, J = 0.0001, method = "Einstein", ret = "h")
flow_depth(cs, Q = 8.677, J = 0.0001, method = "Einstein", plot = TRUE)
# Example for CScircle object
csC <- CScircle(Di = 0.7, ks = 1.5, kSt = 75)
flow_depth(csC, Q = 0.46, J = 0.004)
flow_depth(csC, Q = 0.46, J = 0.004, method = "Prandtl-Coolebrook-White", plot = TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.