Add the dual tensor of a rotation vector to a tensor. More...
Public Member Functions | |
subroutine | add_coriolis_t (r_num, c, tr) |
Add the dual tensor of a rotation vector to a tensor.
\[ T_{ij}=T_{ij}+\epsilon_{imj}\Omega_m,\quad \text{for }\Omega_m\text{ the rotation vector components and } \epsilon_{imj}\text{ the permutation tensor components.} \]
[in] | r_num | rotation number (0 for none, > 0 otherwise) |
[in] | c | multiplicative coefficient |
[in,out] | tr | tensor to which dual tensor of rotation is added |