Lines Matching refs:maxtypes

177       integer maxdata,maxtypes  local
178       parameter(maxdata=100,maxtypes=5)
184       real*8 table(4,0:maxdata,0:maxdata,maxtypes)
188       logical readfile(maxtypes)
190       data (readfile(i),i=1,maxtypes) / maxtypes*.false./
192       real*8  dx(2,maxtypes)
193       integer numdata(2,maxtypes)
211      &        maxdata,maxtypes)
396       integer maxdata,maxtypes  local
397       parameter(maxdata=200,maxtypes=2)
401       real*8 table(0:maxdata,2,maxtypes)
405       logical readfile(maxtypes)
407       data (readfile(i),i=1,maxtypes) / maxtypes*.false./
409       real*8  dx(maxtypes)
411       integer numdata(maxtypes)
429      &        maxdata,maxtypes)