[Bug fortran/95397] [Fortran/OpenACC] Wrong results with 'loop vector' inside 'routine'

[chilikin.k at gmail dot com via Gcc-bugs]

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

--- Comment #5 from Kirill Chilikin <chilikin.k at gmail dot com> ---
Created attachment 59111
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=59111&action=edit
Test case