1! { dg-do compile } 2! 3! Verify that the outer do-loop counter 'j' is accepted as 4! as end-expression of the inner loop. 5! 6 7 integer i, j 8 integer, parameter :: n = size( [( [(i*j,i=1,j)], j=1,2)] ) 9end 10