AVETIM.f90#74               IF ( (MOD(24,INT(AVENUM)).EQ.0 .AND. IMIT.EQ.1) ) THEN
CHKREC.f90#81               IF ( MOD((INC-1),40).EQ.0 ) THEN
#124                  IF ( MOD((INC-1),40).EQ.0 ) THEN
CHK_ENDYR.f90#33     &     (MOD(IYR,4).NE.0) .OR.                                       &
#34     &     (MOD(IYR,100).EQ.0 .AND. MOD(IYR,400).NE.0) ) THEN
GREGOR.f90#52      IF ( (MOD(INYR,4).NE.0) .OR.                                      &
#53     &     (MOD(INYR,100).EQ.0 .AND. MOD(INYR,400).NE.0) ) THEN
HRLOOP.f90#189     &               MOD(ILINE-IFIRSTHR,NREGINT).EQ.0 ) THEN
#328               IF ( MOD(IHOUR,KAVE(IAVE)).EQ.0 .OR.                     &
JULIAN.f90#61      IF ( (MOD(INYR,4).NE.0) .OR.                                      &
#62     &     (MOD(INYR,100).EQ.0 .AND. MOD(INYR,400).NE.0) ) THEN
MECARD.f90#203            IF ( (MOD(ISYEAR,4).NE.0) .OR.                              &
#204     &           (MOD(ISYEAR,100).EQ.0 .AND. MOD(ISYEAR,400).NE.0) )    &
#216         IF ( (MOD(ISYEAR,4).NE.0) .OR.                                 &
#217     &        (MOD(ISYEAR,100).EQ.0 .AND. MOD(ISYEAR,400).NE.0) ) THEN
NUMRISE.f90#291         IF ( MOD(NNP,1000).EQ.1 ) WRITE (IO6,112)                      !      0
PNPOLY.f90#82         J = 1 + MOD(I,N)                                               !      0
PRTANN.f90#161                  IF ( MOD(INDC-1,80).EQ.0 ) THEN
#183                  IF ( MOD(INDC,2).NE.0 ) THEN                          !      0
#194            IF ( MOD(INDC,2).NE.0 ) THEN                                !      0
#211                  IF ( MOD(INDC-1,80).EQ.0 ) THEN
#234                  IF ( MOD(INDC,2).NE.0 ) THEN                          !      0
#245            IF ( MOD(INDC,2).NE.0 ) THEN                                !      0
#259                  IF ( MOD(INDC-1,3).EQ.0 ) THEN
PRTDAY.f90#151                  IF ( MOD(INDC-1,80).EQ.0 ) THEN
#167                  IF ( MOD(INDC,2).NE.0 ) THEN                          !      0
#178            IF ( MOD(INDC,2).NE.0 ) THEN                                !      0
#195                  IF ( MOD(INDC-1,80).EQ.0 ) THEN
#212                  IF ( MOD(INDC,2).NE.0 ) THEN                          !      0
#223            IF ( MOD(INDC,2).NE.0 ) THEN                                !      0
#237                  IF ( MOD(INDC-1,3).EQ.0 ) THEN
PRTMAX.f90#82                     IF ( L.EQ.NPG .AND. MOD(IMXVAL(IAVE),2).NE.0 )     &
#118               IF ( MOD(IMXVAL(IAVE),2).NE.0 ) THEN                     !      4
PRTNHI.f90#88                  IT1 = MOD(IWHP(K),10)                                 !      8
PRTPM10.f90#154                  IF ( MOD(INDC-1,80).EQ.0 ) THEN
#170                  IF ( MOD(INDC,2).NE.0 ) THEN                          !      0
#181            IF ( MOD(INDC,2).NE.0 ) THEN                                !      0
#198                  IF ( MOD(INDC-1,80).EQ.0 ) THEN
#215                  IF ( MOD(INDC,2).NE.0 ) THEN                          !      0
#226            IF ( MOD(INDC,2).NE.0 ) THEN                                !      0
#240                  IF ( MOD(INDC-1,3).EQ.0 ) THEN
PRTPM10SUM.f90#44            IF ( MOD(IGRP-1,NGPP).EQ.0 ) THEN                           !      0
#105            IF ( MOD(IGRP-1,NGPP).EQ.0 ) THEN                           !      0
PRTREC.f90#321               IF ( MOD(INDC-1,90).EQ.0 ) THEN
#328               IF ( MOD(INDC,2).NE.0 ) THEN                             !      0
#339         IF ( MOD(INDC,2).NE.0 ) THEN                                   !      0
#356               IF ( MOD(INDC-1,90).EQ.0 ) THEN
#365               IF ( MOD(INDC,2).NE.0 ) THEN                             !      0
#376         IF ( MOD(INDC,2).NE.0 ) THEN                                   !      0
PRTSRC.f90#90            IF ( MOD(INDC-1,40).EQ.0 ) THEN                             !      9
#128            IF ( MOD(INDC-1,40).EQ.0 ) THEN                             !      9
#158            IF ( MOD(INDC-1,40).EQ.0 ) THEN                             !      9
#192            IF ( MOD(INDC-1,40).EQ.0 ) THEN                             !      0
#222            IF ( MOD(INDC-1,40).EQ.0 ) THEN                             !      0
#253            IF ( MOD(INDC-1,40).EQ.0 ) THEN                             !      0
#291            IF ( MOD(INDC-1,20).EQ.0 ) THEN
#323            IF ( MOD(INDC-1,20).EQ.0 ) THEN
#349            IF ( MOD(INDC-1,40).EQ.0 ) THEN
#380            IF ( MOD(INDC-1,3).EQ.0 ) THEN
#392            IF ( MOD(INDC-1,3).EQ.0 ) THEN
#407            IF ( MOD(INDC-1,3).EQ.0 ) THEN
#443            IF ( MOD(INDC-1,4).EQ.0 ) THEN
#474            IF ( MOD(INDC-1,6).EQ.0 ) THEN
#496            IF ( MOD(INDC-1,6).EQ.0 ) THEN
#520            IF ( MOD(INDC-1,5).EQ.0 ) THEN
#538            IF ( MOD(INDC-1,3).EQ.0 ) THEN
PRTSUM.f90#53            IF ( MOD(IGRP-1,NGPP).EQ.0 ) THEN                           !      2
#143                  IF ( MOD(IGRP-1,NGPP).EQ.0 ) THEN                     !      4
RSDUMP.f90#52      IF ( SAVFIL.EQ.SAVFL2 .OR. MOD(NDUMP,2).NE.0 ) THEN               !      0
SET_METDATA.f90#75      ID = MOD((IDAY+IY+IY/4-IY/100+IY/400+(31*IM)/12),7)
#96         IF ( IMONTH.EQ.1 .OR. (MOD(IYR,4).NE.0) .OR.                   &
#97     &        (MOD(IYR,100).EQ.0 .AND. MOD(IYR,400).NE.0) ) THEN
SPRTHT.f90#161                  IF ( MOD(INDC-1,80).EQ.0 ) THEN
#178                  IF ( MOD(INDC,2).NE.0 ) THEN                          !      0
#193            IF ( MOD(INDC,2).NE.0 ) THEN                                !      0
#210                  IF ( MOD(INDC-1,80).EQ.0 ) THEN
#227                  IF ( MOD(INDC,2).NE.0 ) THEN                          !      0
#244            IF ( MOD(INDC,2).NE.0 ) THEN                                !      0
#258                  IF ( MOD(INDC-1,2).EQ.0 ) THEN


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