ALLSETUP.f90#99 & XCOORD(IXM,NNET),YCOORD(IYM,NNET),XORIG(NNET), & GENCAR.f90#93 IF ( JCOUNT.LE.IYM ) THEN ! 0 #99 WRITE (DUMMY,'(I8)') IYM ! 0 GENPOL.f90#78 IF ( JCOUNT.LE.IYM ) THEN #89 WRITE (DUMMY,'(I8)') IYM ! 0 MAIN1.f90#252 & NPDMAX , NNET , IXM , IYM , NUMEVE , IEVENT , & PREGENCAR.f90#80 IF ( JCOUNT.GT.IYM ) IYM = JCOUNT PREGENPOL.f90#74 IF ( JCOUNT.GT.IYM ) IYM = JCOUNT PRERADRNG.f90#49 IF ( ISET.GT.IYM ) IYM = ISET PRESET.f90#233 IYM = MAX(IYM,1) PREXYPNTS.f90#72 IF ( JSET.GT.IYM ) IYM = JSET PRTOPT.f90#353 & NGRP*NTYP) + NNET*(9+IXM+IYM) & RADRNG.f90#53 IF ( ISET.LE.IYM ) THEN #69 WRITE (DUMMY,'(I8)') IYM ! 0 RECSIZ.f90#38 IYM = 0 SETCAR.f90#53 IF ( JCOUNT.GT.IYM ) THEN ! 0 #55 WRITE (DUMMY,'(I8)') IYM ! 0 SETPOL.f90#54 IF ( JCOUNT.GT.IYM ) THEN ! 432 #56 WRITE (DUMMY,'(I8)') IYM ! 0 VARINI.f90#404 DO J = 1 , IYM ! 3 XYPNTS.f90#96 IF ( JSET.LE.IYM ) THEN #105 WRITE (DUMMY,'(I8)') IYM ! 0
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