| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_clockstuff.F |
689 |
TIC_TIME |
integer iloop |
|
./pkg/fizhi/fizhi_clockstuff.F |
733 |
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/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 |
|
./pkg/smooth/smooth_diff2d.F |
109 |
SMOOTH_DIFF2D |
iloop = (ilev_2 - 1)*nchklev_1 + ilev_1 |
|
./pkg/smooth/smooth_diff2d.F |
111 |
SMOOTH_DIFF2D |
if ( iloop .le. nbt_in ) then |
|
./pkg/smooth/smooth_diff2d.F |
121 |
SMOOTH_DIFF2D |
do iloop=1,nbt_in |
|
./pkg/smooth/smooth_diff2d.F |
163 |
SMOOTH_DIFF2D |
myIter(bi,bj)=iloop-1 |
|
./pkg/smooth/smooth_diff2d.F |
38 |
SMOOTH_DIFF2D |
integer iloop, ilev_1, ilev_2, ilev_3 |
|
./pkg/smooth/smooth_diff3d.F |
105 |
SMOOTH_DIFF3D |
iloop = (ilev_2 - 1)*nchklev_1 + ilev_1 |
|
./pkg/smooth/smooth_diff3d.F |
107 |
SMOOTH_DIFF3D |
if ( iloop .le. nbt_in ) then |
|
./pkg/smooth/smooth_diff3d.F |
116 |
SMOOTH_DIFF3D |
do iloop=1,nbt_in |
|
./pkg/smooth/smooth_diff3d.F |
139 |
SMOOTH_DIFF3D |
myIter(bi,bj)=iloop-1 |
|
./pkg/smooth/smooth_diff3d.F |
39 |
SMOOTH_DIFF3D |
integer iloop, ilev_1, ilev_2, ilev_3 |
|
./model/src/forward_step.F |
1090 |
FORWARD_STEP |
CALL SHOWFLOPS_INLOOP( iloop, mythid ) |
|
./model/src/forward_step.F |
165 |
FORWARD_STEP |
INTEGER iloop |
|
./model/src/forward_step.F |
195 |
FORWARD_STEP |
myIter = nIter0 + (iloop-1) |
|
./model/src/forward_step.F |
196 |
FORWARD_STEP |
myTime = startTime + float(iloop-1)*deltaTclock |
|
./model/src/forward_step.F |
20 |
FORWARD_STEP |
SUBROUTINE FORWARD_STEP( iloop, myTime, myIter, myThid ) |
|
./verification/OpenAD/code_oad_all/openad_checkpointInit.F |
14 |
OPENAD_CHECKPOINTINIT |
integer iloop |
|
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
151 |
THE_MAIN_LOOP |
integer iloop |
|
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
307 |
THE_MAIN_LOOP |
iloop = (ilev_2 - 1)*nchklev_1 + ilev_1 |
|
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
312 |
THE_MAIN_LOOP |
if ( iloop .le. nTimeSteps ) then |
|
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
334 |
THE_MAIN_LOOP |
do iloop = 1, nTimeSteps |
|
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
341 |
THE_MAIN_LOOP |
do iloop = 1, nTimeSteps |
|
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
350 |
THE_MAIN_LOOP |
myiter = nIter0 + (iloop-1) |
|
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
351 |
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 |
161 |
THE_MAIN_LOOP |
integer iloop |
|
./model/src/the_main_loop.F |
387 |
THE_MAIN_LOOP |
iloop = (ilev_2 - 1)*nchklev_1 + ilev_1 |
|
./model/src/the_main_loop.F |
395 |
THE_MAIN_LOOP |
if ( iloop .le. nTimeSteps ) then |
|
./model/src/the_main_loop.F |
416 |
THE_MAIN_LOOP |
DO iloop = 1, nTimeSteps |
|
./model/src/the_main_loop.F |
440 |
THE_MAIN_LOOP |
DO iloop = 1, nTimeSteps |
|
./model/src/the_main_loop.F |
459 |
THE_MAIN_LOOP |
myIter = nIter0 + (iloop-1) |
|
./model/src/the_main_loop.F |
460 |
THE_MAIN_LOOP |
myTime = startTime + float(iloop-1)*deltaTclock |
|
./model/src/the_main_loop.F |
474 |
THE_MAIN_LOOP |
CALL FORWARD_STEP_ATM2D( iloop, mytime, myiter, mythid ) |
|
./model/src/the_main_loop.F |
484 |
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 |
157 |
FORWARD_STEP_ATM2D |
IF ( (iloop.NE.1).OR. (iloop.EQ.1.AND. |
|
./pkg/atm2d/forward_step_atm2d.F |
176 |
FORWARD_STEP_ATM2D |
CALL ATM2OCN_MAIN(iloop, na, monid, myIter, myThid) |
|
./pkg/atm2d/forward_step_atm2d.F |
190 |
FORWARD_STEP_ATM2D |
iloop_ocn = nint((iloop-1)*dtcouplo/deltaTClock) + no |
|
./pkg/atm2d/forward_step_atm2d.F |
334 |
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 |
74 |
FORWARD_STEP_ATM2D |
idyear= int((iloop-1)*dtcouple/365.0/24.0) + 1 |
|
./pkg/atm2d/forward_step_atm2d.F |
76 |
FORWARD_STEP_ATM2D |
inyr = mod(iloop*dtcouple, 365*24) |
|
./pkg/atm2d/forward_step_atm2d.F |
81 |
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 |
1058 |
THE_MAIN_LOOP |
CALL SHOWFLOPS_INLOOP( iloop, mythid ) |
|
./pkg/ecco/the_main_loop.F |
202 |
THE_MAIN_LOOP |
integer iloop |
|
./pkg/ecco/the_main_loop.F |
412 |
THE_MAIN_LOOP |
iloop = (ilev_2 - 1)*nchklev_1 + ilev_1 |
|
./pkg/ecco/the_main_loop.F |
420 |
THE_MAIN_LOOP |
if ( iloop .le. nTimeSteps ) then |
|
./pkg/ecco/the_main_loop.F |
442 |
THE_MAIN_LOOP |
do iloop = 1, nTimeSteps |
|
./pkg/ecco/the_main_loop.F |
449 |
THE_MAIN_LOOP |
do iloop = 1, nTimeSteps |
|
./pkg/ecco/the_main_loop.F |
458 |
THE_MAIN_LOOP |
myiter = nIter0 + (iloop-1) |
|
./pkg/ecco/the_main_loop.F |
459 |
THE_MAIN_LOOP |
mytime = startTime + float(iloop-1)*deltaTclock |