Hello,
This is a simple program using pointer bounds remapping:
---------------------------------
program main
implicit none
real, target :: x2(4,2)
real, pointer :: a(:,:)
x2=0.0
x2(1,1)=1.0
a(1:2,1:2)=>x2(:,2)
write(*,*) x2(:,2)
write(*,*) a
end program
------------------------------
I compiled this by Intel Fortran Composer XE ( ifort version 12.1.3 ) on Ubuntu 10.04 and it gives me the following result:
0.0000000E+00 0.0000000E+00 0.0000000E+00 0.0000000E+00
1.000000 0.0000000E+00 0.0000000E+00 0.0000000E+00
which looks weired to me since I thought the 2nd row should be the same as the 1st row.
Am I doing something wrong or is this a bug? Thank you and I appreciate your help.




