https://gcc.gnu.org/bugzilla/show_bug.cgi?id=113808
--- Comment #4 from Richard Biener <rguenth at gcc dot gnu.org> ---
Reduced a bit, w/o collapse:
program main
integer :: n, i,k
n = 11
do i = 1, n,2
!$omp simd lastprivate(k)
do k = 1, i + 41
if (k > 11 + 41 .or. k < 1) error stop
end do
end do
if (k /= 53) then
print *, k, 53
error stop
endif
end
