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 autolearn=ham
	autolearn_force=no version=3.4.4
X-Google-Thread: 103376,35edde140291c79e
X-Google-NewGroupId: yes
X-Google-Attributes: gida07f3367d7,domainid0,public,usenet
X-Google-Language: ENGLISH,ASCII-7-bit
Received: by 10.204.154.133 with SMTP id o5mr1184063bkw.0.1335543812789;
        Fri, 27 Apr 2012 09:23:32 -0700 (PDT)
Path: 
 h15ni172068bkw.0!nntp.google.com!news2.google.com!news.glorb.com!feeder.erje.net!news-1.dfn.de!news.dfn.de!fu-berlin.de!uni-berlin.de!individual.net!not-for-mail
From: Bill Findlay <yaldnif.w@blueyonder.co.uk>
Newsgroups: comp.lang.ada
Subject: Re: Can Ada iterate over Nd array?
Date: Fri, 27 Apr 2012 17:23:32 +0100
Message-ID: <CBC08694.144F6%yaldnif.w@blueyonder.co.uk>
References: <slrnjphkhm.h4f.oka.sux@localhost.localdomain>
 <jnan0d$i2m$1@tornado.tornevall.net>
 <slrnjphp76.i6m.oka.sux@localhost.localdomain>
 <393172.2032.1335455290715.JavaMail.geo-discussion-forums@yntt13>
Mime-Version: 1.0
X-Trace: individual.net cz4FmCGOPHa7/RiJ0cbCowb1RbB95t/VG/KGv6mLJZQgPGqUBt
Cancel-Lock: sha1:SOdIQk3KaokvzbAOpiV70hL1vHs=
User-Agent: Microsoft-Entourage/12.32.0.111121
Thread-Topic: Can Ada iterate over Nd array?
Thread-Index: Ac0kkhY0XOVPwHixhkiZw/wL2d4KnA==
Content-Type: text/plain;
	charset="US-ASCII"
Content-Transfer-Encoding: 7bit
Date: 2012-04-27T17:23:32+01:00
List-Id: <comp.lang.ada>

On 26/04/2012 16:48, in article
393172.2032.1335455290715.JavaMail.geo-discussion-forums@yntt13, "Adam
Beneschan" <adam@irvine.com> wrote:

> I don't think I've *ever* seen an array with more than three dimensions ever
> used, in 35 years of programming.

>From a Pascal compiler, written 36 years ago:

TYPE 
   CHECKRANGE   = (POSITIVE,NEGATIVE,POSORNEG) ;
VAR
   CHECKROUTINE : ARRAY [CHECKRANGE, (* +VE,-VE,OR EITHER *)
                         BOOLEAN,    (* OVERFLOW TEST NECESSARY *)
                         BOOLEAN,    (* MAX TEST NECESSARY *)
                         BOOLEAN,    (* MIN TEST NECESSARY *)
                         BOOLEAN     (* SIGN TEST NECESSARY *)
                        ] OF MONITORROUTINES;

I admit that it was noteworthy even then.

-- 
Bill Findlay
with blueyonder.co.uk;
use  surname & forename;