home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #27 / NN_1992_27.iso / spool / comp / lang / fortran / 4399 < prev    next >
Encoding:
Internet Message Format  |  1992-11-21  |  1.2 KB
  1. Path: sparky!uunet!cs.utexas.edu!rutgers!flop.ENGR.ORST.EDU!gaia.ucs.orst.edu!pmontgom
  2. From: pmontgom@math.orst.edu (Peter Montgomery)
  3. Newsgroups: comp.lang.fortran
  4. Subject: Re: How does one return a logical value...???
  5. Message-ID: <1emiqnINNrs1@talon.UCS.ORST.EDU>
  6. Date: 22 Nov 92 00:04:39 GMT
  7. References: <kf2iy2_00YUo8INXQF@andrew.cmu.edu> <BxzC1x.n0s@news.cso.uiuc.edu> <1992Nov20.210324.3906@draco.macsch.com>
  8. Organization: Oregon State University Math Department
  9. Lines: 22
  10. NNTP-Posting-Host: lab12.math.orst.edu
  11.  
  12. In article <1992Nov20.210324.3906@draco.macsch.com>
  13. dnl@convex.is.macsch.com (David Lombard) writes:
  14.  
  15. >The following statement is fairly clear:
  16.  
  17. >    IF( A.EQ.B .EQV. C.EQ.D ) ...
  18.  
  19. >What would you do with this phantom?
  20.  
  21. >    IF( A.EQ.B .EQ. C.EQ.D ) ...
  22.  
  23.  
  24.     There is no ambiguity if A, B, C, D are all type logical,
  25. since logical equality is an associative operation
  26. (A .EQV. (B .EQV. C))  is equivalent to  ((A .EQV. B) .EQV. C).
  27. If the operands are numeric, they can be paired off starting from the left.
  28.  
  29.  
  30.  
  31. -- 
  32.         Peter L. Montgomery              Internet: pmontgom@math.orst.edu
  33.         Dept. of Mathematics, Oregon State Univ, Corvallis, OR 97331-4605 USA
  34.