------- Additional Comments From paulthomas2 at wanadoo dot fr 2004-12-10 09:54 ------- For what it is worth:
program testg real, dimension(5) :: a=(/ 1.5,2.1,3.2,4.6,5.3 /) integer,dimension(3) :: i i=(/ 2,3,1 /) print *, a((/ 2,3,1 /)) ! ICEs ! print *, a(i) !works fine end -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=12366