Hi,
I am using Intel Fortran compiler 14.0.1.139. When I compile the following program with the /O3 option (and 64-bit), I am getting an internal compiler error. The compilation succeeds if I remove the /O3, or if I compile as 32-bit, or if I use the older compiler (14.0.0.103).
[fortran]
module mod1
real(kind=8),allocatable:: Gfull(:,:)
contains
!--------------------------------------------------------
subroutine sub( x, y )
implicit none
real(kind=8),intent(in):: x(:)
real(kind=8),intent(out):: y(:)
integer mcell, ndat, i, im, m1, m2
integer,parameter:: msize = 10000
mcell= size( Gfull, 1)
ndat = size( Gfull, 2)
y = 0.d0
do im = 1, 10
m1 = (im-1)*msize + 1
m2 = min(m1 + msize - 1, mcell)
do i = 1, ndat
y(i) = y(i) + dot_product( Gfull(m1:m2,i), x(m1:m2) )
end do ! i
end do ! im
return
end subroutine sub
end module mod1
[/fortran]
Roman
