euler_rotate_vectors Subroutine

public subroutine euler_rotate_vectors(v, euler, seq, world, vrot)

Rotates vectors with a set of Euler angles.

Arguments

Type IntentOptional Attributes Name
real(kind=rp), intent(in), dimension(:,:) :: v

(3,n). Vectors to rotate.
real(kind=rp), intent(in), dimension(3) :: euler

Euler angles.
character(len=3), intent(in) :: seq

'XYZ'|'XZY' | 'YXZ' | 'YZX' | 'ZXY' | 'ZYX'. Euler angle sequence.
logical, intent(in) :: world

Whether the Euler angles are with respect to the world frame or not.
real(kind=rp), intent(out), dimension(:,:) :: vrot

(3,n). Rotated vectors.