C     EDIT DATE   15MAR78  14:02
C     SOURCE FILE    WFLAGSJHP.IN
C     AUTHOR      J.H.PERINE
C     PURPOSE  DEFINE WORD FLAGS
C     WF1      CONSTANT
C     WF2      SET LOCATION COUNTER VALUE
C     WF3      FLOWCHART END
C     WF4      ABSOLUTE CODE (NO ADDRESS)
C     WF5      RELOCATABLE CODE (1 BYTE ADDRESS)
C     WF6      ADDRESS OFFSET
C     WF7      NAME LIST INDEX
C     WF8      RELOCATABLE CODE (2 BYTE ADDRESS)
C     WF9      TRANSFER LIST ENTRY
C     WF10     SET LOCATION COUNTER NUMBER
C     WF11     NOT USED
C     WF12     NAME LIST INDEX, RIGHT HALF ADDR
C     WF13     NAME LIST INDEX, LEFT HALF ADDR
C     WF14     SET LOAD LOCATION COUNTER
C     WF15     SET LOAD LOCATION COUNTER VALUE
C     WF16     NEGATIVE OFFSET FROM NAME LIST
C     WF17     ADJUST LOCATION COUNTER
      INTEGER  WF1,WF2,WF3,WF4,WF5,WF6,WF7,WF8,WF9,^
               WF10,WF11,WF12,WF13,WF14,WF15,WF16,WF17
      COMMON   / WF / WF1,WF2,WF3,WF4,WF5,WF6,WF7,WF8,^
                     WF9,WF10,WF11,WF12,WF13,WF14,WF15,^
                     WF16,WF17
C     ADDITIONAL WORD FLAGS:
C     1. DEFINE WFXX HERE AND IN WFDATA.FR
C     2. ADJUST 'WFSTEP' AND 'WFCONTROL' IN BUILD BLOCK
C     3. PUT IN 'LIST' CODE
C     4. PUT IN 'OBJECT' CODE