C     SET THE MAXIMUM NUMBER OF FEATURES, F10.7S, SZAS, AND COEFFICIENTS
      INTEGER MNFEAT, MNF10P7, MNSZA, MNCOEFF
      PARAMETER (MNFEAT=12)
      PARAMETER (MNF10P7=3)
      PARAMETER (MNSZA=8)
      PARAMETER (MNCOEFF=10)

C     MAXIMUM NUMBER OF COLUMN DENSITIES
      INTEGER MNDEN
      PARAMETER (MNDEN=100)

C     MAXIMUM FILE NAME LENGTH
      INTEGER MFLNML
      PARAMETER (MFLNML=256)

C     THE UNIT NUMBER USED TO READ IN THE COEFFICIENTS
      INTEGER COEFFUNIT
      PARAMETER (COEFFUNIT=25)