COMMON /CINODE/ NINODE, INUM(MAXINUM), INODES(INODESSIZE), IMOD,
   INAME(MAXTNAME), RNAME(MAXTNAME), IBUF(MAXLINE), IFD, IPOS
   INTEGER NINODE%# NUMBER OF FREE INODES, INIT = 0
   INTEGER INUM%%# CONTAINS FREE INODE NUMBERS
   CHARACTER INODES%# IN-CORE INODES
   INTEGER IMOD%%# TIMES ILIST HAS BEEN MODIFIED, INIT = 0
   CHARACTER INAME%# NAME OF THE ILIST FILE
   CHARACTER RNAME%# NAME OF THE ROOT FILE
   CHARACTER IBUF%# USED TO READ ILIST FILE
   INTEGER IFD%%# FILE DESCRIPTOR FOR READING ILIST, INIT = EOF
   INTEGER IPOS%%# CURRENT POSITION IN OPENED ILIST FILE, INIT = 0
