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=unavailable autolearn_force=no version=3.4.4
X-FeedAbuse: http://nntpfeed.proxad.net/abuse.pl feeded by 78.192.65.63
Path: 
 border1.nntp.ams3.giganews.com!border1.nntp.ams2.giganews.com!border2.nntp.ams2.giganews.com!border4.nntp.ams.giganews.com!border2.nntp.ams.giganews.com!nntp.giganews.com!news.astraweb.com!border5.a.newsrouter.astraweb.com!feeder2-2.proxad.net!proxad.net!feeder1-2.proxad.net!nntpfeed.proxad.net!news.muarf.org!news.ecp.fr!news.jacob-sparre.dk!loke.jacob-sparre.dk!pnx.dk!.POSTED!not-for-mail
From: J Kimball <nntp@kmbll.com>
Newsgroups: comp.lang.ada
Subject: Re: Standard missing a 'Negative' subtype?...
Date: Mon, 30 Sep 2013 21:45:50 -0500
Organization: Jacob Sparre Andersen Research & Innovation
Message-ID: <l2dd0u$dg8$1@loke.gir.dk>
References: <7b66c649-3796-41ea-b734-a2b14d2dbac3@googlegroups.com>
 <e0b14a72-76a3-4a1e-8425-13168320ba3c@googlegroups.com>
NNTP-Posting-Host: 76.78.7.131
Mime-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 7bit
X-Trace: loke.gir.dk 1380595550 13832 76.78.7.131 (1 Oct 2013 02:45:50 GMT)
X-Complaints-To: news@jacob-sparre.dk
NNTP-Posting-Date: Tue, 1 Oct 2013 02:45:50 +0000 (UTC)
User-Agent: Mozilla/5.0 (X11; Linux x86_64;
 rv:23.0) Gecko/20100101 Thunderbird/23.0
In-Reply-To: <e0b14a72-76a3-4a1e-8425-13168320ba3c@googlegroups.com>
X-Original-Bytes: 1442
Xref: number.nntp.dca.giganews.com comp.lang.ada:183544
Date: 2013-09-30T21:45:50-05:00
List-Id: <comp.lang.ada>

On 09/14/2013 02:13 PM, mockturtle wrote:
> 
> Sorry, I could not resist... :-)
> 
>    subtype Answer is Integer range 42 .. 42;
> 
> 

I'd prefer a static predicate:

   subtype Answer is Integer with Static_Predicate => Answer = 42;