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=0.3 required=5.0 tests=BAYES_00,STOX_REPLY_TYPE,
	STOX_REPLY_TYPE_WITHOUT_QUOTES,XPRIO autolearn=no autolearn_force=no
	version=3.4.4
Path: 
 eternal-september.org!reader01.eternal-september.org!feeder.eternal-september.org!news.uzoreto.com!news.redatomik.org!newsfeed.xs4all.nl!newsfeed9.news.xs4all.nl!nzpost2.xs4all.net!news.kpn.nl!not-for-mail
From: "ldries46" <bertus.dries@planet.nl>
Newsgroups: comp.lang.ada
Subject: Constant Record
Date: Sat, 8 Dec 2018 16:58:22 +0100
MIME-Version: 1.0
Content-Type: text/plain;
	format=flowed;
	charset="iso-8859-1";
	reply-type=original
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
Importance: Normal
X-Newsreader: Microsoft Windows Live Mail 16.4.3528.331
X-MimeOLE: Produced By Microsoft MimeOLE V16.4.3528.331
Message-ID: <5c0bea20$0$25694$e4fe514c@news.kpn.nl>
NNTP-Posting-Host: 8ee62d75.news.kpn.nl
X-Trace: 
 G=9XIlGWAl,C=U2FsdGVkX1+lpInuCrXWOQsPwWOGKi1LlpXa7+24Ai5kvjvNL/7eogQihYz9pZ7m+cRQwu52P7bf9uomawa8ocI//QVrzSCHZwP3nMAgTSU=
X-Complaints-To: abuse@kpn.nl
Xref: reader01.eternal-september.org comp.lang.ada:54976
Date: 2018-12-08T16:58:22+01:00
List-Id: <comp.lang.ada>

I have  simple record for instance

Type alpha is record
    element1 : integer;
    element2 : double_float;
end record;

apart from calculating thins with the record I do neen som constants of the 
record
  that could be:
   element1 must be 5
   element 2 must de 107.546

and another
element1 must be -2 and the other 547.24

Is it possible to make a constant by
declaring something like
   rt : constant alpha :=(5, 107.547)   and
   xt : constant apha :=( -2, 547.547)

This would be nice