Compute the retarding force of water on the whale, based on a drag law
\((1/2)*rho*Cw*A*vw^2\)
where rho
is 1024 (kg/m^3), Cw
is parms$Cw
and
A
is parms$Sw
.
whaleWaterForce(vw, parms)
Whale velocity (m/s).
A named list holding model parameters, created by
parameters()
.
Water drag force (N).