INTEGER  MAXALTS
      PARAMETER (MAXALTS=3)
      INTEGER MAXALT_GROUPS
      PARAMETER (MAXALT_GROUPS = 5)
C
C---MAXATOM is defined in atom_com.fh so it should be included before this
C---include
      INTEGER NGROUP_OCC,NCYCLE_OCC
      INTEGER IGRP_OCCUP(MAXATOM),NALTS_OCCUP(MAXALT_GROUPS),
     &        NGROUP_ALT(MAXALTS,MAXALT_GROUPS),
     &        NGROUP_REF(MAXALT_GROUPS)
      COMMON /occup_params_i/ NGROUP_OCC,NCYCLE_OCC,IGRP_OCCUP,
     &       NALTS_OCCUP,NGROUP_ALT,NGROUP_REF
      LOGICAL EXCLUDE_OCC_B
      COMMON /occup_params_l/EXCLUDE_OCC_B
c
c---maxatom_occup_refine   - maximum number of individual atoms for occupancy refinement
c---natom_occup_refine     - the number of indivudal atoms fro occupancy refinement
c---occup_refine_residue
c---occup_refine_atom
c---occup_refine_chain  - residue number, atom name and chain name of atoms for 
c---                      occupacny refinement
      integer maxatom_occup_refine,natom_occup_refine
      parameter (maxatom_occup_refine = 10000)
      integer occup_refine_residue(maxatom_occup_refine)
      character occup_ref_atoms*3
      character occup_refine_atom(maxatom_occup_refine)*4
      character occup_refine_chain(maxatom_occup_refine)*4

      common /occup_ref_int/natom_occup_refine,occup_refine_residue
      common /occup_ref_char/occup_ref_atoms,occup_refine_atom,
     &                       occup_refine_chain

      integer maxocc_const
      parameter (maxocc_const=1000)
      integer maxocc_const_all
      parameter (maxocc_const_all=5000)
      integer c_occ(maxocc_const_all)
      integer nocc_const
      integer occup_const(maxocc_const)
      integer max_occ_group
      parameter (max_occ_group=5000)
      integer occ_const_type(max_occ_group)
      integer nocc_const_num(maxocc_const)
      real occ_grp_value(max_occ_group)
      logical occup_refine_flag
      integer ncycle_occup
      common /occup_ref_grp/ncycle_occup,
     &                      nocc_const,occup_const,nocc_const_num,
     &                      occ_const_type,
     &                      c_occ,occ_grp_value,
     &                      occup_refine_flag