[Bug fortran/91926] assumed rank optional

[jrfsousa at hotmail dot com]

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

--- Comment #1 from José Rui Faustino de Sousa <jrfsousa at hotmail dot com> ---
Created attachment 46966
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=46966&action=edit
Fortran code