//--------------------------------------------------------------------------
// Example of Optimization added in Version 7.2
//--------------------------------------------------------------------------

main module OPTIMUM
	declare
	    A_type is array [1..4] of integer
	    A = table A_type (1,2,3,4)
	    B : static integer
	    C : static A_type
	    S_type is structure
		S1 : integer
		S2 : array [1..10] of integer
	    endstructure
	    S = S_type (S1: 4)

	enddeclare

	B := A [2]
	C [A[2]] := 1
	B := S.S1
endmodule