Add a Coriolis term to a local vector. More...
Public Member Functions | |
| subroutine | add_coriolis_v (r_num, c, v, vr) |
Add a Coriolis term to a local vector.
![\[ \vect{w}=\vect{w}+C\vect{\Omega}\wedge\vect{u},\quad
\text{with }C\text{ a multiplicative coefficient, }
\vect{\Omega}\text{ the rotation vector and }
\vect{u}\text{ the velocity.}
\]](form_397.png)
| [in] | r_num | rotation number (0 for none, > 0 otherwise) |
| [in] | c | multiplicative coefficient |
| [in] | v | velocity |
| [in,out] | vr | resulting Coriolis term |