*KEEP,CTUCTW.
      COMMON/CTUCTW/WTCUT,NWTC
C