Symbol Description Uses
iloop 76


File Line number Procedure Code
./pkg/showflops/showflops_init.F 40 SHOWFLOPS_INIT 
      integer iloop
./pkg/showflops/showflops_inloop.F 101 SHOWFLOPS_INLOOP 
     $        'during timestep ', iloop
./pkg/showflops/showflops_inloop.F 10 SHOWFLOPS_INLOOP 
      SUBROUTINE SHOWFLOPS_INLOOP( iloop, myThid )
./pkg/showflops/showflops_inloop.F 35 SHOWFLOPS_INLOOP 
      integer iloop
./pkg/showflops/showflops_inloop.F 66 SHOWFLOPS_INLOOP 
     $        stnew - stold, wtnew - wtold, iloop
./pkg/showflops/showflops_inloop.F 83 SHOWFLOPS_INLOOP 
     $     'Mflop/s during timestep ', iloop
./pkg/showflops/showflops_inloop.F 89 SHOWFLOPS_INLOOP 
     $     'IPC during timestep ', iloop
./pkg/showflops/showflops_insolve.F 35 SHOWFLOPS_INSOLVE 
      integer iloop
./verification/OpenAD/code_ad_openad/the_second_level_loop.F 191 THE_SECOND_LEVEL_PLAIN 
         iloop = ilev_1
./verification/OpenAD/code_ad_openad/the_second_level_loop.F 194 THE_SECOND_LEVEL_PLAIN 
         if ( iloop .le. nTimeSteps ) then
./verification/OpenAD/code_ad_openad/the_second_level_loop.F 95 THE_SECOND_LEVEL_LOOP 
         iloop = ilev_1
./verification/OpenAD/code_ad_openad/the_second_level_loop.F 99 THE_SECOND_LEVEL_LOOP 
         if ( iloop .le. nTimeSteps ) then
./model/src/forward_step.F 145 FORWARD_STEP 
      INTEGER iloop
./model/src/forward_step.F 170 FORWARD_STEP 
      myIter = nIter0 + (iloop-1)
./model/src/forward_step.F 171 FORWARD_STEP 
      myTime = startTime + float(iloop-1)*deltaTclock
./model/src/forward_step.F 20 FORWARD_STEP 
      SUBROUTINE FORWARD_STEP( iloop, myTime, myIter, myThid )
./model/src/forward_step.F 840 FORWARD_STEP 
      CALL SHOWFLOPS_INLOOP( iloop, mythid )
./verification/fizhi-cs-aqualev20/code/fizhi_clockstuff.F 719 TIC_TIME 
      integer iloop
./verification/fizhi-cs-aqualev20/code/fizhi_clockstuff.F 763 TIC_TIME 
       do iloop=1,100000
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 152 THE_MAIN_LOOP 
      integer iloop
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 308 THE_MAIN_LOOP 
            iloop = (ilev_2 - 1)*nchklev_1           + ilev_1
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 313 THE_MAIN_LOOP 
            if ( iloop .le. nTimeSteps ) then
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 335 THE_MAIN_LOOP 
      do iloop = 1, nTimeSteps
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 342 THE_MAIN_LOOP 
      do iloop = 1, nTimeSteps
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 351 THE_MAIN_LOOP 
        myiter = nIter0 + (iloop-1)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 352 THE_MAIN_LOOP 
        mytime = startTime + float(iloop-1)*deltaTclock
./verification/offline_exf_seaice/code_ad/the_main_loop.F 134 THE_MAIN_LOOP 
      integer iloop
./verification/offline_exf_seaice/code_ad/the_main_loop.F 324 THE_MAIN_LOOP 
            iloop = (ilev_2 - 1)*nchklev_1                     + ilev_1
./verification/offline_exf_seaice/code_ad/the_main_loop.F 332 THE_MAIN_LOOP 
            if ( iloop .le. nTimeSteps ) then
./verification/offline_exf_seaice/code_ad/the_main_loop.F 353 THE_MAIN_LOOP 
      DO iloop = 1, nTimeSteps
./verification/offline_exf_seaice/code_ad/the_main_loop.F 377 THE_MAIN_LOOP 
      DO iloop = 1, nTimeSteps
./verification/offline_exf_seaice/code_ad/the_main_loop.F 391 THE_MAIN_LOOP 
        myIter = nIter0 + (iloop-1)
./verification/offline_exf_seaice/code_ad/the_main_loop.F 392 THE_MAIN_LOOP 
        myTime = startTime + float(iloop-1)*deltaTclock
./verification/offline_exf_seaice/code_ad/the_main_loop.F 466 THE_MAIN_LOOP 
        myIter = nIter0 + iloop
./verification/offline_exf_seaice/code_ad/the_main_loop.F 467 THE_MAIN_LOOP 
        myTime = startTime + float(iloop)*deltaTclock
./verification/offline_exf_seaice/code_ad/the_main_loop.F 507 THE_MAIN_LOOP 
        CALL SHOWFLOPS_INLOOP( iloop, mythid )
./model/src/the_main_loop.F 148 THE_MAIN_LOOP 
      integer iloop
./model/src/the_main_loop.F 365 THE_MAIN_LOOP 
            iloop = (ilev_2 - 1)*nchklev_1                     + ilev_1
./model/src/the_main_loop.F 373 THE_MAIN_LOOP 
            if ( iloop .le. nTimeSteps ) then
./model/src/the_main_loop.F 394 THE_MAIN_LOOP 
      DO iloop = 1, nTimeSteps
./model/src/the_main_loop.F 418 THE_MAIN_LOOP 
      DO iloop = 1, nTimeSteps
./model/src/the_main_loop.F 435 THE_MAIN_LOOP 
        CALL FORWARD_STEP_ATM2D( iloop, mytime, myiter, mythid )
./model/src/the_main_loop.F 445 THE_MAIN_LOOP 
        CALL FORWARD_STEP( iloop, mytime, myiter, mythid )
./pkg/atm2d/atm2ocn_main.F 29 ATM2OCN_MAIN 
      INTEGER iloop
./pkg/atm2d/atm2ocn_main.F 41 ATM2OCN_MAIN 
      curTime = float(iloop-1)*dtcouplo + (float(aloop)-0.5)*dtatmo
./pkg/atm2d/atm2ocn_main.F 44 ATM2OCN_MAIN 
      CALL CALC_FILELOAD( curTime, iloop, aloop, wght0, wght1,
./pkg/atm2d/atm2ocn_main.F 7 ATM2OCN_MAIN 
      SUBROUTINE ATM2OCN_MAIN( iloop, aloop, inMonth,
./pkg/atm2d/calc_fileload.F 34 CALC_FILELOAD 
      INTEGER iloop
./pkg/atm2d/calc_fileload.F 7 CALC_FILELOAD 
      SUBROUTINE CALC_FILELOAD( curTime, iloop, aloop,
./pkg/atm2d/calc_fileload.F 80 CALC_FILELOAD 
      IF ((iloop.EQ.1).AND.(aloop.EQ.1)) ifTime= .TRUE.
./pkg/atm2d/forward_step_atm2d.F 142 FORWARD_STEP_ATM2D 
      IF ( (iloop.NE.1).OR. (iloop.EQ.1.AND.
./pkg/atm2d/forward_step_atm2d.F 161 FORWARD_STEP_ATM2D 
        CALL ATM2OCN_MAIN(iloop, na, monid, myIter, myThid)
./pkg/atm2d/forward_step_atm2d.F 175 FORWARD_STEP_ATM2D 
        iloop_ocn = nint((iloop-1)*dtcouplo/deltaTClock) + no
./pkg/atm2d/forward_step_atm2d.F 319 FORWARD_STEP_ATM2D 
        IF (iloop.EQ.nTimeSteps) CALL ATM2D_FINISH(myThid)
./pkg/atm2d/forward_step_atm2d.F 33 FORWARD_STEP_ATM2D 
      INTEGER iloop
./pkg/atm2d/forward_step_atm2d.F 65 FORWARD_STEP_ATM2D 
      print *,'*** Top of forwrdstep_atm',iloop,myTime,myIter
./pkg/atm2d/forward_step_atm2d.F 66 FORWARD_STEP_ATM2D 
      idyear= int((iloop-1)*dtcouple/365.0/24.0) + 1
./pkg/atm2d/forward_step_atm2d.F 68 FORWARD_STEP_ATM2D 
      inyr = mod(iloop*dtcouple, 365*24)
./pkg/atm2d/forward_step_atm2d.F 73 FORWARD_STEP_ATM2D 
      inday= mod(iloop*dtcouple, 24)
./pkg/atm2d/forward_step_atm2d.F 9 FORWARD_STEP_ATM2D 
      SUBROUTINE FORWARD_STEP_ATM2D(iloop, myTime, myIter, myThid)
./pkg/ecco/forward_step.F 10 FORWARD_STEP 
      SUBROUTINE FORWARD_STEP( iloop, myTime, myIter, myThid )
./pkg/ecco/forward_step.F 45 FORWARD_STEP 
      integer iloop
./pkg/ecco/the_main_loop.F 1014 THE_MAIN_LOOP 
        CALL SHOWFLOPS_INLOOP( iloop, mythid )
./pkg/ecco/the_main_loop.F 198 THE_MAIN_LOOP 
      integer iloop
./pkg/ecco/the_main_loop.F 400 THE_MAIN_LOOP 
            iloop = (ilev_2 - 1)*nchklev_1                     + ilev_1
./pkg/ecco/the_main_loop.F 408 THE_MAIN_LOOP 
            if ( iloop .le. nTimeSteps ) then
./pkg/ecco/the_main_loop.F 430 THE_MAIN_LOOP 
      do iloop = 1, nTimeSteps
./pkg/ecco/the_main_loop.F 437 THE_MAIN_LOOP 
      do iloop = 1, nTimeSteps
./pkg/ecco/the_main_loop.F 446 THE_MAIN_LOOP 
        myiter = nIter0 + (iloop-1)
./pkg/ecco/the_main_loop.F 447 THE_MAIN_LOOP 
        mytime = startTime + float(iloop-1)*deltaTclock
./pkg/fizhi/fizhi_clockstuff.F 717 TIC_TIME 
      integer iloop
./pkg/fizhi/fizhi_clockstuff.F 761 TIC_TIME 
       do iloop=1,100000
./pkg/fizhi/fizhi_moist.F 139 MOISTIO 
      integer i,j,iloop,indx,indgath,l,nn,num,numdeps,nt
./pkg/fizhi/fizhi_moist.F 381 MOISTIO 
      DO iloop = 1,numdeps
./pkg/fizhi/fizhi_moist.F 383 MOISTIO 
       nsubcl = depths(iloop)