home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #30 / NN_1992_30.iso / spool / comp / lang / fortran / 4755 < prev    next >
Encoding:
Internet Message Format  |  1992-12-16  |  2.3 KB
  1. Path: sparky!uunet!olivea!spool.mu.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. Message-ID: <DODD.92Dec16060307@mycenae.cchem.berkeley.edu>
  6. Date: 16 Dec 92 14:03:07 GMT
  7. References: <1992Dec15.170343.10342@craycos.com>
  8.     <DODD.92Dec15142737@mycenae.cchem.berkeley.edu> <gay.724466320@sfu.ca>
  9.     <1992Dec16.025109.24541@coe.montana.edu>
  10. Organization: Dept of Chemical Engineering, Polytechnic Univ, NY, USA
  11. Lines: 38
  12. NNTP-Posting-Host: mycenae.cchem.berkeley.edu
  13. In-reply-to: uesu03@giac1.oscs.montana.edu's message of Wed, 16 Dec 1992 02:51:09 GMT
  14.  
  15.  
  16. >>>>> "Lou" == Lou Glassy <uesu03@giac1.oscs.montana.edu> writes:
  17.  
  18.   Lou> Various attributions barbarously deleted to save space:
  19.  
  20.   Lou> !>>  Doctor>   101 Format (100 (' :-)'), /, ' For the Humor-impared.')
  21.   Lou> !>>  Doctor>       Write (Kout, 101)
  22.   Lou> !>>
  23.   Lou> !>> line 2: Error: attempt to use undefined variable "kout"
  24.   Lou> !>> line 2: Error: bad unit specifier type in write statement
  25.   Lou> !>> Compilation failed
  26.   Lou> !
  27.   Lou> !>  James> Real FORTRAN programmers always write to unit 6, and then bitch about
  28.   Lou> !>  James> the compiler being broken when it doesn't work.  write(*,101) is for
  29.   Lou> !>  James> sissies :-)
  30.   Lou> !
  31.   Lou> !>  [no, REAL PROGRAMMERS code like this...]
  32.   Lou> !
  33.   Lou> !>  85367 FORMAT(100(':-)')/'FOR THE HUMOR-IMPARED.')
  34.   Lou> !>        WRITE(6,85367)
  35.   Lou> !
  36.   Lou> ![and Ian adds: "Don't real programmers say 3H:-) etc?"]
  37.  
  38.   Lou> Ugh!  That explains it!  Hollerith Constants!  Last year, an instructor
  39.   Lou> handed out a small numeric code that followed all of the qualities
  40.   Lou> listed by {Doctor FORTRAN| James|Laurence|Ian}.  No unnecessary spaces
  41.   Lou> or commas, all caps, 98.7% of variables were 2 or 3 characters in
  42.   Lou> length, and a whopping 5 comments in about 1500 lines of source.
  43.   Lou> Blecch!  He did with things with EQUIVALENCE no maintenance programmer
  44.   Lou> would repeat in polite company...
  45.  
  46. sounds like my kinda code. were the comments along the lines of "FIND X AND
  47. OTHER QUANTITIES?" or "THE CODE IS TOO COMPLICATED TO EXPLAIN?"
  48.  
  49. so are we agreed that the final version would be the following?
  50.  
  51. 85367 FORMAT(100(3H:-))/22HFOR THE HUMOR-IMPARED.)
  52.       WRITE(6,85367)
  53.