Re: Arrays in Ada 2020

[Simon Wright <simon@pushface.org>]

Robert Eachus <rieachus@comcast.net> writes:

>    function Unit_Matrix (Order           : Positive;
>                          First_1, First_2 : Integer := 1)
>                                             return Real_Matrix is
>       Result: Real_Matrix(First_1..First_1+Order,
>                      First_2..First_2+Order) := (others => 
>                                                 (others => 0.0));
>    begin
>      for I in First_1..First_1+Order loop
>         Result(I, I-First_1+First_2) := 1.0;
>      end loop;
>      return Result;
>    end Unit_Matrix;

Isn't that 1 larger in each dimension than it should be?