C ELS22A      TEMPORARY STORAGE FOR ELM22A
C
C REGS      STORAGE FOR REG
C LREGS     STORAGE FOR LREG
C
      LOGICAL         LREGS(20)
      REAL            REGS(20)
C
      COMMON /ELS22A/ REGS, LREGS