Symbol Description Uses
WHILE 22



File Line number Procedure Code
./pkg/fizhi/fizhi_clockstuff.F 515 TICK
      DO WHILE (NSEC.GT.86400)
./pkg/fizhi/fizhi_clockstuff.F 527 TICK
      DO WHILE (NSEC.LT.0)
./pkg/fizhi/fizhi_clockstuff.F 560 TIC_TIME
      DO WHILE (NSEC.GT.86400)
./pkg/fizhi/fizhi_clockstuff.F 572 TIC_TIME
      DO WHILE (NSEC.LT.0)
./pkg/layers/layers_calc.F 141 LAYERS_CALC
          DO WHILE (TatU .GE. layers_G(kgu(i,j)+1))
./pkg/layers/layers_calc.F 147 LAYERS_CALC
          DO WHILE (TatU .LT. layers_G(kgu(i,j)))
./pkg/layers/layers_calc.F 212 LAYERS_CALC
          DO WHILE (TatV .GE. layers_G(kgv(i,j)+1))
./pkg/layers/layers_calc.F 218 LAYERS_CALC
          DO WHILE (TatV .LT. layers_G(kgv(i,j)))
./pkg/layers/layers_init_fixed.F 102 LAYERS_INIT_FIXED
          DO WHILE (ZZc(kk) .GE. Zc(k+1))
./pkg/mdsio/mdsio_read_meta.F 206 MDS_READ_META
        DO WHILE ( .TRUE. )
./pkg/regrid/regrid_init_varia.F 161 REGRID_INIT_VARIA
            DO WHILE ( .TRUE. )
./pkg/seaice/seaice_init_fixed.F 182 SEAICE_INIT_FIXED
           DO WHILE ( abs(rC(KGEO(i,j,bi,bj))) .LT. 50.0 _d 0 .AND.
./model/src/port_rand.F 165 PORT_RANARR
      DO WHILE (1 .EQ. 1)
./pkg/chronos/chronos.F 483 TICK
      DO WHILE (NSEC.GT.86400)
./pkg/chronos/chronos.F 495 TICK
      DO WHILE (NSEC.LT.0)
./pkg/chronos/chronos.F 524 TIC_TIME
      DO WHILE (NSEC.GT.86400)
./pkg/chronos/chronos.F 536 TIC_TIME
      DO WHILE (NSEC.LT.0)
./eesupp/src/open_copy_data_file.F 120 OPEN_COPY_DATA_FILE
      DO WHILE ( .TRUE. )
./eesupp/src/open_copy_data_file.F 93 OPEN_COPY_DATA_FILE
      DO WHILE ( .TRUE. )
./pkg/dic/dic_init_fixed.F 87 DIC_INIT_FIXED
      DO WHILE ( k .LT. Nr .AND. rC(k) .GE. -zcrit )
./pkg/exch2/w2_set_cs6_facets.F 140 W2_SET_CS6_FACETS
      DO WHILE ( addDims.GT.0 )
./pkg/exch2/w2_set_map_tiles.F 256 W2_SET_MAP_TILES
        DO WHILE ( ii.LE.mnFld )