This is the mail archive of the fortran@gcc.gnu.org mailing list for the GNU Fortran project.

Index Nav:	[Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav:	[Date Prev] [Date Next]	[Thread Prev] [Thread Next]
Other format:	[Raw text]

Re: INT(x) == 1 if x < 1?

From: FX Coudert <fxcoudert at gmail dot com>
To: Daniel Franke <franke dot daniel at gmail dot com>
Cc: fortran at gcc dot gnu dot org
Date: Sun, 29 Oct 2006 23:37:03 +0100
Subject: Re: INT(x) == 1 if x < 1?
References: <200610292312.15297.franke.daniel@gmail.com> <B2988DFE-91EA-4DF3-B553-645D124EC3C2@gmail.com> <200610292329.10892.franke.daniel@gmail.com>

As the standard requires (13.14.85, F95 final draft), RANDOM_NUMBER () shall return a harvest x in the range 0 <= x < 1. Therefore, on REAL :: x; RANDOM_NUMBER(x), INT(x) must(?) equal zero. As I learned the hard way, this is not always true?!

No, that's always true. RANDOM_NUMBER sets x to a machine- representible number that lies between 0 (inclusively) and 1 (exclusively). Since it's a machine representible number, it will not be converted to the nearest machine representible number; this only happens when you write number in base 10, in the program, or when you read them by formatted I/O.

FX

References:
- INT(x) == 1 if x < 1?
  - From: Daniel Franke
- Re: INT(x) == 1 if x < 1?
  - From: FX Coudert
- Re: INT(x) == 1 if x < 1?
  - From: Daniel Franke

Index Nav:	[Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav:	[Date Prev] [Date Next]	[Thread Prev] [Thread Next]