w90_get_centres Subroutine

public subroutine w90_get_centres(common_data, centres)

probes w90 library for (current) wannier centres

Arguments

Type IntentOptional Attributes Name
type(lib_common_type), intent(in) :: common_data

library data object
real(kind=dp), intent(out) :: centres(:,:)

must be allocated with size >= n_wannier

Called by

proc~~w90_get_centres~2~~CalledByGraph proc~w90_get_centres~2 w90_get_centres proc~w90_get_centres w90_get_centres proc~w90_get_centres->proc~w90_get_centres~2

Source Code

  subroutine w90_get_centres(common_data, centres)
    !! probes w90 library for (current) wannier centres
    implicit none

    real(kind=dp), intent(out) :: centres(:, :)
    !! must be allocated with size >= n_wannier
    type(lib_common_type), intent(in) :: common_data
    !! library data object

    centres = common_data%wannier_data%centres
  end subroutine w90_get_centres