1 PARAMETER ( MXEXQR = MAXLBL , MXLRQR = MAXLBL ) 2 CHARACTER*8 QRLBL ,TRLBL 3 COMMON /INDQR/ JEXQR(MXEXQR),ISEXQR(MXEXQR), 4 * ILRQR(8),NLRQR(8),ITRQR(8),NTRQR(8),IEXQR(8), 5 * NEXQR(8),ISYMTR(MXLRQR), 6 * TRFREQ(MXLRQR),QRFREQ(MXLRQR), 7 * ISYMQR(MXLRQR),EXCITA(8,MXEXQR,2), 8 * NEXLBL,NEXLB2,NLRLBL,NTRLBL, 9 * TRLBL(MXLRQR),QRLBL(MXLRQR) 10