Symbol Description Uses
flag integer flag telling scheme how to fill 81


File Line number Procedure Code
./pkg/generic_advdiff/salt_fill.F 13 SALT_FILL 
     I     flag,myTime,myIter,myThid)
./pkg/generic_advdiff/salt_fill.F 49 SALT_FILL 
      INTEGER flag
./pkg/generic_advdiff/salt_fill.F 83 SALT_FILL 
        if(flag.eq.1) then
./pkg/rw/get_write_global_fld.F 15 GET_WRITE_GLOBAL_FLD 
      LOGICAL flag
./pkg/rw/get_write_global_fld.F 20 GET_WRITE_GLOBAL_FLD 
      flag=globalFile
./pkg/rw/get_write_global_fld.F 6 GET_WRITE_GLOBAL_FLD 
      SUBROUTINE GET_WRITE_GLOBAL_FLD ( flag )
./pkg/rw/set_write_global_fld.F 15 SET_WRITE_GLOBAL_FLD 
      LOGICAL flag
./pkg/rw/set_write_global_fld.F 20 SET_WRITE_GLOBAL_FLD 
      globalFile=flag
./pkg/rw/set_write_global_fld.F 6 SET_WRITE_GLOBAL_FLD 
      SUBROUTINE SET_WRITE_GLOBAL_FLD ( flag )
./pkg/rw/write_rec.F 26 SET_WRITE_GLOBAL_REC 
      SUBROUTINE SET_WRITE_GLOBAL_REC ( flag )
./pkg/rw/write_rec.F 39 SET_WRITE_GLOBAL_REC 
      LOGICAL flag
./pkg/rw/write_rec.F 46 SET_WRITE_GLOBAL_REC 
      globalFile=flag
./pkg/rw/write_rec.F 55 SET_WRITE_GLOBAL_SEC 
      SUBROUTINE SET_WRITE_GLOBAL_SEC ( flag )
./pkg/rw/write_rec.F 68 SET_WRITE_GLOBAL_SEC 
      LOGICAL flag
./pkg/rw/write_rec.F 75 SET_WRITE_GLOBAL_SEC 
      globalFile=flag
./eesupp/src/bar_check.F 42 BAR_CHECK 
      LOGICAL flag
./eesupp/src/bar_check.F 57 BAR_CHECK 
       flag = .FALSE.
./eesupp/src/bar_check.F 60 BAR_CHECK 
          flag = flag .OR. (barStatus(bi,bj).NE.barrierId)
./eesupp/src/bar_check.F 63 BAR_CHECK 
       IF ( flag ) THEN
./pkg/thsice/thsice_diagnostics_init.F 198 THSICE_DIAGNOSTICS_INIT 
        flag = .TRUE.
./pkg/thsice/thsice_diagnostics_init.F 216 THSICE_DIAGNOSTICS_INIT 
          flag = .FALSE.
./pkg/thsice/thsice_diagnostics_init.F 218 THSICE_DIAGNOSTICS_INIT 
        IF ( flag ) THEN
./pkg/thsice/thsice_diagnostics_init.F 52 THSICE_DIAGNOSTICS_INIT 
      LOGICAL       flag
./verification/flt_example/extra/write_float.F 117 NO PROCEDURE 
         if (flag) write(1,rec=ip+1) npart,tstart,xpart,ypart,
./verification/flt_example/extra/write_float.F 12 NO PROCEDURE 
        logical flag
./verification/flt_example/extra/write_float.F 144 NO PROCEDURE 
         if (flag) write(1,rec=ip+1) npart,tstart,xpart,ypart,
./verification/flt_example/extra/write_float.F 170 NO PROCEDURE 
         if (flag) write(1,rec=ip+1) npart,tstart,xpart,ypart,
./verification/flt_example/extra/write_float.F 17 NO PROCEDURE 
      flag = .true.
./verification/flt_example/extra/write_float.F 192 NO PROCEDURE 
         if (flag) write(1,rec=ip+1) npart,tstart,xpart,ypart,
./verification/flt_example/extra/write_float.F 19 NO PROCEDURE 
      if ( narg .gt. 0 ) flag = .false.
./verification/flt_example/extra/write_float.F 20 NO PROCEDURE 
      print*, flag
./verification/flt_example/extra/write_float.F 214 NO PROCEDURE 
                   if (flag)
./verification/flt_example/extra/write_float.F 22 NO PROCEDURE 
      if (flag) then
./verification/flt_example/extra/write_float.F 66 NO PROCEDURE 
        if (flag)  write(1,rec=1)    npart,tstart,xpart,ypart,
./verification/flt_example/extra/write_float.F 95 NO PROCEDURE 
         if (flag) write(1,rec=ip+1) npart,tstart,xpart,ypart,
./model/src/set_write_global_pickup.F 10 SET_WRITE_GLOBAL_PICKUP 
      SUBROUTINE SET_WRITE_GLOBAL_PICKUP( flag )
./model/src/set_write_global_pickup.F 28 SET_WRITE_GLOBAL_PICKUP 
      LOGICAL flag
./model/src/set_write_global_pickup.F 33 SET_WRITE_GLOBAL_PICKUP 
      globalFile = flag
./eesupp/src/ini_threading_environment.F 297 INI_THREADING_ENVIRONMENT 
       flag = .FALSE.
./eesupp/src/ini_threading_environment.F 300 INI_THREADING_ENVIRONMENT 
          flag = flag
./eesupp/src/ini_threading_environment.F 307 INI_THREADING_ENVIRONMENT 
       IF ( flag ) THEN
./eesupp/src/ini_threading_environment.F 61 INI_THREADING_ENVIRONMENT 
      LOGICAL flag
./pkg/diagnostics/diagnostics_setdiag.F 116 DIAGNOSTICS_SETDIAG 
        flag = .TRUE.
./pkg/diagnostics/diagnostics_setdiag.F 118 DIAGNOSTICS_SETDIAG 
         IF (flag .AND. freq(l) .EQ.freq(listId)
./pkg/diagnostics/diagnostics_setdiag.F 124 DIAGNOSTICS_SETDIAG 
           IF (flag .AND. jdiag(k,l).GT.0) THEN
./pkg/diagnostics/diagnostics_setdiag.F 127 DIAGNOSTICS_SETDIAG 
             flag = .FALSE.
./pkg/diagnostics/diagnostics_setdiag.F 135 DIAGNOSTICS_SETDIAG 
        IF ( flag ) THEN
./pkg/diagnostics/diagnostics_setdiag.F 50 DIAGNOSTICS_SETDIAG 
      LOGICAL flag
./pkg/diagnostics/diagnostics_setdiag.F 65 DIAGNOSTICS_SETDIAG 
      flag = .TRUE.
./pkg/diagnostics/diagnostics_setdiag.F 67 DIAGNOSTICS_SETDIAG 
       IF (flag .AND. freq(l) .EQ. freq(listId)
./pkg/diagnostics/diagnostics_setdiag.F 73 DIAGNOSTICS_SETDIAG 
         IF (flag .AND. jdiag(k,l).GT.0) THEN
./pkg/diagnostics/diagnostics_setdiag.F 76 DIAGNOSTICS_SETDIAG 
           flag = .FALSE.
./pkg/diagnostics/diagnostics_setdiag.F 87 DIAGNOSTICS_SETDIAG 
      IF ( flag ) THEN
./pkg/diagnostics/diagnostics_utils.F 553 DIAGNOSTICS_SETKLEV 
      LOGICAL flag
./pkg/diagnostics/diagnostics_utils.F 563 DIAGNOSTICS_SETKLEV 
      flag = .FALSE.
./pkg/diagnostics/diagnostics_utils.F 566 DIAGNOSTICS_SETKLEV 
         IF ( flag ) THEN
./pkg/diagnostics/diagnostics_utils.F 572 DIAGNOSTICS_SETKLEV 
         flag = .FALSE.
./pkg/diagnostics/diagnostics_utils.F 574 DIAGNOSTICS_SETKLEV 
         flag = j.GE.1
./pkg/diagnostics/diagstats_set_regions.F 206 DIAGSTATS_SET_REGIONS 
      flag = .FALSE.
./pkg/diagnostics/diagstats_set_regions.F 208 DIAGSTATS_SET_REGIONS 
        flag = flag .OR. diagSt_kRegMsk(j).NE.0
./pkg/diagnostics/diagstats_set_regions.F 212 DIAGSTATS_SET_REGIONS 
      IF ( flag .OR. iLen.GE.1 .OR. nSetRegMskFile.NE.0 ) THEN
./pkg/diagnostics/diagstats_set_regions.F 47 DIAGSTATS_SET_REGIONS 
      LOGICAL flag
./pkg/diagnostics/diagstats_setdiag.F 112 DIAGSTATS_SETDIAG 
        flag = .TRUE.
./pkg/diagnostics/diagstats_setdiag.F 114 DIAGSTATS_SETDIAG 
         IF (flag .AND. diagSt_freq(l) .EQ. diagSt_freq(listId)
./pkg/diagnostics/diagstats_setdiag.F 117 DIAGSTATS_SETDIAG 
           IF (flag .AND. jSdiag(k,l).GT.0) THEN
./pkg/diagnostics/diagstats_setdiag.F 120 DIAGSTATS_SETDIAG 
             flag = .FALSE.
./pkg/diagnostics/diagstats_setdiag.F 128 DIAGSTATS_SETDIAG 
        IF ( flag ) THEN
./pkg/diagnostics/diagstats_setdiag.F 50 DIAGSTATS_SETDIAG 
      LOGICAL flag
./pkg/diagnostics/diagstats_setdiag.F 65 DIAGSTATS_SETDIAG 
      flag = .TRUE.
./pkg/diagnostics/diagstats_setdiag.F 67 DIAGSTATS_SETDIAG 
       IF (flag .AND. diagSt_freq(l) .EQ. diagSt_freq(listId)
./pkg/diagnostics/diagstats_setdiag.F 70 DIAGSTATS_SETDIAG 
         IF (flag .AND. jSdiag(k,l).GT.0) THEN
./pkg/diagnostics/diagstats_setdiag.F 73 DIAGSTATS_SETDIAG 
           flag = .FALSE.
./pkg/diagnostics/diagstats_setdiag.F 84 DIAGSTATS_SETDIAG 
      IF ( flag ) THEN
./pkg/exch2/w2_set_map_tiles.F 241 W2_SET_MAP_TILES 
      LOGICAL flag
./pkg/exch2/w2_set_map_tiles.F 258 W2_SET_MAP_TILES 
          flag = .TRUE.
./pkg/exch2/w2_set_map_tiles.F 260 W2_SET_MAP_TILES 
            flag = flag.AND.(MOD(fldList(j),ii).EQ.0 )
./pkg/exch2/w2_set_map_tiles.F 262 W2_SET_MAP_TILES 
          IF ( flag ) THEN