From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00,FREEMAIL_FROM
	autolearn=unavailable autolearn_force=no version=3.4.4
X-Received: by 2002:a6b:ed0c:: with SMTP id n12mr6236029iog.259.1556376611463;
        Sat, 27 Apr 2019 07:50:11 -0700 (PDT)
X-Received: by 2002:a9d:7146:: with SMTP id y6mr3577774otj.213.1556376611342;
 Sat, 27 Apr 2019 07:50:11 -0700 (PDT)
Path: 
 eternal-september.org!reader01.eternal-september.org!feeder.eternal-september.org!feeder.erje.net!2.eu.feeder.erje.net!proxad.net!feeder1-2.proxad.net!209.85.166.216.MISMATCH!136no349821itk.0!news-out.google.com!w17ni293itb.0!nntp.google.com!136no349815itk.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Sat, 27 Apr 2019 07:50:11 -0700 (PDT)
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com;
 posting-host=2a01:5c0:e086:51a1:3d63:6504:aa7a:6907;
 posting-account=3Fg1FgoAAACfsmWScNfMD1tGFhR4DU0o
NNTP-Posting-Host: 2a01:5c0:e086:51a1:3d63:6504:aa7a:6907
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <4b46fe61-45af-4700-967c-503a4dafcee5@googlegroups.com>
Subject: matrix manipulation
From: hnptz@yahoo.de
Injection-Date: Sat, 27 Apr 2019 14:50:11 +0000
Content-Type: text/plain; charset="UTF-8"
Content-Transfer-Encoding: quoted-printable
Xref: reader01.eternal-september.org comp.lang.ada:56196
Date: 2019-04-27T07:50:11-07:00
List-Id: <comp.lang.ada>

Hi,

I would like to solve the following Ada-Programming demand:

bk :=3D3; Dv :=3D 4;

H : Real_Matrix(1..bk*Dv,1..bk*Dv);

type Block_Matrix
   is array (Positive range <>, Positive range <>) of Real_Matrix(1..Dv,1..=
Dv);

HB : Block_Matrix(1..bk,1..bk);

Now, there are 12 Block_Matrices which make up H. After calculation of all =
HB's I want to place them into H and ended up in coding of 8 different for =
loops. Is there a more elegant solution? I noticed that slicing would only =
work with a definition of linear arrays of a linear array, which does not f=
it for the rest of my program.