Path: utzoo!utgpu!news-server.csri.toronto.edu!bonnie.concordia.ca!thunder.mcrcim.mcgill.edu!snorkelwacker.mit.edu!usc!zaphod.mps.ohio-state.edu!sdd.hp.com!ucsd!ucbvax!IBM.COM!JBS
From: JBS@IBM.COM
Newsgroups: comp.lang.fortran
Subject: detecting Nan's
Message-ID: <9101110259.AA28451@ucbvax.Berkeley.EDU>
Date: 11 Jan 91 02:56:52 GMT
Sender: daemon@ucbvax.BERKELEY.EDU
Lines: 5

>      if(dnum*0d0 .ne. 0d0) write(*,1)
>1     format(' The variable dnum is equal to NAN!')

       Is this correct?  Suppose dnum is Inf.
                          James B. Shearer