define(MAXUSERS,256)
define(MAXDIRECTORIES,380)
define(NIL,0)
define(EMPTY,-1)
  common /xeqcom/ users(12, MAXUSERS), direct(5, MAXDIRECTORIES),
                  dlist(MAXUSERS+MAXDIRECTORIES)
  character users
  integer*2 direct
  integer*2 dlist