c Set parameters for array dimensioning for program MINTAB
c MINTAB 1.0  12/98 with changes up to 12/2011.

c  Array maximum dimensions
c               max1 =   8 = number of general parameters
c               max2 = 570 = number of species (component + derived)
c               max3 =  50 = number of gases
c               max4 =  70 = number of component species
c               max5 = 570 = number of variables (data columns) to output
c               max6 = 100 = unused
c               max7 = 500 = number of minerals in simulation

      parameter   (max1 = 8, max2 = 570, max3 = 50, max4 = 70,
     +             max5 = 570, max6 = 100, max7 = 500)

c  I/O devices:
c               inp1      main plot input file (i.e. chimplot.dat, solout.dat)
c               inp2      parameter input file (new list can be saved to INP2)
c               inp3      label file (chim-xpt/gasworks data only)
c               iout1     output file (tabulated data)
c               iunit1    chimout or workout file

      parameter   (inp1 = 10, inp2 = 11,  inp3 = 12,  iout1 = 13,
     +             iunit1=24)