hi,
I work on linux red-hat 7.3.I have both the compiler intel 7.0 and 8.0 (free version) installed.
I have written here a small program which shows segmentation fault whenever i try to compile it and the run it with intel 8.0 version, with a bigger array size.but if i compile it with intel 7.0 version it perfectly works.
could anyone point out what is the problem ?
***the pourpose of the test program is this it replaces the element of a matrix by the sum of its nearest neighbour i.e if i start with matrix whose all elements set to 1,i'll get a matrix whose all elements equal to 4; since
no of nearest neighbour is 4.
***************************************************************
program matrix
integer,parameter :: k=1624
real,target :: mat(k,k)
real,pointer :: pm(:,:)
integer,target :: x1(k),x_1(k),x(k)
integer,pointer :: p1(:),p_1(:),p(:)
integer :: i
mat=1.0
x=reshape( (/(i,i=1,k)/) ,(/k/))
p=>x
x1=cshift(x, shift=1)
x_1=cshift(x, shift=-1)
pm=>mat
p1=>x1
p_1=>x_1
pm=pm(p1,p)+pm(p_1,p)+pm(p,p1)+pm(p,p_1)
print*,mat
end program matrix
*****************************************************
