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.13.210.129 with SMTP id u123mr2043451ywd.148.1474156432708;
        Sat, 17 Sep 2016 16:53:52 -0700 (PDT)
X-Received: by 10.157.8.10 with SMTP id 10mr1443569oty.16.1474156432671; Sat,
 17 Sep 2016 16:53:52 -0700 (PDT)
Path: 
 eternal-september.org!reader01.eternal-september.org!reader02.eternal-september.org!news.eternal-september.org!news.eternal-september.org!feeder.eternal-september.org!usenet.blueworldhosting.com!feeder01.blueworldhosting.com!peer01.iad.highwinds-media.com!news.highwinds-media.com!feed-me.highwinds-media.com!m9no939437qte.0!news-out.google.com!w143ni4389itb.0!nntp.google.com!x192no1614008itb.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Sat, 17 Sep 2016 16:53:52 -0700 (PDT)
In-Reply-To: <nrkav0$apq$1@dont-email.me>
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com;
 posting-host=2601:18f:900:8350:8d85:68c7:4e3c:581;
 posting-account=3pYsyQoAAACcI-ym7XtMOI2PDU8gRZS5
NNTP-Posting-Host: 2601:18f:900:8350:8d85:68c7:4e3c:581
References: <5db08ea5-c088-4d16-9d88-d058e4bc48df@googlegroups.com>
 <nrkav0$apq$1@dont-email.me>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <22711120-cd3d-4b1d-8cc4-a0571337c3e6@googlegroups.com>
Subject: Re: Ada.Numerics.Float_Random.Generator question
From: Andrew Shvets <andrew.shvets@gmail.com>
Injection-Date: Sat, 17 Sep 2016 23:53:52 +0000
Content-Type: text/plain; charset=UTF-8
X-Received-Bytes: 1915
X-Received-Body-CRC: 4122381239
Xref: news.eternal-september.org comp.lang.ada:31804
Date: 2016-09-17T16:53:52-07:00
List-Id: <comp.lang.ada>

On Saturday, September 17, 2016 at 5:01:29 PM UTC-4, Jeffrey R. Carter wrote:
> On 09/17/2016 12:40 PM, Andrew Shvets wrote:
> > Hello,
> > 
> > If I want a random float number to be generated, the way that I did this in the past was something along these lines:
> > 
> >   function Create_Random_Float(
> >     From : in Float;
> >     To : in Float)
> >       return Float is
> > 
> >     Seed : Ada.Numerics.Float_Random.Generator;
> >   begin
> >     Ada.Numerics.Float_Random.Reset(Seed);
> > 
> >     return From + (Ada.Numerics.Float_Random.Random(Seed) * To);
> >   end Create_Random_Float;
> > 
> > This works.  
> 
> No, it doesn't. If From is 5 and To is 10, This gives a value in 5 .. 15.

You're right.