w90_set_eigval Subroutine

public subroutine w90_set_eigval(common_data, eigval)

Arguments

Type IntentOptional Attributes Name
type(lib_common_type), intent(inout) :: common_data
real(kind=dp), intent(in), target :: eigval(:,:)

Called by

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

Source Code

  subroutine w90_set_eigval(common_data, eigval)
    implicit none

    type(lib_common_type), intent(inout) :: common_data
    real(kind=dp), intent(in), target :: eigval(:, :)

    common_data%eigval => eigval
  end subroutine w90_set_eigval