| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_readparms.F |
82 |
FIZHI_READPARMS |
nTimeSteps = int(nincr/deltaT) |
|
./pkg/fizhi/fizhi_readparms.F |
83 |
FIZHI_READPARMS |
nEndIter = nIter0 + nTimeSteps |
|
./pkg/fizhi/fizhi_readparms.F |
84 |
FIZHI_READPARMS |
endTime = startTime + deltaT*float(nTimeSteps) |
|
./model/inc/PARAMS.h |
195 |
NO PROCEDURE |
& nIter0, nTimeSteps, nEndIter, |
|
./model/inc/PARAMS.h |
214 |
NO PROCEDURE |
INTEGER nTimeSteps |
|
./pkg/longstep/longstep_check_iters.F |
60 |
LONGSTEP_CHECK_ITERS |
nTimeSteps = nEndIter - nIter0 |
|
./pkg/longstep/longstep_check_iters.F |
71 |
LONGSTEP_CHECK_ITERS |
& ' LONGSTEP_CHECK_ITERS: nTimeSteps =', nTimeSteps |
|
./pkg/longstep/longstep_check_iters.F |
85 |
LONGSTEP_CHECK_ITERS |
CALL WRITE_0D_I( nTimeSteps, INDEX_NONE,'nTimeSteps =', |
|
./model/src/config_summary.F |
532 |
CONFIG_SUMMARY |
CALL WRITE_0D_I( nTimeSteps, INDEX_NONE,'nTimeSteps =', |
|
./verification/OpenAD/code_oad_all/openad_checkpointInit.F |
103 |
OPENAD_CHECKPOINTINIT |
if (MOD(nTimeSteps,uCheckLev1).gt.0) then |
|
./verification/OpenAD/code_oad_all/openad_checkpointInit.F |
104 |
OPENAD_CHECKPOINTINIT |
if((nTimeSteps/uCheckLev1)+1 .le. uCheckLev2 ) then |
|
./verification/OpenAD/code_oad_all/openad_checkpointInit.F |
105 |
OPENAD_CHECKPOINTINIT |
uCheckLev2=(nTimeSteps/uCheckLev1)+1 |
|
./verification/OpenAD/code_oad_all/openad_checkpointInit.F |
109 |
OPENAD_CHECKPOINTINIT |
if((nTimeSteps/uCheckLev1) .le. uCheckLev2 ) then |
|
./verification/OpenAD/code_oad_all/openad_checkpointInit.F |
110 |
OPENAD_CHECKPOINTINIT |
uCheckLev2=(nTimeSteps/uCheckLev1) |
|
./verification/OpenAD/code_oad_all/openad_checkpointInit.F |
120 |
OPENAD_CHECKPOINTINIT |
if (MOD(nTimeSteps,uCheckLev1*uCheckLev2).gt.0) then |
|
./verification/OpenAD/code_oad_all/openad_checkpointInit.F |
121 |
OPENAD_CHECKPOINTINIT |
if((nTimeSteps/(uCheckLev1*uCheckLev2))+1 |
|
./verification/OpenAD/code_oad_all/openad_checkpointInit.F |
123 |
OPENAD_CHECKPOINTINIT |
uCheckLev3=(nTimeSteps/(uCheckLev1*uCheckLev2))+1 |
|
./verification/OpenAD/code_oad_all/openad_checkpointInit.F |
127 |
OPENAD_CHECKPOINTINIT |
if((nTimeSteps/(uCheckLev1*uCheckLev2)) .le. uCheckLev3 )then |
|
./verification/OpenAD/code_oad_all/openad_checkpointInit.F |
128 |
OPENAD_CHECKPOINTINIT |
uCheckLev3=(nTimeSteps/(uCheckLev1*uCheckLev2)) |
|
./verification/OpenAD/code_oad_all/openad_checkpointInit.F |
138 |
OPENAD_CHECKPOINTINIT |
if (MOD(nTimeSteps,uCheckLev1*uCheckLev2*uCheckLev3) |
|
./verification/OpenAD/code_oad_all/openad_checkpointInit.F |
140 |
OPENAD_CHECKPOINTINIT |
if((nTimeSteps/(uCheckLev1*uCheckLev2*uCheckLev3))+1 |
|
./verification/OpenAD/code_oad_all/openad_checkpointInit.F |
143 |
OPENAD_CHECKPOINTINIT |
+ (nTimeSteps/(uCheckLev1*uCheckLev2*uCheckLev3))+1 |
|
./verification/OpenAD/code_oad_all/openad_checkpointInit.F |
147 |
OPENAD_CHECKPOINTINIT |
if((nTimeSteps/(uCheckLev1*uCheckLev2*uCheckLev3)) |
|
./verification/OpenAD/code_oad_all/openad_checkpointInit.F |
150 |
OPENAD_CHECKPOINTINIT |
+ (nTimeSteps/(uCheckLev1*uCheckLev2*uCheckLev3)) |
|
./verification/OpenAD/code_oad_all/openad_checkpointInit.F |
96 |
OPENAD_CHECKPOINTINIT |
if (nTimeSteps .lt. uCheckLev1 ) then |
|
./verification/OpenAD/code_oad_all/openad_checkpointInit.F |
97 |
OPENAD_CHECKPOINTINIT |
uCheckLev1=nTimeSteps |
|
./verification/OpenAD/code_oad_all/the_first_level_loop.F |
97 |
THE_FIRST_LEVEL_LOOP |
+ 'OAD: THE_FIRST_LEVEL_LOOP: iloop=',iLoop,' of ',nTimeSteps |
|
./verification/OpenAD/code_oad_all/the_fourth_level_loop.F |
106 |
THE_FOURTH_LEVEL_LOOP |
if (theCurrentStep .le. nTimeSteps) then |
|
./verification/OpenAD/code_oad_all/the_fourth_level_loop.F |
210 |
THE_FOURTH_LEVEL_PLAIN |
if (theCurrentStep .le. nTimeSteps) then |
|
./verification/OpenAD/code_oad_all/the_second_level_loop.F |
112 |
THE_SECOND_LEVEL_LOOP |
if ( testStep .le. nTimeSteps ) then |
|
./verification/OpenAD/code_oad_all/the_second_level_loop.F |
216 |
THE_SECOND_LEVEL_PLAIN |
if ( theCurrentStep .le. nTimeSteps ) then |
|
./verification/OpenAD/code_oad_all/the_third_level_loop.F |
106 |
THE_THIRD_LEVEL_LOOP |
if (theCurrentStep .le. nTimeSteps) then |
|
./verification/OpenAD/code_oad_all/the_third_level_loop.F |
210 |
THE_THIRD_LEVEL_PLAIN |
if (theCurrentStep .le. nTimeSteps) then |
|
./model/src/ini_parms.F |
222 |
INI_PARMS |
& nIter0, nTimeSteps, nEndIter, |
|
./model/src/ini_parms.F |
900 |
INI_PARMS |
IF ( nTimeSteps .EQ. 0 .AND. nEndIter .NE. 0 ) |
|
./model/src/ini_parms.F |
901 |
INI_PARMS |
& nTimeSteps = nEndIter-nIter0 |
|
./model/src/ini_parms.F |
903 |
INI_PARMS |
IF ( nTimeSteps .EQ. 0 .AND. endTime .NE. 0. ) |
|
./model/src/ini_parms.F |
904 |
INI_PARMS |
& nTimeSteps = NINT((endTime-startTime)/deltaTclock) |
|
./model/src/ini_parms.F |
906 |
INI_PARMS |
IF ( nEndIter .EQ. 0 .AND. nTimeSteps .NE. 0 ) |
|
./model/src/ini_parms.F |
907 |
INI_PARMS |
& nEndIter = nIter0+nTimeSteps |
|
./model/src/ini_parms.F |
912 |
INI_PARMS |
IF ( endTime .EQ. 0. .AND. nTimeSteps .NE. 0 ) |
|
./model/src/ini_parms.F |
913 |
INI_PARMS |
& endTime = startTime + deltaTClock*float(nTimeSteps) |
|
./model/src/ini_parms.F |
928 |
INI_PARMS |
IF ( nEndIter .NE. nIter0+nTimeSteps ) THEN |
|
./model/src/ini_parms.F |
937 |
INI_PARMS |
IF ( nTimeSteps .NE. NINT((endTime-startTime)/deltaTClock) |
|
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
221 |
THE_MAIN_LOOP |
max_lev3=nTimeSteps/(nchklev_1*nchklev_2)+1 |
|
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
222 |
THE_MAIN_LOOP |
max_lev2=nTimeSteps/nchklev_1+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 |
324 |
THE_MAIN_LOOP |
if (nchklev_0 .lt. nTimeSteps) then |
|
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
330 |
THE_MAIN_LOOP |
& nTimeSteps |
|
./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/offline_exf_seaice/code_ad/the_main_loop.F |
208 |
THE_MAIN_LOOP |
max_lev4=nTimeSteps/(nchklev_1*nchklev_2*nchklev_3)+1 |
|
./verification/offline_exf_seaice/code_ad/the_main_loop.F |
209 |
THE_MAIN_LOOP |
max_lev3=nTimeSteps/(nchklev_1*nchklev_2)+1 |
|
./verification/offline_exf_seaice/code_ad/the_main_loop.F |
210 |
THE_MAIN_LOOP |
max_lev2=nTimeSteps/nchklev_1+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 |
344 |
THE_MAIN_LOOP |
if (nchklev_0 .lt. nTimeSteps) then |
|
./verification/offline_exf_seaice/code_ad/the_main_loop.F |
349 |
THE_MAIN_LOOP |
& nTimeSteps |
|
./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 |
|
./model/src/set_defaults.F |
262 |
SET_DEFAULTS |
nTimeSteps = 0 |
|
./model/src/set_defaults.F |
263 |
SET_DEFAULTS |
nEndIter = nIter0+nTimeSteps |
|
./model/src/set_parms.F |
158 |
SET_PARMS |
tmpVar = startTime + deltaTClock*FLOAT(nTimeSteps) |
|
./model/src/the_main_loop.F |
258 |
THE_MAIN_LOOP |
max_lev4=nTimeSteps/(nchklev_1*nchklev_2*nchklev_3)+1 |
|
./model/src/the_main_loop.F |
259 |
THE_MAIN_LOOP |
max_lev3=nTimeSteps/(nchklev_1*nchklev_2)+1 |
|
./model/src/the_main_loop.F |
260 |
THE_MAIN_LOOP |
max_lev2=nTimeSteps/nchklev_1+1 |
|
./model/src/the_main_loop.F |
395 |
THE_MAIN_LOOP |
if ( iloop .le. nTimeSteps ) then |
|
./model/src/the_main_loop.F |
407 |
THE_MAIN_LOOP |
if (nchklev_0 .lt. nTimeSteps) then |
|
./model/src/the_main_loop.F |
412 |
THE_MAIN_LOOP |
& nTimeSteps |
|
./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 |
|
./pkg/atm2d/atm2d_init_fixed.F |
75 |
ATM2D_INIT_FIXED |
nTimeSteps = nCouplePer !overwrite whatever MITGCM gets from data |
|
./pkg/atm2d/forward_step_atm2d.F |
334 |
FORWARD_STEP_ATM2D |
IF (iloop.EQ.nTimeSteps) CALL ATM2D_FINISH(myThid) |
|
./pkg/autodiff/autodiff_check.F |
33 |
AUTODIFF_CHECK |
if (nchklev_1*nchklev_2 .lt. nTimeSteps) then |
|
./pkg/autodiff/autodiff_check.F |
38 |
AUTODIFF_CHECK |
& nTimeSteps |
|
./pkg/autodiff/autodiff_check.F |
42 |
AUTODIFF_CHECK |
if (nchklev_1*nchklev_2*nchklev_3*nchklev_4 .lt. nTimeSteps) then |
|
./pkg/autodiff/autodiff_check.F |
47 |
AUTODIFF_CHECK |
& nTimeSteps |
|
./pkg/autodiff/autodiff_check.F |
53 |
AUTODIFF_CHECK |
if (nchklev_1*nchklev_2*nchklev_3 .lt. nTimeSteps) then |
|
./pkg/autodiff/autodiff_check.F |
58 |
AUTODIFF_CHECK |
& nTimeSteps |
|
./pkg/cal/cal_readparms.F |
148 |
CAL_READPARMS |
modintsteps = nTimeSteps |
|
./pkg/diagnostics/diagnostics_readparms.F |
248 |
DIAGNOSTICS_READPARMS |
averageFreq(n) = nTimeSteps*deltaTClock |
|
./pkg/ecco/cost_atlantic.F |
179 |
COST_ATLANTIC |
& )/float(nTimeSteps) |
|
./pkg/ecco/the_main_loop.F |
286 |
THE_MAIN_LOOP |
max_lev4=nTimeSteps/(nchklev_1*nchklev_2*nchklev_3)+1 |
|
./pkg/ecco/the_main_loop.F |
287 |
THE_MAIN_LOOP |
max_lev3=nTimeSteps/(nchklev_1*nchklev_2)+1 |
|
./pkg/ecco/the_main_loop.F |
288 |
THE_MAIN_LOOP |
max_lev2=nTimeSteps/nchklev_1+1 |
|
./pkg/ecco/the_main_loop.F |
420 |
THE_MAIN_LOOP |
if ( iloop .le. nTimeSteps ) then |
|
./pkg/ecco/the_main_loop.F |
432 |
THE_MAIN_LOOP |
if (nchklev_0 .lt. nTimeSteps) then |
|
./pkg/ecco/the_main_loop.F |
438 |
THE_MAIN_LOOP |
& nTimeSteps |
|
./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 |