aa_shift_tensor2 Subroutine

public subroutine aa_shift_tensor2(a, axis, angle, forward, ashift)

Given two frames A and B such that the orientation of frame B with respect to frame A is given by an axis-angle representation, shifts second-order tensors from A to B or B to A.

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=rp),	intent(in),		dimension(3,3)	::	a	Second-order tensor
real(kind=rp),	intent(in),		dimension(3)	::	axis	Unit vector along the axis.
real(kind=rp),	intent(in)			::	angle	Angle of rotation in radian. 0 <= angle < pi.
logical,	intent(in)			::	forward	If True, shift from A to B. If False, shift from B to A.
real(kind=rp),	intent(out),		dimension(3,3)	::	ashift	Shifted second-order tensor.