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) |