SUBROUTINE KVQQ2K(NVTX, IVTX, IPNT, LERROR)
 
C  >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
C   Fill KV vertex list from QQ vertex list
C
C   Note: NVTXKV is incremented after every call. It is the user's
C         responsibility to clear it at the start of the event.
C
C *NVTX      Integer variable (read/write)
C            Input:  # of vertices to fill from input vertex list.
C            Output: # of vertices actually filled
C            If NVTX=0, the vertex list IVTX(I) is ignored. In that case
C            all vertices are used.
C
C  IVTX      Integer variable (read)
C            List of QQ vertices. Ignored if NVTX=0.
C
C *IPNT      Integer array (write)
C            IPNT(I) = position in KN vertex list
C
C *LERROR    Logical variable (write)
C            TRUE ==> vertex list overflowed
C  >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>