C ELM7B               CENTROID SHIFTS
C
C COD(6)        SHIFT IN BEAM CENTROID.
C CODV(6)       PARTIAL DERIVATIVE OF SHIFT IN CENTROID
C COF(6)        FIRST ORDER POSITION OF BEAM CENTROID
C
      REAL            COD(6), CODV(6), COF(6)
C
      COMMON /ELM7B/  COD, CODV, COF