| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
200 |
NO PROCEDURE |
& nIter0, nTimeSteps, nEndIter, |
|
./model/inc/PARAMS.h |
221 |
NO PROCEDURE |
INTEGER nTimeSteps |
|
./pkg/fizhi/fizhi_readparms.F |
94 |
FIZHI_READPARMS |
nTimeSteps = int(nincr/deltaT) |
|
./pkg/fizhi/fizhi_readparms.F |
95 |
FIZHI_READPARMS |
nEndIter = nIter0 + nTimeSteps |
|
./pkg/fizhi/fizhi_readparms.F |
96 |
FIZHI_READPARMS |
endTime = startTime + deltaT*float(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 |
657 |
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/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 |
242 |
INI_PARMS |
& nIter0, nTimeSteps, nEndIter, |
|
./model/src/ini_parms.F |
940 |
INI_PARMS |
IF ( nTimeSteps .EQ. 0 .AND. nEndIter .NE. 0 ) |
|
./model/src/ini_parms.F |
941 |
INI_PARMS |
& nTimeSteps = nEndIter-nIter0 |
|
./model/src/ini_parms.F |
943 |
INI_PARMS |
IF ( nTimeSteps .EQ. 0 .AND. endTime .NE. 0. ) |
|
./model/src/ini_parms.F |
944 |
INI_PARMS |
& nTimeSteps = NINT((endTime-startTime)/deltaTClock) |
|
./model/src/ini_parms.F |
946 |
INI_PARMS |
IF ( nEndIter .EQ. 0 .AND. nTimeSteps .NE. 0 ) |
|
./model/src/ini_parms.F |
947 |
INI_PARMS |
& nEndIter = nIter0+nTimeSteps |
|
./model/src/ini_parms.F |
952 |
INI_PARMS |
IF ( endTime .EQ. 0. .AND. nTimeSteps .NE. 0 ) |
|
./model/src/ini_parms.F |
953 |
INI_PARMS |
& endTime = startTime + deltaTClock*float(nTimeSteps) |
|
./model/src/ini_parms.F |
968 |
INI_PARMS |
IF ( nEndIter .NE. nIter0+nTimeSteps ) THEN |
|
./model/src/ini_parms.F |
977 |
INI_PARMS |
IF ( nTimeSteps .NE. NINT((endTime-startTime)/deltaTClock) |
|
./model/src/main_do_loop.F |
214 |
MAIN_DO_LOOP |
DO iloop = 1, nTimeSteps |
|
./model/src/set_defaults.F |
297 |
SET_DEFAULTS |
nTimeSteps = 0 |
|
./model/src/set_parms.F |
239 |
SET_PARMS |
tmpVar = startTime + deltaTClock*FLOAT(nTimeSteps) |
|
./model/src/the_main_loop.F |
338 |
THE_MAIN_LOOP |
max_lev4=nTimeSteps/(nchklev_1*nchklev_2*nchklev_3)+1 |
|
./model/src/the_main_loop.F |
339 |
THE_MAIN_LOOP |
max_lev3=nTimeSteps/(nchklev_1*nchklev_2)+1 |
|
./model/src/the_main_loop.F |
340 |
THE_MAIN_LOOP |
max_lev2=nTimeSteps/nchklev_1+1 |
|
./model/src/the_main_loop.F |
534 |
THE_MAIN_LOOP |
if ( iloop .le. nTimeSteps ) then |
|
./model/src/the_main_loop.F |
538 |
THE_MAIN_LOOP |
DO iloop = 1, nTimeSteps |
|
./model/src/the_main_loop.F |
547 |
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 |
38 |
AUTODIFF_CHECK |
if (nchklev_1*nchklev_2 .lt. nTimeSteps) then |
|
./pkg/autodiff/autodiff_check.F |
48 |
AUTODIFF_CHECK |
& nTimeSteps |
|
./pkg/autodiff/autodiff_check.F |
53 |
AUTODIFF_CHECK |
if (nchklev_1*nchklev_2*nchklev_3*nchklev_4 .lt. nTimeSteps) then |
|
./pkg/autodiff/autodiff_check.F |
63 |
AUTODIFF_CHECK |
& nTimeSteps |
|
./pkg/autodiff/autodiff_check.F |
70 |
AUTODIFF_CHECK |
if (nchklev_1*nchklev_2*nchklev_3 .lt. nTimeSteps) then |
|
./pkg/autodiff/autodiff_check.F |
80 |
AUTODIFF_CHECK |
& nTimeSteps |
|
./pkg/autodiff/autodiff_check.F |
86 |
AUTODIFF_CHECK |
if (nchklev_1 .lt. nTimeSteps) then |
|
./pkg/autodiff/autodiff_check.F |
94 |
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 |
286 |
DIAGNOSTICS_READPARMS |
averageFreq(n) = nTimeSteps*deltaTClock |
|
./pkg/ecco/cost_atlantic.F |
187 |
COST_ATLANTIC |
& )/float(nTimeSteps) |