C----------------------------------------------------------------------
C-
C-   Created  11-MAY-1994   Gregory L. Griffin
C-
C----------------------------------------------------------------------
      INTEGER LUN(5), NID
      CHARACTER topname*10
      COMMON /L15CT_LUNS/LUN, NID, topname