### PARAM file for LMAX = 8 ###

C  Dimension statements for Tensor LEED reference calculation, 
C  version v1.2

C  1. lattice symmetry

      PARAMETER (MIDEG=2,MNL1=2,MNL2=1)
      PARAMETER (MNL = MNL1*MNL2)

C  2. General calculational quantities

      PARAMETER (MKNBS = 2)
      PARAMETER (MKNT =  245)
      PARAMETER (MNPUN = 35, MNT0 = 35)
      PARAMETER (MNPSI = 236, MNEL = 3)
      PARAMETER (MLMAX = 8)
      PARAMETER (MNLMO = 13053, MNLM = 13593)

C  3. Parameters for (3D) geometry within (2D) unit mesh

      PARAMETER (MNSITE  = 3)
      PARAMETER (MNLTYPE = 7)
      PARAMETER (MNBRAV  = 1)
      PARAMETER (MNSUB   = 3)
      PARAMETER (MNSTACK = 6)

C  4. some derived quantities that must be treated explicitly (dummy dimensions for
C     special cases necessary

      PARAMETER (MLMAX1=MLMAX+1)
      PARAMETER (MLMMAX = MLMAX1*MLMAX1)

      PARAMETER (MNBRAV2 = MNBRAV)

      PARAMETER (MNCOMP= MNLTYPE-MNBRAV)
      PARAMETER (MLMT  = MNSUB*MLMMAX)
      PARAMETER (MNSUB2= MNSUB * (MNSUB-1)/2)
      PARAMETER (MLMG  = MNSUB2*MLMMAX*2)
      PARAMETER (MLMN  = MNSUB * MLMMAX)
      PARAMETER (MLM2N = 2*MLMN)
      PARAMETER (MLMNI = MNSUB*MLMMAX)


### PARAM file for LMAX = 9 ###

C  Dimension statements for Tensor LEED reference calculation, 
C  version v1.2

C  1. lattice symmetry

      PARAMETER (MIDEG=2,MNL1=2,MNL2=1)
      PARAMETER (MNL = MNL1*MNL2)

C  2. General calculational quantities

      PARAMETER (MKNBS = 2)
      PARAMETER (MKNT =  245)
      PARAMETER (MNPUN = 35, MNT0 = 35)
      PARAMETER (MNPSI = 236, MNEL = 3)
      PARAMETER (MLMAX = 9)
      PARAMETER (MNLMO = 21868, MNLM = 22693)

C  3. Parameters for (3D) geometry within (2D) unit mesh

      PARAMETER (MNSITE  = 3)
      PARAMETER (MNLTYPE = 7)
      PARAMETER (MNBRAV  = 1)
      PARAMETER (MNSUB   = 3)
      PARAMETER (MNSTACK = 6)

C  4. some derived quantities that must be treated explicitly (dummy dimensions for
C     special cases necessary

      PARAMETER (MLMAX1=MLMAX+1)
      PARAMETER (MLMMAX = MLMAX1*MLMAX1)

      PARAMETER (MNBRAV2 = MNBRAV)

      PARAMETER (MNCOMP= MNLTYPE-MNBRAV)
      PARAMETER (MLMT  = MNSUB*MLMMAX)
      PARAMETER (MNSUB2= MNSUB * (MNSUB-1)/2)
      PARAMETER (MLMG  = MNSUB2*MLMMAX*2)
      PARAMETER (MLMN  = MNSUB * MLMMAX)
      PARAMETER (MLM2N = 2*MLMN)
      PARAMETER (MLMNI = MNSUB*MLMMAX)


### PARAM file for LMAX = 10 ###

C  Dimension statements for Tensor LEED reference calculation, 
C  version v1.2

C  1. lattice symmetry

      PARAMETER (MIDEG=2,MNL1=2,MNL2=1)
      PARAMETER (MNL = MNL1*MNL2)

C  2. General calculational quantities

      PARAMETER (MKNBS = 2)
      PARAMETER (MKNT =  245)
      PARAMETER (MNPUN = 35, MNT0 = 35)
      PARAMETER (MNPSI = 236, MNEL = 3)
      PARAMETER (MLMAX = 10)
      PARAMETER (MNLMO = 34914, MNLM = 36124)

C  3. Parameters for (3D) geometry within (2D) unit mesh

      PARAMETER (MNSITE  = 3)
      PARAMETER (MNLTYPE = 7)
      PARAMETER (MNBRAV  = 1)
      PARAMETER (MNSUB   = 3)
      PARAMETER (MNSTACK = 6)

C  4. some derived quantities that must be treated explicitly (dummy dimensions for
C     special cases necessary

      PARAMETER (MLMAX1=MLMAX+1)
      PARAMETER (MLMMAX = MLMAX1*MLMAX1)

      PARAMETER (MNBRAV2 = MNBRAV)

      PARAMETER (MNCOMP= MNLTYPE-MNBRAV)
      PARAMETER (MLMT  = MNSUB*MLMMAX)
      PARAMETER (MNSUB2= MNSUB * (MNSUB-1)/2)
      PARAMETER (MLMG  = MNSUB2*MLMMAX*2)
      PARAMETER (MLMN  = MNSUB * MLMMAX)
      PARAMETER (MLM2N = 2*MLMN)
      PARAMETER (MLMNI = MNSUB*MLMMAX)


### PARAM file for LMAX = 11 ###

C  Dimension statements for Tensor LEED reference calculation, 
C  version v1.2

C  1. lattice symmetry

      PARAMETER (MIDEG=2,MNL1=2,MNL2=1)
      PARAMETER (MNL = MNL1*MNL2)

C  2. General calculational quantities

      PARAMETER (MKNBS = 2)
      PARAMETER (MKNT =  245)
      PARAMETER (MNPUN = 35, MNT0 = 35)
      PARAMETER (MNPSI = 236, MNEL = 3)
      PARAMETER (MLMAX = 11)
      PARAMETER (MNLMO = 53560, MNLM = 55276)

C  3. Parameters for (3D) geometry within (2D) unit mesh

      PARAMETER (MNSITE  = 3)
      PARAMETER (MNLTYPE = 7)
      PARAMETER (MNBRAV  = 1)
      PARAMETER (MNSUB   = 3)
      PARAMETER (MNSTACK = 6)

C  4. some derived quantities that must be treated explicitly (dummy dimensions for
C     special cases necessary

      PARAMETER (MLMAX1=MLMAX+1)
      PARAMETER (MLMMAX = MLMAX1*MLMAX1)

      PARAMETER (MNBRAV2 = MNBRAV)

      PARAMETER (MNCOMP= MNLTYPE-MNBRAV)
      PARAMETER (MLMT  = MNSUB*MLMMAX)
      PARAMETER (MNSUB2= MNSUB * (MNSUB-1)/2)
      PARAMETER (MLMG  = MNSUB2*MLMMAX*2)
      PARAMETER (MLMN  = MNSUB * MLMMAX)
      PARAMETER (MLM2N = 2*MLMN)
      PARAMETER (MLMNI = MNSUB*MLMMAX)


### PARAM file for LMAX = 12 ###

C  Dimension statements for Tensor LEED reference calculation, 
C  version v1.2

C  1. lattice symmetry

      PARAMETER (MIDEG=2,MNL1=2,MNL2=1)
      PARAMETER (MNL = MNL1*MNL2)

C  2. General calculational quantities

      PARAMETER (MKNBS = 2)
      PARAMETER (MKNT =  245)
      PARAMETER (MNPUN = 35, MNT0 = 35)
      PARAMETER (MNPSI = 236, MNEL = 3)
      PARAMETER (MLMAX = 12)
      PARAMETER (MNLMO = 79443, MNLM = 81809)

C  3. Parameters for (3D) geometry within (2D) unit mesh

      PARAMETER (MNSITE  = 3)
      PARAMETER (MNLTYPE = 7)
      PARAMETER (MNBRAV  = 1)
      PARAMETER (MNSUB   = 3)
      PARAMETER (MNSTACK = 6)

C  4. some derived quantities that must be treated explicitly (dummy dimensions for
C     special cases necessary

      PARAMETER (MLMAX1=MLMAX+1)
      PARAMETER (MLMMAX = MLMAX1*MLMAX1)

      PARAMETER (MNBRAV2 = MNBRAV)

      PARAMETER (MNCOMP= MNLTYPE-MNBRAV)
      PARAMETER (MLMT  = MNSUB*MLMMAX)
      PARAMETER (MNSUB2= MNSUB * (MNSUB-1)/2)
      PARAMETER (MLMG  = MNSUB2*MLMMAX*2)
      PARAMETER (MLMN  = MNSUB * MLMMAX)
      PARAMETER (MLM2N = 2*MLMN)
      PARAMETER (MLMNI = MNSUB*MLMMAX)


### PARAM file for LMAX = 13 ###

C  Dimension statements for Tensor LEED reference calculation, 
C  version v1.2

C  1. lattice symmetry

      PARAMETER (MIDEG=2,MNL1=2,MNL2=1)
      PARAMETER (MNL = MNL1*MNL2)

C  2. General calculational quantities

      PARAMETER (MKNBS = 2)
      PARAMETER (MKNT =  245)
      PARAMETER (MNPUN = 35, MNT0 = 35)
      PARAMETER (MNPSI = 236, MNEL = 3)
      PARAMETER (MLMAX = 13)
      PARAMETER (MNLMO = 114492, MNLM = 117677)

C  3. Parameters for (3D) geometry within (2D) unit mesh

      PARAMETER (MNSITE  = 3)
      PARAMETER (MNLTYPE = 7)
      PARAMETER (MNBRAV  = 1)
      PARAMETER (MNSUB   = 3)
      PARAMETER (MNSTACK = 6)

C  4. some derived quantities that must be treated explicitly (dummy dimensions for
C     special cases necessary

      PARAMETER (MLMAX1=MLMAX+1)
      PARAMETER (MLMMAX = MLMAX1*MLMAX1)

      PARAMETER (MNBRAV2 = MNBRAV)

      PARAMETER (MNCOMP= MNLTYPE-MNBRAV)
      PARAMETER (MLMT  = MNSUB*MLMMAX)
      PARAMETER (MNSUB2= MNSUB * (MNSUB-1)/2)
      PARAMETER (MLMG  = MNSUB2*MLMMAX*2)
      PARAMETER (MLMN  = MNSUB * MLMMAX)
      PARAMETER (MLM2N = 2*MLMN)
      PARAMETER (MLMNI = MNSUB*MLMMAX)


### PARAM file for LMAX = 14 ###

C  Dimension statements for Tensor LEED reference calculation, 
C  version v1.2

C  1. lattice symmetry

      PARAMETER (MIDEG=2,MNL1=2,MNL2=1)
      PARAMETER (MNL = MNL1*MNL2)

C  2. General calculational quantities

      PARAMETER (MKNBS = 2)
      PARAMETER (MKNT =  245)
      PARAMETER (MNPUN = 35, MNT0 = 35)
      PARAMETER (MNPSI = 236, MNEL = 3)
      PARAMETER (MLMAX = 14)
      PARAMETER (MNLMO = 160952, MNLM = 165152)

C  3. Parameters for (3D) geometry within (2D) unit mesh

      PARAMETER (MNSITE  = 3)
      PARAMETER (MNLTYPE = 7)
      PARAMETER (MNBRAV  = 1)
      PARAMETER (MNSUB   = 3)
      PARAMETER (MNSTACK = 6)

C  4. some derived quantities that must be treated explicitly (dummy dimensions for
C     special cases necessary

      PARAMETER (MLMAX1=MLMAX+1)
      PARAMETER (MLMMAX = MLMAX1*MLMAX1)

      PARAMETER (MNBRAV2 = MNBRAV)

      PARAMETER (MNCOMP= MNLTYPE-MNBRAV)
      PARAMETER (MLMT  = MNSUB*MLMMAX)
      PARAMETER (MNSUB2= MNSUB * (MNSUB-1)/2)
      PARAMETER (MLMG  = MNSUB2*MLMMAX*2)
      PARAMETER (MLMN  = MNSUB * MLMMAX)
      PARAMETER (MLM2N = 2*MLMN)
      PARAMETER (MLMNI = MNSUB*MLMMAX)


