home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #30 / NN_1992_30.iso / spool / comp / lang / fortran / 4735 < prev    next >
Encoding:
Internet Message Format  |  1992-12-15  |  1.6 KB
  1. Path: sparky!uunet!zaphod.mps.ohio-state.edu!magnus.acs.ohio-state.edu!usenet.ins.cwru.edu!agate!agate.berkeley.edu!dodd
  2. From: dodd@mycenae.cchem.berkeley.edu (Lawrence R. Dodd)
  3. Newsgroups: comp.lang.fortran
  4. Subject: Re: Real Programmers
  5. Date: 15 Dec 92 14:27:37
  6. Organization: Dept of Chemical Engineering, Polytechnic Univ, NY, USA
  7. Lines: 25
  8. Message-ID: <DODD.92Dec15142737@mycenae.cchem.berkeley.edu>
  9. References: <DODD.92Dec12062844@mycenae.cchem.berkeley.edu>
  10.     <1992Dec14.235245.2307@ultb.isc.rit.edu>
  11.     <DODD.92Dec15053719@mycenae.cchem.berkeley.edu>
  12.     <1992Dec15.170343.10342@craycos.com>
  13. Reply-To: dodd@roebling.poly.edu
  14. NNTP-Posting-Host: mycenae.cchem.berkeley.edu
  15. In-reply-to: jrbd@craycos.com's message of 15 Dec 92 17:03:43 GMT
  16.  
  17.  
  18. >>>>> "James" == James Davies <jrbd@craycos.com> writes:
  19.  
  20.   James> In article <DODD.92Dec15053719@mycenae.cchem.berkeley.edu> dodd@roebling.poly.edu writes:
  21. >
  22. >>>>>> "Doctor" == Doctor FORTRAN <jsvrc@rc.rit.edu> writes:
  23. >
  24. >  Doctor>   101 Format (100 (' :-)'), /, ' For the Humor-impared.')
  25. >  Doctor>       Write (Kout, 101)
  26. >
  27. > line 2: Error: attempt to use undefined variable "kout"
  28. > line 2: Error: bad unit specifier type in write statement
  29. > Compilation failed
  30.  
  31.   James> Real FORTRAN programmers always write to unit 6, and then bitch about
  32.   James> the compiler being broken when it doesn't work.  write(*,101) is for
  33.   James> sissies :-)
  34.  
  35. Real FORTRAN programmers don't use lowercase letters, no excess space, no
  36. commas unless the compiler complains, and no unit number that can be
  37. remembered. so
  38.  
  39.  85367 FORMAT(100(':-)')/'FOR THE HUMOR-IMPARED.')
  40.        WRITE(6,85367)
  41.        
  42.