rotatematrix Subroutine

public subroutine rotatematrix(mat, theta, phi, lmsize, mode)

Rotates a matrix in the local frame pointing in the direction of phi and theta to the global frame $$\begin{equation} U= \begin{bmatrix} \cos{\frac{\theta}{2}} \exp{-\frac{i\phi}{2}} & -\sin{\frac{\theta}{2}}\exp{-i\frac{i\phi}{2}} \\ \sin{\frac{\theta}{2}} \exp{ \frac{i\phi}{2}} & \cos{\frac{\theta}{2}} \exp{ \frac{i\phi}{2}}\end{bmatrix} \end{equation}$$ Udegga = transpose(complex conjug ( U ) )

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),	intent(inout),		dimension (2*lmsize, 2*lmsize)	::	mat
real(kind=dp),	intent(in)			::	theta
real(kind=dp),	intent(in)			::	phi
integer,	intent(in)			::	lmsize
integer,	intent(in)			::	mode