https://gcc.gnu.org/bugzilla/show_bug.cgi?id=83900
--- Comment #1 from G. Steinmetz <gs...@t-online.de> --- Working variants : $ cat z2.f90 program p integer, parameter :: a(3,2) = 1 real :: b(2,3) = 2 print *, matmul(a, b) end $ cat z3.f90 program p integer :: a(3,2) = 1 real :: b(2,3) = 2 print *, matmul(a, b) end