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.224.42.141 with SMTP id s13mr2357400qae.3.1371626998295;
        Wed, 19 Jun 2013 00:29:58 -0700 (PDT)
X-Received: by 10.50.196.227 with SMTP id ip3mr850886igc.10.1371626998259;
 Wed, 19 Jun 2013 00:29:58 -0700 (PDT)
Path: 
 eternal-september.org!reader01.eternal-september.org!reader02.eternal-september.org!news.eternal-september.org!news.eternal-september.org!mx05.eternal-september.org!feeder.eternal-september.org!news.bbs-scene.org!border4.nntp.dca.giganews.com!border2.nntp.dca.giganews.com!nntp.giganews.com!bw2no2257369qab.0!news-out.google.com!y6ni3510qax.0!nntp.google.com!j2no786545qak.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Wed, 19 Jun 2013 00:29:57 -0700 (PDT)
In-Reply-To: 
 <6c58fae4-6c34-4d7a-ab71-e857e55897c0@x6g2000vbj.googlegroups.com>
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com;
 posting-host=58.106.130.125;
 posting-account=F3TDuQoAAAAHsGBvreq_7TorEcO_luZM
NNTP-Posting-Host: 58.106.130.125
References: 
 <19595886.4450.1332248078686.JavaMail.geo-discussion-forums@vbbfy7>
 <2012032020582259520-rblove@airmailnet> <jkc59a$hs5$2@speranza.aioe.org>
 <12ee9bc5-3bdf-4ac0-b805-5f10b3859ff4@googlegroups.com>
 <vhcvr8d4kq6ribdqeeb0b857ei5aa5luiv@4ax.com>
 <6c58fae4-6c34-4d7a-ab71-e857e55897c0@x6g2000vbj.googlegroups.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <9a8671ee-7e46-4574-9505-9ecbce0dec89@googlegroups.com>
Subject: Re: Ada advocacy
From: nevillednz@gmail.com
Injection-Date: Wed, 19 Jun 2013 07:29:58 +0000
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: quoted-printable
Xref: news.eternal-september.org comp.lang.ada:15823
Date: 2013-06-19T00:29:57-07:00
List-Id: <comp.lang.ada>

On Tuesday, 18 June 2013 15:55:23 UTC+10, Peter Brooks  wrote:
> On Jun 18, 3:28=A0am, Dennis Lee Bieber <wlfr...@ix.netcom.com> wrote:
> > =A0 =A0 =A0 =A0 Ada was basically the first LANGUAGE that defined multi=
-tasking=20
> >         IN THE LANGUAGE itself.
> The second. Algol68 did.

c.f. http://rosettacode.org/wiki/Sorting_algorithms/Quicksort#ALGOL_68
    PAR ( # remove PAR for single threaded sort #
      qsort(array[:i-1], cmp),
      qsort(array[i+1:], cmp)
    )

Blink and you might miss it! :-)

See also:
* http://rosettacode.org/wiki/Synchronous_concurrency#ALGOL_68
* http://rosettacode.org/wiki/Matrix_multiplication#Parallel_processing
* http://rosettacode.org/wiki/Generator/Exponential#ALGOL_68

The last example creates kind of a pipeline...

NJoy
NevilleDNZ