Here is the code to reproduce the problem
program main implicit none integer :: to(1:2),from(1,2),i from(1,:)=[1,2] i=1 to(i:2)=mod((from(1,1:2)),4) write(*,*)"from:",from write(*,*)"to:",to end program
compiled with Intel(R) Fortran Intel(R) 64 Compiler for applications running on Intel(R) 64, Version 22.214.171.124 Build 20170411
the variable "to" should be equal to "from" but it doesn't. Seems only the first element of "to" is assigned.
MOD would create an array with the same rank and shape as its arg. I made a test using and intermediate array (maybe the compiler creates a temp ) but that code (shown below) works. I suspect either your code is nonconforming (but no error is given) or there is a compiler bug. Not sure which. implicit none integer :: to(1:2), from(1,2), i, to2(1,2) from(1,:)=[1,2] i=1 to2(i,1:2) = mod(from(1,1:2),4) to(i:2) = to2(i,1:2)
Interesting. The key is the use of i in to(i:2). If that is replaced by to(1:2), it works. This is a compiler bug, still broken in 19.1. Please report it to Intel using the Online Service Center.