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.}$

. More...

Collaboration diagram for add_coriolis_v:

Public Member Functions
subroutine	add_coriolis_v (r_num, c, v, vr)

Detailed Description

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.}$

.

Parameters

[in]	r_num	rotation number (0 for none, > 0 otherwise)
[in]	c	multiplicative coefficient
[in]	v	velocity
[in,out]	vr	resulting Coriolis term

The documentation for this interface was generated from the following file:

src/base/rotation.f90

Public Member Functions

Detailed Description