source/wham/src/COMMON.PROTFILES

   1       character*80 protfiles(maxfile_prot,2,MaxR,MaxT_h,Max_Parm),
   2      &  bprotfiles
   3       integer nfile_bin(MaxR,MaxT_h,Max_Parm),
   4      &  nfile_asc(MaxR,MaxT_h,Max_Parm),
   5      &  nfile_cx(MaxR,MaxT_h,Max_Parm),
   6      &  rec_start(MaxR,MaxT_h,Max_Parm),
   7      &  rec_end(MaxR,MaxT_h,Max_Parm),lenrec,lenrec1,lenrec2
   8       common /protfil/ protfiles,bprotfiles,
   9      &  nfile_bin,nfile_asc,nfile_cx,rec_start,rec_end,lenrec,lenrec1,
  10      &  lenrec2