Symbol Description Uses
WHILE 33



File Line number Procedure Code
./pkg/exch2/w2_set_cs6_facets.F 140 W2_SET_CS6_FACETS
      DO WHILE ( addDims.GT.0 )
./pkg/exch2/w2_set_map_cumsum.F 102 W2_SET_MAP_CUMSUM
      DO WHILE ( fCnt.GT.prev_fCnt )
./pkg/exch2/w2_set_map_tiles.F 262 W2_SET_MAP_TILES
        DO WHILE ( ii.LE.mnFld )
./pkg/fizhi/fizhi_clockstuff.F 529 TICK
      DO WHILE (NSEC.GT.86400)
./pkg/fizhi/fizhi_clockstuff.F 541 TICK
      DO WHILE (NSEC.LT.0)
./pkg/fizhi/fizhi_clockstuff.F 574 TIC_TIME
      DO WHILE (NSEC.GT.86400)
./pkg/fizhi/fizhi_clockstuff.F 586 TIC_TIME
      DO WHILE (NSEC.LT.0)
./pkg/kl10/kl10_calc.F 108 KL10_CALC
                  DO WHILE ( (JJ.GT.0).AND.(rhoS(K).LT.rhoS(JJ)) )
./pkg/layers/layers_fluxcalc.F 803 LAYERS_LOCATE
         DO WHILE (x(i,j) .GE. xx(k(i,j)+1))
./pkg/layers/layers_fluxcalc.F 809 LAYERS_LOCATE
         DO WHILE (x(i,j) .LT. xx(k(i,j)))
./pkg/layers/layers_init_fixed.F 107 LAYERS_INIT_FIXED
          DO WHILE (ZZc(kk) .GE. Zc(k+1))
./pkg/mdsio/mdsio_read_meta.F 208 MDS_READ_META
        DO WHILE ( .TRUE. )
./pkg/obcs/obcs_set_connect.F 196 OBCS_SET_CONNECT
          DO WHILE ( newConnect.NE. 0 )
./pkg/regrid/regrid_init_varia.F 161 REGRID_INIT_VARIA
            DO WHILE ( .TRUE. )
./pkg/seaice/seaice_do_ridging.F 205 SEAICE_DO_RIDGING
      DO WHILE (doRidgeAgain)
./pkg/seaice/seaice_init_varia.F 240 SEAICE_INIT_VARIA
           DO WHILE ( abs(rC(KGEO(i,j,bi,bj))) .LT. 50.0 _d 0 .AND.
./pkg/seaice/seaice_jfnk.F 184 SEAICE_JFNK
      DO WHILE ( newtonIter.LT.SEAICEnonLinIterMax .AND.
./pkg/seaice/seaice_jfnk.F 252 SEAICE_JFNK
        DO WHILE ( .NOT.krylovConverged )
./pkg/seaice/seaice_jfnk.F 546 SEAICE_JFNK_UPDATE
      DO WHILE ( doLineSearch )
./pkg/seaice/seaice_krylov.F 184 SEAICE_KRYLOV
      DO WHILE ( picardIter.LT.picardIterMax .AND.
./pkg/seaice/seaice_krylov.F 315 SEAICE_KRYLOV
        DO WHILE ( .NOT.krylovConverged )
./model/src/port_rand.F 166 PORT_RANARR
      DO WHILE ( xs.GE.1.0 .OR. xs.EQ.0.0 )
./eesupp/src/open_copy_data_file.F 118 OPEN_COPY_DATA_FILE
      DO WHILE ( .TRUE. )
./eesupp/src/open_copy_data_file.F 145 OPEN_COPY_DATA_FILE
      DO WHILE ( .TRUE. )
./pkg/cfc/cfc_atmos.F 77 CFC_ATMOS
      DO WHILE ( it.LE.ACFCrecSize )
./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)
./pkg/diagnostics/diag_calc_psivel.F 133 DIAG_CALC_PSIVEL
         DO WHILE ( nPts.GT.prev_nPts )
./pkg/diagnostics/diagnostics_out.F 184 DIAGNOSTICS_OUT
           DO WHILE ( gdiag(nn)(5:5).EQ.'P' )
./pkg/diagnostics/diagnostics_setdiag.F 84 DIAGNOSTICS_SETDIAG
      DO WHILE ( flagP )
./pkg/dic/dic_init_fixed.F 83 DIC_INIT_FIXED
      DO WHILE ( k .LT. Nr .AND. rC(k) .GE. -zcrit )