INTEGER IALOC(NMCHIP+1)	!ALIAS TABLE POINTERS
	BYTE IPINAS(4,NMAPIN)	!ALIAS TABLE
	INTEGER NXAENT		!NEXT UNUSED ENTRY IN IPINAS
	COMMON / ALIAS / IALOC,NXAENT,IPINAS
C