ALLSETUP.f90#98     &             NDXARC(NREC),ARCID(NARC),NTID(NNET),NTTYP(NNET),     &
#99     &             XCOORD(IXM,NNET),YCOORD(IYM,NNET),XORIG(NNET),       &
#100     &             YORIG(NNET),NETSTA(NNET),NETEND(NNET),NUMXPT(NNET),  &
#101     &             NUMYPT(NNET),STAT=IASTAT)
MAIN1.f90#252     &           NPDMAX , NNET , IXM , IYM  , NUMEVE , IEVENT ,         &
PRECART.f90#46         NNET = NNET + 1
PREPOLR.f90#47         NNET = NNET + 1
PRESET.f90#231      NNET = MAX(NNET,1)
PRTOPT.f90#353     &           NGRP*NTYP) + NNET*(9+IXM+IYM)                          &
RECART.f90#54         IF ( INNET.GT.NNET ) THEN
#56            WRITE (DUMMY,'(I8)') NNET                                   !      0
RECSIZ.f90#36         NNET = 0
REPOLR.f90#52         IF ( INNET.GT.NNET ) THEN
#54            WRITE (DUMMY,'(I8)') NNET                                   !      0
VARINI.f90#392         DO I = 1 , NNET                                                !      3


HyperKWIC - Version 1.00DD executed at 20:00 on 1 Mar 2018 | Personal or Academic or Evaluation User | Free for Non-Commercial, Non-Government Use