home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #27 / NN_1992_27.iso / spool / comp / lang / fortran / 4346 < prev    next >
Encoding:
Text File  |  1992-11-18  |  1.0 KB  |  29 lines
  1. Newsgroups: comp.lang.fortran
  2. Path: sparky!uunet!usc!zaphod.mps.ohio-state.edu!uwm.edu!ux1.cso.uiuc.edu!cs.uiuc.edu!sparc0b!ctaylor
  3. From: ctaylor@cs.uiuc.edu (Conrad W Taylor)
  4. Subject: How does one return a logical value...???
  5. Message-ID: <BxwrJC.GME@cs.uiuc.edu>
  6. Sender: news@cs.uiuc.edu
  7. Organization: University of Illinois at Urbana-Champaign
  8. Date: Wed, 18 Nov 1992 10:52:22 GMT
  9. Lines: 18
  10.  
  11.          I have written a function which returns a logical
  12. value, CheckActivity(previous, ROWS, COLS), previous is an
  13. array.  I'm using it like this:
  14.  
  15.         IF (CheckActivity(previous, ROWS, COLS) .EQ.  .TRUE.) THEN
  16.           uncontrol = uncontrol + 1
  17.         ENDIF
  18.  
  19. My compiler says that I have mixed types when I use .TRUE. .  What
  20. should I use I tried T instead of .TRUE. . It doesn't give errors
  21. but it doesn't increment the uncontrol... it never goes into the
  22. IF statement; skips it completely.  I'm new to FORTRAN and please
  23. if anyone knows what I should do, let me know via e-mail.  Thanks
  24. in advance to all that reply to my e-mail.
  25.  
  26. -Conrad
  27.  
  28.  
  29.