*KEEP,NUCC.
C     COMMON /NUCCC/   IT,ITZ,IP,IPZ,IJPROJ,IBPROJ,IJTARG,IBTARG
C     COMMON /NUCC/   JT,JTZ,JP,JPZ,JJPROJ,JBPROJ,JJTARG,JBTARG
      COMMON /NUCC/   IT,ITZ,IP,IPZ,IJPROJ,IBPROJ,IJTARG,IBTARG
      COMMON /NUCCC/   JT,JTZ,JP,JPZ,JJPROJ,JBPROJ,JJTARG,JBTARG