c
c    MORB:  maximum number of orbitals
c    MBAS:  maximum number of basis functions in each atom
c    MATOM: maximum kinds of atoms
c    MSITE: maximum number of independent sites in unit cell
c    MPOS:  maximum number of atoms which are contained in the calculation
c    MAXn:  maximum number of n 
c    MAXl:  maximum number of l (angular quantum number)
c    MAXm:  maximum number of m (magnet quantum number)
c    MATORB: maximum number of atomic orbitals for each atom
c    MkLINE: maximum number of lines along k-lattice
c    MCLSTR: maximum number of Cluster files
c    MCLST2: maximum number of Clusters in unit cell
      implicit real (a-h,o-z)
      implicit integer (i-n)
      parameter(MORB=200,MBAS=40,MATOM=10,MSITE=50,MPOS=120)
      parameter(MAXn=6,MAXl=5,MAXm=2*MAXl+1,MATORB=30,MkLINE=20)