w90_set_m_local Subroutine

public subroutine w90_set_m_local(common_data, m_matrix_local)

Arguments

Type IntentOptional Attributes Name
type(lib_common_type), intent(inout) :: common_data
complex(kind=dp), intent(inout), target :: m_matrix_local(:,:,:,:)

Called by

proc~~w90_set_m_local~2~~CalledByGraph proc~w90_set_m_local~2 w90_set_m_local proc~w90_set_m_local w90_set_m_local proc~w90_set_m_local->proc~w90_set_m_local~2 program~wannier wannier program~wannier->proc~w90_set_m_local~2

Source Code

  subroutine w90_set_m_local(common_data, m_matrix_local) ! m_matrix_local_orig
    implicit none

    type(lib_common_type), intent(inout) :: common_data
    complex(kind=dp), intent(inout), target :: m_matrix_local(:, :, :, :)

    common_data%m_matrix_local => m_matrix_local
  end subroutine w90_set_m_local