![]() |
programmer's documentation
|
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.
[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 |
subroutine add_coriolis_t | ( | integer(c_int) | r_num, |
real(c_double) | c, | ||
real(c_double), dimension(3,3), intent(inout) | tr | ||
) |