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