PROGRAM IDTEST
C
C
	INTEGER	ID(4)
C
C
	CALL	PRINID	(5)

	STOP
	END