************************************************************************
************************************************************************
*
*
**  EQUIVALENCES FOR VERIFICATION KEYS  @ 1979 07 10/CHS
*
*
************************************************************************
*
*        VERIFICATION KEYS FILE DEFINITON
*        --------------------------------
*
*        FOR REORGINIZATION AND REFORMATTING
*        -----------------------------------
*
*  AREA DEFINITION
*  ---------------
*
*        WORD  CONTENT
*        ----  -------
*          1   CONTROL WORD, X'01'
*          2   AREA NUMBER
*          3   AREA SIZE(PAGES)
*          4   BITS PER LINE NUMBER IN AREA
*          5   CHECKSUM FLAG, 1 IF CHECKSUMS PRESENT
*
*  POINTER DEFINITION
*  ------------------
*
*        WORD  CONTENT
*        ----  -------
*          1   CONTROL WORD, X'02'
*          2   GROUP NUMBER
*          3   SET NUMBER
*          4   MANUAL,OPTIONAL INCLUSION FLAG, 1 IF THIS
*              GROUP IS MANUAL OR OPTIONAL IN THIS SET
*          5   NEXT POINTER POSITION (BITS)
*          6   NEXT POINTER SIZE (BITS)
*
*  KEY DEFINITION
*  --------------
*
*        WORD  CONTENT
*        ----  -------
*          1   CONTROL WORD, X'03'
*          2   GROUP NUMBER
*          3   KEY POSITION (BITS)
*          4   KEY SIZE (BITS)
*          5   NULL
*
************************************************************************
      INTEGER
     .            VKCODE , VKARNO , VKARPS , VKBPLN , VKCKFL ,
      EQUIVALENCE
     . ( VKBUF(1) , VKCODE ) ,
     . ( VKBUF(2) , VKARNO , VKGRNO ) ,
     . ( VKBUF(3) , VKARPS , VKSTNO , VKKP ) ,
     . ( VKBUF(4) , VKBPLN , VKMFL , VKKS ) ,
     . ( VKBUF(5) , VKCKFL , VKNPP ) ,
     . ( VKBUF(6) , VKNPS )
      INTEGER VFKS,VFKT
      COMMON /VFKIO/VFKS,VFKT
      PARAMETER VKKEYSZ=14
      CHARACTER VKKEY*(VKKEYSZ)
      PARAMETER VKSIZ=6
      INTEGER VKBUF
      COMMON /VKBUFFER/VKBUF(VKSIZ)
      COMMON/NXTKEY3/NEXTVK
      CHARACTER*1 NEXTVK
