FIXME : Add documentation
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(out) | :: | naky_x | |||
integer, | intent(out) | :: | ntheta0_x | |||
integer, | intent(out) | :: | nx | |||
integer, | intent(out) | :: | ny |
subroutine range_get_sizes (naky_x, ntheta0_x, nx, ny)
implicit none
integer, intent (out) :: naky_x, ntheta0_x, nx, ny
naky_x = naky ; ntheta0_x = ntheta0
nx = 0 ; ny = 0
end subroutine range_get_sizes