I am encountering a strange problem with the fortran intel 17.0.0 compiler (as obtained through “ifort –v”) when compiling with optimization flags with arrays.
After a series of tests I created the following very simple code to test what is happening.
program matrix_define
implicit none
integer, parameter :: dimen = 3
real*8 :: A(2, dimen)
real*8 :: x(3,dimen)
x(1,1) = 5.d0
x(1,2) = 2.d0
x(1,3) = 1.d0
x(2,1) = 1.d0
x(2,2) = 2.d0
x(2,3) = 3.d0
x(3,1) = 0.d0
x(3,2) = 0.d0
x(3,3) = 0.d0
A(2,1:3) = x(1,1:3) - x(2,1:3)
A(1,1:3) = x(3,1:3) - x(2,1:3)
write(*,*) A(1,1:3)
write(*,*) A(2,1:3)
end program matrix_define
As you notice it is a very simple test. It mainly consists of defining the components of a two-dimensional array A(2,3). When I compile using “ifort” without any flags the program assigns the correct values for all A-array elements.
However, when compiling with “ifort –fast” the output values of A are messed up:
The element A(1,2) has the value of A(2,1) while A(2,1) and all other element values are as they should.
I have tested the same code with the same options with intel fortran 12.0 and 10.0 and no problem appears.
Is it possible that there a problem in arrays with optimization flags in intel fortran 17.0?
Thank you very much for your time and efforts!
