single_get_grids Subroutine

public subroutine single_get_grids(aky_out, theta0_out, akx_out, ikx_out)

FIXME : Add documentation

Arguments

Type IntentOptional Attributes Name
real, intent(out), dimension (:) :: aky_out
real, intent(out), dimension (:,:) :: theta0_out
real, intent(out), dimension (:) :: akx_out
integer, intent(out), dimension (:) :: ikx_out

Discrete kx wavenumber grid indices

Contents

Source Code

single_get_grids

Source Code

  subroutine single_get_grids (aky_out, theta0_out, akx_out, ikx_out)
    implicit none
    real, dimension (:), intent (out) :: aky_out, akx_out
    real, dimension (:,:), intent (out) :: theta0_out
    !> Discrete kx wavenumber grid indices
    integer, dimension (:), intent (out) :: ikx_out

    aky_out = aky
    theta0_out = theta0
    akx_out = akx
    ikx_out = 0
  end subroutine single_get_grids