Transforms the magnetization to the cartesian global frame of reference, first by transforming from the local coordinate system, to the local cartesian coordinate system, and then to the gloabl reference frame.
Note
This routine has been build up from the last part of the original
Munich CALCMVEC
routine
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | it |
Index of the current atom type |
||
integer, | intent(in) | :: | iq |
Chemical type of the current atom |
||
integer, | intent(in) | :: | natyp |
Number of kinds of atoms in unit cell |
||
real(kind=dp), | intent(in) | :: | qmphi |
angle of the agnetization with respect to the z-axis |
||
real(kind=dp), | intent(in) | :: | qmtet |
angle of the agnetization with respect to the z-axis |
||
complex(kind=dp), | intent(inout), | dimension(natypd, 3, nmvecmax) | :: | mvevi | ||
complex(kind=dp), | intent(inout), | dimension(0:lmaxd, natypd, 3, nmvecmax) | :: | mvevil | ||
complex(kind=dp), | intent(inout), | dimension(natypd, 3, nmvecmax) | :: | mvevief | ||
integer, | intent(in) | :: | natypd |
Number of kinds of atoms in unit cell |
||
integer, | intent(in) | :: | lmaxd |
Maximum l component in wave function expansion |
||
integer, | intent(in) | :: | nmvecmax |
4 |