FIXME : Add documentation
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | i | |||
real, | intent(out) | :: | aky | |||
real, | intent(out), | dimension(:) | :: | theta0 | ||
real, | intent(out) | :: | akx |
subroutine read_element (i, aky, theta0, akx)
implicit none
integer, intent (in) :: i
real, intent (out) :: aky, akx
real, dimension(:), intent(out) :: theta0
call kt_grids_specified_element_config(i)%init(name = 'kt_grids_specified_element', &
requires_index = .true., index = i)
associate(self => kt_grids_specified_element_config(i))
#include "kt_grids_specified_element_copy_out_auto_gen.inc"
end associate
end subroutine read_element