
C     INCLUDE 'Zatq2.inc'

C        COMMON ATQR2 and ATQRC are defined for R2-calc for all sets 
C        used in subr QFOMR2 [ Zatq2 is open for more data ]
C        must be SAVE-d during DDMAIN-FOUR-PHASEX: store in dd-MAIN 

      PARAMETER (MT=513, MS=51)
      COMMON /ATQR2/ NPATS(MS), NATSS(MS), R2ES(MS), R2S(MS), PFOMS(MS),
     *   QFOMS(MS), XYZ(5,MT), BPS(MS), BRS(MS), BPSS(MS)

      COMMON /ATQC2/ ATNMS(MT)
      CHARACTER *6   ATNMS

C end of 'Zatq2.inc'
 