https://gcc.gnu.org/bugzilla/show_bug.cgi?id=97589
Thomas Koenig <tkoenig at gcc dot gnu.org> changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|REOPENED |NEW
--- Comment #5 from Thomas Koenig <tkoenig at gcc dot gnu.org> ---
Really reduced test case, no derived types are needed to expose the bug.
program random_weather
implicit none
real, allocatable :: my_ps(:,:) [:,:]
integer :: i, npx, nxlocal, nylocal, nzglobal
nxlocal = 23
nylocal = 23
nzglobal = 30
npx = 4
allocate (my_ps(0:nxlocal-1, 0:nylocal-1) [0:npx-1,0:*])
end program random_weather
