1* From: niles@fan745.gsfc.nasa.gov
2* To: fortran@gnu.org
3* Cc: niles@fan745.gsfc.nasa.gov
4* Subject: problem with DNINT() on Linux/Alpha.
5* Date: Sun, 06 Jun 1999 16:39:35 -0400
6* X-UIDL: 6aa9208d7bda8b6182a095dfd37016b7
7
8      IF (DNINT(0.0D0) .NE. 0.) CALL ABORT
9      STOP
10      END
11
12* Result on Linux/i386: " 0."  (and every other computer!)
13* Result on Linux/alpha: " 3.6028797E+16"
14
15* It seems to work fine if I change it to the generic NINT().  Probably
16* a name pollution problem in the new C library, but it seems bad. no?
17
18* 	Thanks,
19* 	Rick Niles.
20