block data ovindex
      implicit none
      include 'types.f'
      include 'TRmaxindex.f'
      data maxcindex,maxdindex,maxeindex/3,4,5/
      end