program T1385504 ! https://community.intel.com/t5/Intel-Fortran-Compiler/Warning-406-In-call-to-FUNCTION-an-array-temporary-was-created/td-p/1385504/ implicit none integer, allocatable :: b1(:,:),b2(:,:) allocate (b1(3,3),b2(3,3)) b1 = 5 b2 = 7 call sub (b1+b2) contains subroutine sub (b) integer :: b(3,3) print *, b end subroutine sub end program T1385504