Tutorial: Introduction to CUDA Fortran | GTC 2013

Strided Data Access
• Use array increment kernel with variable stride
attributes(global) subroutine stride(a, s)
real :: a(*)
integer,! value :: s
integer :: i
i = (blockDim%x*(blockIdx%x-1)+threadIdx%x) * s
a(i) = a(i)+1 !
end subroutine stride
Array a() allocated with padding to avoid out-of-bounds accesses