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.20.193 with SMTP id 184mr14113650iou.138.1517125706341;
        Sat, 27 Jan 2018 23:48:26 -0800 (PST)
X-Received: by 10.157.85.15 with SMTP id l15mr1296740oth.12.1517125706173;
 Sat, 27 Jan 2018 23:48:26 -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!w142no381993ita.0!news-out.google.com!s63ni439itb.0!nntp.google.com!g80no378459itg.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Sat, 27 Jan 2018 23:48:26 -0800 (PST)
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com;
 posting-host=87.116.179.50;
 posting-account=z-xFXQkAAABpEOAnT3LViyFXc8dmoW_p
NNTP-Posting-Host: 87.116.179.50
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <a4013ab6-82f1-4e25-98d3-746b9e56844b@googlegroups.com>
Subject: Card game deck but with trumps suit for tarot "divination" Is there a
 better way than enumerating all cards?
From: bozovic.bojan@gmail.com
Injection-Date: Sun, 28 Jan 2018 07:48:26 +0000
Content-Type: text/plain; charset="UTF-8"
Content-Transfer-Encoding: quoted-printable
Xref: reader02.eternal-september.org comp.lang.ada:50189
Date: 2018-01-27T23:48:26-08:00
List-Id: <comp.lang.ada>

These cards contain of 4 suits of 14 cards each, and special "trump" so cal=
led "major arcana" cards, 22 of them, for total of 78 cards. I created enum=
eration type and listed all 78 cards (with Tarot_Card'Pos of course 0..77 a=
n Tarot_Card_Position in that range, and Deck as array(Tarot_Card_Position)=
 of Card_Properties record with name and meaning fields. Using Ada.Numerics=
.Discrete_Random it works, but I wonder if better solution is possible)! Wh=
en I've tried to make 4 suits of 14 cards and 22 cards in trump "suit" I ho=
wever failed to see a solution and how I would iterate over such type, so I=
 wonder if that route is possible. Thanks!