C     EDIT DATE     07FEB78  13:29
C     SOURCE FILE   PNACOMAJH.IN
C     AUTHOR        A. J.HOWARD
C     CLUSTER       80
      INTEGER     LIST (499), NAMES (499), CT, BITS (6, 2)
I     INTEGER ICLP08
      COMMON      /PNACOM / LIST, NAMES, CT, BITS
I     COMMON      /PNACOM / ICLP08