Re: 1.0d0 stored as integer?



You might find that you get 1 even for values that aren't exactly 1,
but close, such as 1.000001.

No, you don't:

(gdb) n
x1: 1.00000000000000000
9 write(*,*) "x2: ", x2
(gdb) n
x2: 1.1234567890123457
11 x1 = nearest(x1,10._8)
(gdb) n
12 write(*,*) "x1: ", x1
(gdb) p x1
$3 = 1.0000000000000002

--
FX
.