main module RANGESTRT
declare
	A is 
	    structure
		B : integer
		C : array [1..5] of integer
		D : integer
	    endstructure

	Test : static A
	I    : static integer initially 8
enddeclare

I := 4
Test.C [i]  := i
endmodule