Symbol Description Uses
iloop 68



File Line number Procedure Code
./pkg/fizhi/fizhi_clockstuff.F 703 TIC_TIME
      integer iloop
./pkg/fizhi/fizhi_clockstuff.F 747 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 403 MOISTIO
      DO iloop = 1,numdeps
./pkg/fizhi/fizhi_moist.F 405 MOISTIO
       nsubcl = depths(iloop)
./pkg/openad/inner_do_loop.F 200 INNER_DO_LOOP
      INTEGER iloop
./pkg/openad/inner_do_loop.F 222 INNER_DO_LOOP
        prod = (iloop-1)*nTimeSteps_l2+iloop1
./pkg/openad/inner_do_loop.F 234 INNER_DO_LOOP
        CALL FORWARD_STEP_ATM2D( iloop, myTime, myIter, myThid )
./pkg/openad/inner_do_loop.F 242 INNER_DO_LOOP
        CALL FORWARD_STEP( iloop, myTime, myIter, myThid )
./pkg/openad/inner_do_loop.F 44 INNER_DO_LOOP
      SUBROUTINE INNER_DO_LOOP( iloop, myTime, myIter, myThid )
./pkg/openad/openad_checkpointInit.F 15 OPENAD_CHECKPOINTINIT
      integer iloop
./model/src/forward_step.F 1236 FORWARD_STEP
      CALL SHOWFLOPS_INLOOP( iloop, myThid )
./model/src/forward_step.F 377 FORWARD_STEP
      INTEGER iloop
./model/src/forward_step.F 404 FORWARD_STEP
      myIter = nIter0 + (iloop-1)
./model/src/forward_step.F 61 FORWARD_STEP
      SUBROUTINE FORWARD_STEP( iloop, myTime, myIter, myThid )
./pkg/showflops/showflops_init.F 40 SHOWFLOPS_INIT
      integer iloop
./pkg/showflops/showflops_inloop.F 100 SHOWFLOPS_INLOOP
     $        'during timestep ', iloop
./pkg/showflops/showflops_inloop.F 34 SHOWFLOPS_INLOOP
      integer iloop
./pkg/showflops/showflops_inloop.F 65 SHOWFLOPS_INLOOP
     $        stnew - stold, wtnew - wtold, iloop
./pkg/showflops/showflops_inloop.F 82 SHOWFLOPS_INLOOP
     $     'Mflop/s during timestep ', iloop
./pkg/showflops/showflops_inloop.F 88 SHOWFLOPS_INLOOP
     $     'IPC during timestep ', iloop
./pkg/showflops/showflops_inloop.F 9 SHOWFLOPS_INLOOP
      SUBROUTINE SHOWFLOPS_INLOOP( iloop, myThid )
./pkg/showflops/showflops_insolve.F 34 SHOWFLOPS_INSOLVE
      integer iloop
./pkg/smooth/smooth_diff2d.F 112 SMOOTH_DIFF2D
      iloop = (ilev_2 - 1)*nchklev_1 + ilev_1
./pkg/smooth/smooth_diff2d.F 114 SMOOTH_DIFF2D
      if ( iloop .le. nbt_in ) then
./pkg/smooth/smooth_diff2d.F 124 SMOOTH_DIFF2D
      do iloop=1,nbt_in
./pkg/smooth/smooth_diff2d.F 166 SMOOTH_DIFF2D
      myIter(bi,bj)=iloop-1
./pkg/smooth/smooth_diff2d.F 41 SMOOTH_DIFF2D
      integer iloop, ilev_1, ilev_2, ilev_3
./pkg/smooth/smooth_diff3d.F 104 SMOOTH_DIFF3D
      iloop = (ilev_2 - 1)*nchklev_1 + ilev_1
./pkg/smooth/smooth_diff3d.F 106 SMOOTH_DIFF3D
      if ( iloop .le. nbt_in ) then
./pkg/smooth/smooth_diff3d.F 114 SMOOTH_DIFF3D
      do iloop=1,nbt_in
./pkg/smooth/smooth_diff3d.F 137 SMOOTH_DIFF3D
      myIter(bi,bj)=iloop-1
./pkg/smooth/smooth_diff3d.F 38 SMOOTH_DIFF3D
      integer iloop, ilev_1, ilev_2, ilev_3
./model/src/main_do_loop.F 157 MAIN_DO_LOOP
      INTEGER iloop
./model/src/main_do_loop.F 168 MAIN_DO_LOOP
      DO iloop = 1, nTimeSteps_l2
./model/src/main_do_loop.F 170 MAIN_DO_LOOP
      DO iloop = 1, nTimeSteps
./model/src/main_do_loop.F 182 MAIN_DO_LOOP
        CALL FORWARD_STEP_ATM2D( iloop, myTime, myIter, myThid )
./model/src/main_do_loop.F 186 MAIN_DO_LOOP
        CALL FORWARD_STEP( iloop, myTime, myIter, myThid )
./model/src/main_do_loop.F 193 MAIN_DO_LOOP
       CALL INNER_DO_LOOP( iloop, myTime, myIter, myThid )
./model/src/main_do_loop.F 198 MAIN_DO_LOOP
       CALL FORWARD_STEP( iloop, myTime, myIter, myThid )
./model/src/main_do_loop.F 52 MAIN_DO_LOOP
      SUBROUTINE MAIN_DO_LOOP( iloop, myTime, myIter, myThid )
./model/src/the_main_loop.F 234 THE_MAIN_LOOP
      INTEGER iloop
./model/src/the_main_loop.F 557 THE_MAIN_LOOP
            iloop = (ilev_2 - 1)*nchklev_1 + ilev_1
./model/src/the_main_loop.F 565 THE_MAIN_LOOP
            if ( iloop .le. nTimeSteps ) then
./model/src/the_main_loop.F 569 THE_MAIN_LOOP
      DO iloop = 1, nTimeSteps
./model/src/the_main_loop.F 578 THE_MAIN_LOOP
      DO iloop = 1, nTimeSteps
./model/src/the_main_loop.F 586 THE_MAIN_LOOP
      myIter = nIter0 + (iloop-1)
./model/src/the_main_loop.F 587 THE_MAIN_LOOP
      myTime = startTime + deltaTClock*(iloop-1)
./model/src/the_main_loop.F 613 THE_MAIN_LOOP
        myIter = nIter0 + (iloop-1)
./model/src/the_main_loop.F 614 THE_MAIN_LOOP
        myTime = startTime + deltaTClock*(iloop-1)
./model/src/the_main_loop.F 623 THE_MAIN_LOOP
      CALL MAIN_DO_LOOP( 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 204 FORWARD_STEP_ATM2D
      IF ( (iloop.NE.1).OR. (iloop.EQ.1.AND.
./pkg/atm2d/forward_step_atm2d.F 229 FORWARD_STEP_ATM2D
        CALL ATM2OCN_MAIN(iloop, na, monid, myIter, myThid)
./pkg/atm2d/forward_step_atm2d.F 243 FORWARD_STEP_ATM2D
        iloop_ocn = nint((iloop-1)*dtcouplo/deltaTClock) + no
./pkg/atm2d/forward_step_atm2d.F 383 FORWARD_STEP_ATM2D
        IF (iloop.EQ.nTimeSteps) CALL ATM2D_FINISH(myThid)
./pkg/atm2d/forward_step_atm2d.F 38 FORWARD_STEP_ATM2D
      INTEGER iloop
./pkg/atm2d/forward_step_atm2d.F 87 FORWARD_STEP_ATM2D
      idyear= int((iloop-1)*dtcouple/365.0/24.0) + 1
./pkg/atm2d/forward_step_atm2d.F 89 FORWARD_STEP_ATM2D
      inyr = mod(iloop*dtcouple, 365*24)
./pkg/atm2d/forward_step_atm2d.F 94 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)