matrix

matrix

[Daniel Sch�le]

Hi all

type matrix is array(integer range <>, integer range <>) of integer;
..
m: matrix(1..10, 1..5);
..
for i in m'first..m'last loop                -- 1 to 10
    for j in m(i)'first .. m(i)'last loop    -- doesnt work
        put(m(i, j)'image);
    end loop;
end loop;


what is the proper way to iterate through the matrix?

thanks for answears

--
Daniel

Re: matrix

[Lutz Donnerhacke]

* Daniel Sch�le wrote:
> what is the proper way to iterate through the matrix?

with Ada.Text_IO;
use Ada.Text_IO;

procedure t is
   type Matrix is array(Integer range <>, Integer range <>) of Integer;
   m: Matrix(1..10, 1..5) := (
     2 .. 5 => (3 .. 4 => 1, others => 0),
     others => (others => 0)
   );
begin
   for x in m'Range(1) loop
      for y in m'Range(2) loop
         Put(Integer'Image(m(x, y)));
      end loop;
      New_Line;
   end loop;
end t;