Right. I know it works with numeric indexes in Pascal. My point was that (using my previous example) in Ada it works with any discrete type, in that case characters (which are not numbers in disguise in Ada) so I can do this:
Histogram : Character_Histogram;
...
Histogram['A'] := Histogram['A'] + 1;