BLOCK DATA 
 
      INTEGER  GROUP1 
      INTEGER  IMPLID 
      INTEGER  NGROUP 
      INTEGER  NIMPLI 
      INTEGER  NOTHER 
      INTEGER  NRELTI 
      INTEGER  OTHERS 
      INTEGER  RELTIV 
      INTEGER  STAX 
      INTEGER  CSOW 
      INTEGER  CSWFA 
      INTEGER  CSOFF 
      INTEGER  CSNLX 
      INTEGER  CSWFB 
      COMMON   /CRUCH/  GROUP1 (24) 
      COMMON   /CRUCH/  IMPLID (75) 
      COMMON   /CRUCH/  NGROUP 
      COMMON   /CRUCH/  NIMPLI 
      COMMON   /CRUCH/  NOTHER 
      COMMON   /CRUCH/  NRELTI 
      COMMON   /CRUCH/  OTHERS (165) 
      COMMON   /CRUCH/  RELTIV (24) 
      COMMON   /CRUCH/  STAX 
      COMMON   /CRUCH/  CSOW, CSWFA, CSOFF, CSNLX, CSWFB 
      END