INTEGER*2 I2(2)
	INTEGER*4 I4(2)
	I2(I)=I4(J)
	I4(I)=I2(J)
	END