Go to the source code of this file.
Functions/Subroutines | |
pure subroutine | gensdmat (evecsv, sdmat) |
pure subroutine gensdmat | ( | complex(8), dimension(nstsv,nstsv), intent(in) | evecsv, |
complex(8), dimension(nspinor,nspinor,nstsv), intent(out) | sdmat | ||
) |