https://gcc.gnu.org/bugzilla/show_bug.cgi?id=88713
Thomas Koenig <tkoenig at gcc dot gnu.org> changed: What |Removed |Added ---------------------------------------------------------------------------- Status|UNCONFIRMED |RESOLVED Resolution|--- |WONTFIX --- Comment #5 from Thomas Koenig <tkoenig at gcc dot gnu.org> --- An additional point. The called routine has pure function fpdbacksolve(x, S) result(Uix) real, dimension(3) :: Uix ... and so on. This _requires_ Uix to be contiguous in memory, so we need to call the internal pack routine. This is something we cannot change easily. So, the workaround: Use the appropriate memory layout in your Fortran programs.