SUBDESIGN convert
(
	INP[12..1][96..1]	:	INPUT;
	OUT[12..1][96..1]	:	OUTPUT;
)

VARIABLE

	TEMP[12..1][96..1]	:	NODE;

BEGIN

for k in 1 to 12 generate 
-- data (and brain) scrambling from mdt
  for i in 0 to 15 generate
  	for j in 1 to 6 generate
      TEMP[k][j+6*i] = wire(INP[k][16*(j-1)+i+1]);
	end generate;
  end generate;
end generate;

-- data scrambling from actual chambers
for k in 0 to 11 generate -- input channels
  for j in 1 to 4 generate -- hit rows
	for i in 0 to 23 generate -- hits per row
      OUT[4*(k div 4)+j][ 24*(k mod 4) + (i+1)] = wire(TEMP[k+1][24*(j-1)+(i+1)]);
	end generate;
  end generate;
end generate;


END;