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 10.107.8.169 with SMTP id h41mr3519237ioi.66.1512019800453;
        Wed, 29 Nov 2017 21:30:00 -0800 (PST)
X-Received: by 10.157.32.78 with SMTP id n72mr129811ota.12.1512019800386; Wed,
 29 Nov 2017 21:30:00 -0800 (PST)
Path: 
 eternal-september.org!reader01.eternal-september.org!reader02.eternal-september.org!feeder.eternal-september.org!paganini.bofh.team!weretis.net!feeder6.news.weretis.net!feeder.usenetexpress.com!feeder-in1.iad1.usenetexpress.com!border1.nntp.dca1.giganews.com!nntp.giganews.com!193no240753itr.0!news-out.google.com!x87ni330ita.0!nntp.google.com!i6no247243itb.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Wed, 29 Nov 2017 21:30:00 -0800 (PST)
In-Reply-To: <95301c38-9b3b-488a-a1c8-2728620bd386@googlegroups.com>
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com;
 posting-host=97.117.255.82;
 posting-account=x5rpZwoAAABMN2XPwcebPWPkebpwQNJG
NNTP-Posting-Host: 97.117.255.82
References: <d8c0ce45-97ad-4475-b3f9-1662a875a576@googlegroups.com>
 <e3a1f97e-7cbd-4327-aef6-c18ca9e74bc2@googlegroups.com>
 <ovidu5$eip$1@franka.jacob-sparre.dk>
 <ac428886-d567-4692-b8b7-22fcb69a755f@googlegroups.com>
 <95301c38-9b3b-488a-a1c8-2728620bd386@googlegroups.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <abab4c00-fbc9-4321-baab-8553a4e8c8a8@googlegroups.com>
Subject: Re: How to access an array using two different indexing schemes
From: Jerry <list_email@icloud.com>
Injection-Date: Thu, 30 Nov 2017 05:30:00 +0000
Content-Type: text/plain; charset="UTF-8"
Xref: reader02.eternal-september.org comp.lang.ada:49269
Date: 2017-11-29T21:30:00-08:00
List-Id: <comp.lang.ada>

On Wednesday, November 29, 2017 at 8:01:35 AM UTC-7, AdaMagica wrote:
> A bit clumsy, but:
> 
> X(0) := ...;
> RV1_5(X) (1) := ...;  -- didn't try, might work
> print (x(0));
> print (RV1_5(X)(1));

With declarations

    x : Real_Vector(0 .. 4);  
    subtype RV1_5 is Real_Vector(1 .. 5);

then in the procedure

    RV1_5(x) (1) := 20.0;

GNAT complains

"left hand side of assignment must be a variable"