Compute rotation velocity at given point coordinates. More...
Public Member Functions | |
subroutine | rotation_velocity (r_num, coords, vr) |
Compute rotation velocity at given point coordinates.
\[ \vect{v}=\vect{\Omega}\wedge\vect{x},\quad \text{with }\vect{\Omega}\textnormal{ the rotation vector and } \vect{x}\text{ the point location.} \]
[in] | r_num | rotation number (0 for none, > 0 otherwise) |
[in] | coords | coordinates at point |
[out] | vr | rotation velocity |