home *** CD-ROM | disk | FTP | other *** search
- Newsgroups: comp.lang.fortran
- Path: sparky!uunet!cs.utexas.edu!sdd.hp.com!saimiri.primate.wisc.edu!usenet.coe.montana.edu!giac1.oscs.montana.edu!uesu03
- From: uesu03@giac1.oscs.montana.edu (Lou Glassy)
- Subject: Re: Real Programmers
- Message-ID: <1992Dec16.025109.24541@coe.montana.edu>
- Keywords: n
- Sender: usenet@coe.montana.edu (USENET News System)
- Organization: Montana State University, Bozeman MT
- References: <1992Dec15.170343.10342@craycos.com> <DODD.92Dec15142737@mycenae.cchem.berkeley.edu> <gay.724466320@sfu.ca>
- Date: Wed, 16 Dec 1992 02:51:09 GMT
- Lines: 36
-
- Various attributions barbarously deleted to save space:
-
- !>> Doctor> 101 Format (100 (' :-)'), /, ' For the Humor-impared.')
- !>> Doctor> Write (Kout, 101)
- !>>
- !>> line 2: Error: attempt to use undefined variable "kout"
- !>> line 2: Error: bad unit specifier type in write statement
- !>> Compilation failed
- !
- !> James> Real FORTRAN programmers always write to unit 6, and then bitch about
- !> James> the compiler being broken when it doesn't work. write(*,101) is for
- !> James> sissies :-)
- !
- !> [no, REAL PROGRAMMERS code like this...]
- !
- !> 85367 FORMAT(100(':-)')/'FOR THE HUMOR-IMPARED.')
- !> WRITE(6,85367)
- !
- ![and Ian adds: "Don't real programmers say 3H:-) etc?"]
-
- Ugh! That explains it! Hollerith Constants! Last year, an instructor
- handed out a small numeric code that followed all of the qualities
- listed by {Doctor FORTRAN| James|Laurence|Ian}. No unnecessary spaces
- or commas, all caps, 98.7% of variables were 2 or 3 characters in
- length, and a whopping 5 comments in about 1500 lines of source.
- Blecch! He did with things with EQUIVALENCE no maintenance programmer
- would repeat in polite company...
-
- :-)
-
- Lou
- --
- Lou Glassy (uesu03@giac1.oscs.montana.edu) // That was the equation!
- Earth Sci. Dept., Montana State University \\ Existence!...Survival must
- Bozeman, Montana 59715 USA {on planet 3, // cancel out programming!
- Sol System, Orion Arm, Milky Way Galaxy} \\ -- Rok
-