175   subroutine set_HS_matrix_1d(Gamma,ucell,na_u,no_u,no_s,maxnh, &  argument
194     integer, intent(in)           :: maxnh ! Hamiltonian size  local
195 …real(dp), intent(in)          :: xij(3,maxnh) ! differences with unitcell, differences with unitce…
197     integer, intent(in)           :: listh(maxnh)
198     real(dp), intent(in)          :: H(maxnh) ! Hamiltonian
199     real(dp), intent(in)          :: S(maxnh) ! Overlap
442   subroutine set_HS_matrix_2d(Gamma,ucell,na_u,no_u,no_s,maxnh, &  argument
461     integer, intent(in)           :: maxnh ! Hamiltonian size  local
462 …real(dp), intent(in)          :: xij(3,maxnh) ! differences with unitcell, differences with unitce…
464     integer, intent(in)           :: listh(maxnh)
465     real(dp), intent(in)          :: H(maxnh) ! Hamiltonian
466     real(dp), intent(in)          :: S(maxnh) ! Overlap
709   subroutine set_HS_transfermatrix_1d(Gamma,ucell,na_u,no_u,no_s,maxnh, &  argument
727     integer, intent(in)           :: maxnh ! Hamiltonian size  local
728 …real(dp), intent(in)          :: xij(3,maxnh) ! differences with unitcell, differences with unitce…
730     integer, intent(in)           :: listh(maxnh)
731     real(dp), intent(in)          :: H(maxnh) ! Hamiltonian
732     real(dp), intent(in)          :: S(maxnh) ! Overlap
894   subroutine set_HS_transfermatrix_2d(Gamma,ucell,na_u,no_u,no_s,maxnh, &  argument
912     integer, intent(in)           :: maxnh ! Hamiltonian size  local
913 …real(dp), intent(in)          :: xij(3,maxnh) ! differences with unitcell, differences with unitce…
915     integer, intent(in)           :: listh(maxnh)
916     real(dp), intent(in)          :: H(maxnh) ! Hamiltonian
917     real(dp), intent(in)          :: S(maxnh) ! Overlap
1076   subroutine set_HS_available_transfers(ucell,na_u,xa,lasto,no_u,maxnh, &  argument
1089     integer, intent(in)  :: maxnh ! Hamiltonian size  local
1090     real(dp), intent(in) :: xij(3,maxnh) ! differences with unitcell, differences with unitcell
1092     integer, intent(in)  :: listh(maxnh)