Go to the source code of this file.
Functions/Subroutines | |
subroutine | putevecuv (ik, evecu, evecv) |
subroutine putevecuv | ( | integer, intent(in) | ik, |
complex(8), dimension(nstsv,nstsv), intent(in) | evecu, | ||
complex(8), dimension(nstsv,nstsv), intent(in) | evecv | ||
) |