After correcting MVEVI
with the Fermi energy value MVEVIEF
(outside
this routine) it calculates the new angles of the local frame quantization
axis with respect to the global frame
C a l c u l a t e s
a n g l e s
o f
t h e
* * l o c a l
f r a m e * *
w i t h
r e s p e c t
t o
t h e
* * g l o b a l
f r a m e * *
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | it |
Current atom type |
||
integer, | intent(in) | :: | nmvec | |||
complex(kind=dp), | intent(in), | dimension(natypd, 3, nmvecmax) | :: | mvevi | ||
real(kind=dp), | intent(out), | dimension(natypd,nmvecmax) | :: | mvphi | ||
real(kind=dp), | intent(out), | dimension(natypd,nmvecmax) | :: | mvtet | ||
real(kind=dp), | intent(out), | dimension(natypd,nmvecmax) | :: | mvgam | ||
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 |