[Bug fortran/101281] [11/12 Regression] ICE with -std=f2003/f2008 and assumed-rank array

[burnus at gcc dot gnu.org via Gcc-bugs]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=101281

--- Comment #1 from Tobias Burnus <burnus at gcc dot gnu.org> ---
The main culprit is:

subroutine ar3 (xn) bind(C)
  character(len=n) :: xn(:,:,:)
end

and I forgot to mention that 'n' is only implicitly defined - otherwise, there
is not ICE.