Re: délcarer un array sans indices.

[Adrian Knoth <adi@thur.de>]

Jean-Baptiste CAMPESATO <camje_lemon@nospam.a2lf.org> wrote:

> Par exemple, j'ai le type :
> type Matrice is array ( Integer range <>, Integer range <>) of Float; 
> Je souhaite d�clarer une variable gauss, sans indices, de type Matrice et
> plus tard dans le programme, suite a une intervention de l'utilisteur
> donner les indices ad�quates.

Sorry for not answering en fran�aise, I hope you'll still be able
to understand the response:

procedure jean is
   type Matrice is array ( Integer range <>, Integer range <>) of Float;

   procedure something (a, b, c, d : in Positive ) is
      gauss : Matrice (a .. b, c .. d);
   begin
      null;
   end something;

   a, b, c, d : Positive;

begin
   a := 1;
   b := 300;
   c := 1;
   d := 200;
   something (a, b, c, d);
end jean;

Just ask your user about the real values of a,b,c,d. For a large
matrix it could be better to allocate heap memory:

   type Matrice_ptr is access Matrice;
   gauss : Matrice_ptr := new Matrice (a .. b, c .. d);


-- 
mail: adi@thur.de  	http://adi.thur.de	PGP: v2-key via keyserver

Das Fleisch war willig, doch das Gras war na�