C
C
C     This code is distributed under the terms and conditions of the
C     CCP4 Program Suite Licence Agreement as a CCP4 Application.
C     A copy of the CCP4 licence can be obtained by writing to the
C     CCP4 Secretary, Daresbury Laboratory, Warrington WA4 4AD, UK.
C
      implicit none
      integer maxsec,maxdom,maxncs,maxbin,maxcyc,mtzcol,mtzset
      integer maxfeature,maxjoin,nhklc,levels
      real pi,dtor
      parameter (maxsec=100000,maxdom=9,maxncs=120,maxbin=30)
      parameter (maxcyc=2000)
      parameter (mtzcol=500,mtzset=100)
      parameter (maxfeature=32000,maxjoin=5*maxfeature)
      parameter (nhklc=25,levels=10000)
      parameter (pi=3.1415926,dtor=pi/180.0)