File |
Line number |
Procedure |
Code |
./model/inc/PARAMS.h |
225 |
NO PROCEDURE |
& nIter0, nTimeSteps, nTimeSteps_l2, nEndIter, |
./model/inc/PARAMS.h |
246 |
NO PROCEDURE |
INTEGER nTimeSteps |
./pkg/fizhi/fizhi_readparms.F |
100 |
FIZHI_READPARMS |
endTime = startTime + deltaT*float(nTimeSteps) |
./pkg/fizhi/fizhi_readparms.F |
98 |
FIZHI_READPARMS |
nTimeSteps = int(nincr/deltaT) |
./pkg/fizhi/fizhi_readparms.F |
99 |
FIZHI_READPARMS |
nEndIter = nIter0 + 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 |
722 |
CONFIG_SUMMARY |
CALL WRITE_0D_I( nTimeSteps, INDEX_NONE,'nTimeSteps =', |
./pkg/ocn_compon_interf/ocn_export_ocnconfig.F |
56 |
OCN_EXPORT_OCNCONFIG |
tmpFld(1) = nTimeSteps |
./pkg/openad/inner_do_loop.F |
221 |
INNER_DO_LOOP |
DO iloop1 = 1, nTimeSteps |
./pkg/openad/openad_checkpointInit.F |
104 |
OPENAD_CHECKPOINTINIT |
if (MOD(nTimeSteps,uCheckLev1).gt.0) then |
./pkg/openad/openad_checkpointInit.F |
105 |
OPENAD_CHECKPOINTINIT |
if((nTimeSteps/uCheckLev1)+1 .le. uCheckLev2 ) then |
./pkg/openad/openad_checkpointInit.F |
106 |
OPENAD_CHECKPOINTINIT |
uCheckLev2=(nTimeSteps/uCheckLev1)+1 |
./pkg/openad/openad_checkpointInit.F |
110 |
OPENAD_CHECKPOINTINIT |
if((nTimeSteps/uCheckLev1) .le. uCheckLev2 ) then |
./pkg/openad/openad_checkpointInit.F |
111 |
OPENAD_CHECKPOINTINIT |
uCheckLev2=(nTimeSteps/uCheckLev1) |
./pkg/openad/openad_checkpointInit.F |
121 |
OPENAD_CHECKPOINTINIT |
if (MOD(nTimeSteps,uCheckLev1*uCheckLev2).gt.0) then |
./pkg/openad/openad_checkpointInit.F |
122 |
OPENAD_CHECKPOINTINIT |
if((nTimeSteps/(uCheckLev1*uCheckLev2))+1 |
./pkg/openad/openad_checkpointInit.F |
124 |
OPENAD_CHECKPOINTINIT |
uCheckLev3=(nTimeSteps/(uCheckLev1*uCheckLev2))+1 |
./pkg/openad/openad_checkpointInit.F |
128 |
OPENAD_CHECKPOINTINIT |
if((nTimeSteps/(uCheckLev1*uCheckLev2)) .le. uCheckLev3 )then |
./pkg/openad/openad_checkpointInit.F |
129 |
OPENAD_CHECKPOINTINIT |
uCheckLev3=(nTimeSteps/(uCheckLev1*uCheckLev2)) |
./pkg/openad/openad_checkpointInit.F |
139 |
OPENAD_CHECKPOINTINIT |
if (MOD(nTimeSteps,uCheckLev1*uCheckLev2*uCheckLev3) |
./pkg/openad/openad_checkpointInit.F |
141 |
OPENAD_CHECKPOINTINIT |
if((nTimeSteps/(uCheckLev1*uCheckLev2*uCheckLev3))+1 |
./pkg/openad/openad_checkpointInit.F |
144 |
OPENAD_CHECKPOINTINIT |
+ (nTimeSteps/(uCheckLev1*uCheckLev2*uCheckLev3))+1 |
./pkg/openad/openad_checkpointInit.F |
148 |
OPENAD_CHECKPOINTINIT |
if((nTimeSteps/(uCheckLev1*uCheckLev2*uCheckLev3)) |
./pkg/openad/openad_checkpointInit.F |
151 |
OPENAD_CHECKPOINTINIT |
+ (nTimeSteps/(uCheckLev1*uCheckLev2*uCheckLev3)) |
./pkg/openad/openad_checkpointInit.F |
97 |
OPENAD_CHECKPOINTINIT |
if (nTimeSteps .lt. uCheckLev1 ) then |
./pkg/openad/openad_checkpointInit.F |
98 |
OPENAD_CHECKPOINTINIT |
uCheckLev1=nTimeSteps |
./model/src/ini_parms.F |
1010 |
INI_PARMS |
IF ( nEndIter .NE. nIter0+nTimeSteps ) THEN |
./model/src/ini_parms.F |
1019 |
INI_PARMS |
IF ( nTimeSteps .NE. NINT((endTime-startTime)/deltaTClock) |
./model/src/ini_parms.F |
252 |
INI_PARMS |
& nIter0, nTimeSteps, nTimeSteps_l2, nEndIter, |
./model/src/ini_parms.F |
982 |
INI_PARMS |
IF ( nTimeSteps .EQ. 0 .AND. nEndIter .NE. 0 ) |
./model/src/ini_parms.F |
983 |
INI_PARMS |
& nTimeSteps = nEndIter-nIter0 |
./model/src/ini_parms.F |
985 |
INI_PARMS |
IF ( nTimeSteps .EQ. 0 .AND. endTime .NE. 0. ) |
./model/src/ini_parms.F |
986 |
INI_PARMS |
& nTimeSteps = NINT((endTime-startTime)/deltaTClock) |
./model/src/ini_parms.F |
988 |
INI_PARMS |
IF ( nEndIter .EQ. 0 .AND. nTimeSteps .NE. 0 ) |
./model/src/ini_parms.F |
989 |
INI_PARMS |
& nEndIter = nIter0+nTimeSteps |
./model/src/ini_parms.F |
994 |
INI_PARMS |
IF ( endTime .EQ. 0. .AND. nTimeSteps .NE. 0 ) |
./model/src/ini_parms.F |
995 |
INI_PARMS |
& endTime = startTime + deltaTClock*DFLOAT(nTimeSteps) |
./model/src/main_do_loop.F |
170 |
MAIN_DO_LOOP |
DO iloop = 1, nTimeSteps |
./model/src/set_defaults.F |
304 |
SET_DEFAULTS |
nTimeSteps = 0 |
./model/src/set_parms.F |
269 |
SET_PARMS |
tmpVar = startTime + deltaTClock*DFLOAT(nTimeSteps) |
./model/src/the_main_loop.F |
363 |
THE_MAIN_LOOP |
max_lev4=nTimeSteps/(nchklev_1*nchklev_2*nchklev_3)+1 |
./model/src/the_main_loop.F |
364 |
THE_MAIN_LOOP |
max_lev3=nTimeSteps/(nchklev_1*nchklev_2)+1 |
./model/src/the_main_loop.F |
365 |
THE_MAIN_LOOP |
max_lev2=nTimeSteps/nchklev_1+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 |
./pkg/atm2d/atm2d_init_fixed.F |
78 |
ATM2D_INIT_FIXED |
nTimeSteps = nCouplePer !overwrite whatever MITGCM gets from data |
./pkg/atm2d/forward_step_atm2d.F |
383 |
FORWARD_STEP_ATM2D |
IF (iloop.EQ.nTimeSteps) CALL ATM2D_FINISH(myThid) |
./pkg/atm_compon_interf/atm_export_atmconfig.F |
52 |
ATM_EXPORT_ATMCONFIG |
IF ( MOD( nTimeSteps, cplSendFrq_iter ).NE.0 ) THEN |
./pkg/atm_compon_interf/atm_export_atmconfig.F |
58 |
ATM_EXPORT_ATMCONFIG |
tmpFld(1) = nTimeSteps/cplSendFrq_iter |
./pkg/autodiff/autodiff_check.F |
37 |
AUTODIFF_CHECK |
if (nchklev_1*nchklev_2 .lt. nTimeSteps) then |
./pkg/autodiff/autodiff_check.F |
47 |
AUTODIFF_CHECK |
& nTimeSteps |
./pkg/autodiff/autodiff_check.F |
52 |
AUTODIFF_CHECK |
if (nchklev_1*nchklev_2*nchklev_3*nchklev_4 .lt. nTimeSteps) then |
./pkg/autodiff/autodiff_check.F |
62 |
AUTODIFF_CHECK |
& nTimeSteps |
./pkg/autodiff/autodiff_check.F |
69 |
AUTODIFF_CHECK |
if (nchklev_1*nchklev_2*nchklev_3 .lt. nTimeSteps) then |
./pkg/autodiff/autodiff_check.F |
79 |
AUTODIFF_CHECK |
& nTimeSteps |
./pkg/autodiff/autodiff_check.F |
85 |
AUTODIFF_CHECK |
if (nchklev_1 .lt. nTimeSteps) then |
./pkg/autodiff/autodiff_check.F |
93 |
AUTODIFF_CHECK |
& 'are not consistent with nTimeSteps = ', nTimeSteps |
./pkg/cal/cal_init_fixed.F |
39 |
CAL_INIT_FIXED |
I nIter0, nEndIter, nTimeSteps, |
./pkg/diagnostics/diagnostics_readparms.F |
309 |
DIAGNOSTICS_READPARMS |
averageFreq(n) = nTimeSteps*deltaTClock |
./pkg/ecco/ecco_cost_init_fixed.F |
195 |
ECCO_COST_INIT_FIXED |
gencost_nrec(k) =nTimeSteps+1 |