Symbol Description Uses
while 10



File Line number Procedure Code
./pkg/fizhi/fizhi_alarms.F 54 FIZHI_ALARMS
      do while ( mod(3*3600,nd).ne.0 )
./pkg/fizhi/fizhi_alarms.F 77 FIZHI_ALARMS
      do while ( mod(3*3600,nd).ne.0 )
./pkg/fizhi/update_ocean_exports.F 320 GETSICE
       do while (.not.found .and. nd .le. ndatebc)
./pkg/fizhi/update_ocean_exports.F 582 GETSST
       do while (.not.found .and. nd .le. ndatebc)
./pkg/openad/ad_s_ifnblnk.F 32 OAD_S_IFNBLNK
      DO while ((L.le.LS).and.(string(L:L) .eq. ' '))
./pkg/openad/ad_s_ilnblnk.F 32 OAD_S_ILNBLNK
      DO while ((L.gt.0).and.(string(L:L) .eq. ' '))
./pkg/streamice/streamice_advect_thickness.F 207 STREAMICE_ADVECT_THICKNESS
      do while (time_step_rem .gt. 1.e-15)
./optim/optim_numbmod.F 212 OPTIM_NUMBMOD
      do while ( .true. )
./optim/optim_numbmod.F 240 OPTIM_NUMBMOD
      do while ( .true. )
./pkg/cal/cal_addtime.F 183 CAL_ADDTIME
            do while (ndays_left .ge. days_in_year)