C
C
C     This code is distributed under the terms and conditions of the
C     CCP4 licence agreement as `Part 2' (Annex 2) software.
C     A copy of the CCP4 licence can be obtained by writing to the
C     CCP4 Secretary, Daresbury Laboratory, Warrington WA4 4AD, UK.
C
c+++ column.fh +++
c  Column assignments
      common /column/ ncmsym, ncbatc, nci, ncsdi, ncip, ncsdip, ncsc,
     $     ncsdsc, nct, ncx, ncy, ncz, ncol, ncolou,
     $     ncsdic, ncsdpc, ncmprt, ncfrcl, ncflag, ncbgpk, nclp, 
     $     ncosdp, ncopsf, ncoflg,
c  Compulsory output columns for unmerged options
     $     ncoi, ncosdi, ncosc, ncosds, 
c  Optional output columns for unmerged option
     $     nconpt, ncotim, ncoxdt, ncoydt, ncorot, ncofrc, ncolp,
     $     ncobeam,
c  Columns for datasets in OUTPUT AVERAGE TOGETHER option
     $     ncodts(maxsets)
      integer ncmsym, ncbatc, nci, ncsdi, ncip, ncsdip, ncsc,
     $     ncsdsc, nct, ncx, ncy, ncz, ncol, ncolou, ncosc, ncosds,
     $     ncosdi, ncosdp, ncsdic, ncsdpc, ncmprt, ncfrcl, ncoflg,
     $     ncflag, ncbgpk, nclp, ncopsf, ncoi, 
     $     nconpt, ncotim, ncoxdt, ncoydt, ncorot, ncofrc, ncolp,
     $     ncobeam, ncodts
      save /column/
c--- column.fh ---