// EXEC FWCLG,PARM='NOSOURCE'
//SYSIN DD *
      CHARACTER*80 CARD
      WRITE(6,220)
220   FORMAT('1')
1     READ(5,1000,END=9999)CARD
1000  FORMAT(A80)
      WRITE(6,1001)CARD
1001  FORMAT(' ',T22,A80)
      GO TO 1
9999  STOP
      END
//DATA.INPUT DD *
                       GLOSSARY OF TERMS CAUSING TROUBLE



I        THE FIRST LAW OF THE COMPUTER:
              I AM A COMPUTER, I AM DUMMER THAN A HUMAN, AND SMARTER THAN
              A PROGRAMMER.

II       LLOYD'S FIRST LAW:
              EVERY PROGRAM CONTAINS ONE BUG.

III      EGGLESTON'S EXTENSION PRINCIPLES:
              PROGRAMMING ERRORS WHICH WOULD NORMALLY TAKE ONE DAY TO FIND
              WILL TAKE FIVE DAYS TO FIND IF THE PROGRAMMER IS IN A HURRY.

IV       GUMPERSON'S LEMMA:
              THE PROBABILITY OF A GIVEN EVENT HAPPENING IS INVERSLEY
              PROPORTIONAL TO ITS DESIRABILITY.

V        WEIRSTACK'S WELL-ORDERING PRINCIPLE:
              THE DATA NEEDED FOR YESTERDAY'S DEBUG SHOT MUST BE REQUESTED
              NO LATER THAN NOON TOMORROW.

VI       FENSTER'S LAW OF FRUSTRATION:
              IF YOU WRITE A PROGRAM WITH NO ERROR STOPS OR DIAGNOSTICS,
              YOU WILL GET RANDOM NUMBERS FOR YOUR OUTPUT. (THIS CAN,
              INCIDENTALLY, BE USED TO AN ADVANTAGE). HOWEVER, IF YOU WRITE
              A PROGRAM WITH 500 ERROR STOPS OR DIAGNOSTIC MESSAGES, THEY
              ALL WILL OCCUR.

VII      PROUDFOOT'S LAW OF THE GOOD BET:
              IF SOMEONE CLAIMS THAT YOU CAN ASSUME THE INPUT DATA TO BE
              CORRECT, ASK THEM TO PROMISE YOU A DOLLAR FOR EVERY INPUT ERROR.

VIII     THE LAW OF THE SOLID GOOF:
              IN ANY PROGRAM, THE PART THAT IS MOST OBVIOUSLY CORRECT BEYOND
              ALL NEED OF CHANGING IS THE PART THAT IS TOTALLY WRONG.

         COROLLARY A:   NO ONE YOU ASK WILL SEE IT EITHER!

         COROLLARY B:   ANYONE WHO STOPS WITH UNSOUGHT ADVISE WILL SEE IT
                        IMMEDIATELY!

IX       WYLLIE'S LAW:
              LET N BE THE NUMBER OF THE LAST CATEGORY I JOB RUN AT THE
              COMPUTER CENTER, THEN THE NUMBER OF YOUR JOB IS EITHER N+1 OR
              N+400.

X        O'KANE'S RULE:
              THE NUMBER OF CARDS IN YOUR DECK IS INVERSELY PROPORTIONAL TO THE
              AMOUNT OF OUTPUT YOUR DECK PRODUCES.

XI       MASHEY'S FIRST LAW:
              IF YOU LIE TO THE ASSEMBLER, IT WILL GET YOU.

XII      MASHEY'S SECOND LAW:
              IF YOU HAVE DEBUGGING STATEMENTS IN YOUR PROGRAM, THE BUGS WILL
              BE SCARED AWAY AND IT WILL WORK FINE, BUT AS SOON AS YOU TAKE
              AWAY THE DEBUGGING STATEMENTS, THE BUGS WILL COME BACK.




                   PROPOSED OS/360/370-VS/370 INSTRUCTIONS

BH       BRANCH AND HANG
IIB      IGNORE INQUIRY AND BRANCH
TDB      TRANSFER AND DROP BITS
DO       DIVIDE AND OVERFLOW
SRZ      SUBTRACT AND RESET TO ZERO
PI       PUNCH INVALID
SSJ      SELECT STACKER AND JAM
FSRA     FORMS SKIP AND RUN AWAY
RASC     READ AND SHRED CARD
SRSD     SEEK RECORD AND SCAR DISK
BST      BACKSPACE AND STRETCH TAPE
RIRG     READ INTER-RECORD GAP
UER      UPDATE AND ERASE RECORD
EM       EMULATE 407
SPSW     SCRAMBLE PROGRAM STATUS WORD
EIOC     EXECUTE INVALID OPCODE
EROS     ERASE READ ONLY STORAGE
PBC      PRINT AND BREAK CHAIN
MLR      MOVE AND LOSE RECORD
DMPK     DESTROY MEMORY PROTECT KEY
DC       DIVIDE AND CONQUER
EPI      EXECUTE PROGRAMMER IMMEDIATE
LCC      LOAD AND CLEAN CORE
HCF      HALT AND CATCH FIRE
BBI      BRANCH ON BLINKING INDICATOR
BPO      BRANCH ON POWER OFF
AI       ADD IMPROPER
ARZ      ADD AND RESET TO ZERO
RSD      READ AND SCRAMBLE DATA
RI       READ INVALID
RCR      REWIND CARD READER
BCR      BACKSPACE CARD READER
RP       READ PRINTER
BSP      BACKSPACE PRINTER
MPB      MOVE AND PITCH BITS
RNR      READ NOISE RECORD
WWLR     WRITE WRONG LENGTH RECORD
RBT      REWIND AND BREAK TAPE
ED       EJECT DISK
RD       REWIND DISK
RDS      REVERSE DISK SPIN
BD       BACKSPACE DISK
RTM      READ TAPE MARK
DTA      DISCONNECT TELECOMMUNICATIONS ADAPTER
DFHD     DISMOUNT 2305
DSD      DROP AND SHUFFLE DECK
STR      STORE RANDOM
FSMC     FOLD, SPINDLE, AND MUTILATE CARD
BKO      BRANCH AND KILL OPERATOR
