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)

Arguments

vw

Whale velocity (m/s).

parms

A named list holding model parameters, created by parameters().

Value

Water drag force (N).

Author

Dan Kelley