1 LOGICAL SPHR1, SPHR2, SPHR3, SPHR4, SPHR12, SPHR34, 2 & GCON1, GCON2, GCON3, GCON4, GCON12, GCON34, 3 & TKMP12, TKMP34, TCMP12, TCMP34 4 COMMON /ERIAO/ IELCT1, IELCT2, 5 & NHKT1, NHKT2, NHKT3, NHKT4, 6 & JMAX1, JMAX2, JMAX3, JMAX4, JMAX12, JMAX34, 7 & JMXD1, JMXD2, JMXD3, JMXD4, JMXD12, JMXD34, 8 & NTUV12, NTUV34, 9 & KHKT1, KHKT2, KHKT3, KHKT4, KHKT12, KHKT34, 10 & KCKT1, KCKT2, KCKT3, KCKT4, KCKT12, KCKT34, 11 & NPRF1, NPRF2, NPRF3, NPRF4, NPRF12, NPRF34, 12 & NCTF1, NCTF2, NCTF3, NCTF4, NCTF12, NCTF34, 13 & ICMAT1, ICMAT2,ICMAT3,ICMAT4, 14 & NCNT12, NCNT34, 15 & NODS12, NODS34,KODS12, KODS34, 16 & NPPPP, NPPCC, NCCPP, NCCCC, NPP12, NPP34, 17 & I12XYZ, I120(3), 18 & I34XYZ, I340(3), 19 & IHHBIT, IHCBIT, ICHBIT, ICCBIT, 20 & SPHR1, SPHR2, SPHR3, SPHR4, SPHR12, SPHR34, 21 & GCON1, GCON2, GCON3, GCON4, GCON12, GCON34, 22 & TKMP12, TKMP34, TCMP12, TCMP34 23