Arrays in Ada 2012

[Anatoly Chernyshev <achernyshev@gmail.com>]

Hello everyone,

Consider the following nice Ada 2012 construct:

--
procedure test is
   type a1 is array(1..35,1..35,1..35,1..35,1..35,1..35) of long_long_integer;
   ab:a1;
   cnt:long_long_integer:=0;
begin
  for e of ab loop
      cnt:=cnt+1;
      e:=cnt;
   end loop;
end test;
--

Is there a way (e.g. some attribute) to find the  indices of the array for a current e within the cycle above?

Suppose, I want to calculate something with the indices, or have an exit condition.

Of course, I can always build a standard set of for loops, but I already get addicted to that new concept, so don't want to look back.

Thanks in advance.