$ cat a2.f90 integer, parameter :: A(-3:7,2)=0 integer, parameter, dimension(3) :: V = (/ 2, 4, 6 /) integer, parameter, dimension(3) :: B = A(V,1) END $ gfortran a2.f90 In file a2.f90:3
integer, parameter, dimension(3) :: B = A(V,1) 1 Error: Incompatible ranks 1 and 2 in assignment at (1) -- Summary: Vector subscript rejected Product: gcc Version: 4.2.0 Status: UNCONFIRMED Keywords: rejects-valid Severity: normal Priority: P3 Component: fortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: fxcoudert at gcc dot gnu dot org http://gcc.gnu.org/bugzilla/show_bug.cgi?id=29393