dcm_shiftmat Subroutine

public subroutine dcm_shiftmat(dcm, forward, shiftmat)

Returns the shifter matrix corresponding to a direction cosine matrix.

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=rp),	intent(in),		dimension(3,3)	::	dcm	Direction cosine matrix.
logical,	intent(in)			::	forward	Whether to shift forward, i.e., along the orientation or shift reverse.
real(kind=rp),	intent(out),		dimension(3,3)	::	shiftmat	Shifter matrix.