C ELM7C               TEMPORARY CENTROID SHIFT
C
C CEN(6)      TEMPORARY CENTRIOD SHIFT, CALCULATED ONLY WHEN NEEDED.  
C             PRINTED WITH BEAM MATRIX.  (R X CO).
C
      REAL            CEN(6)
C
      COMMON /ELM7C/  CEN