| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_init_vars.F |
293 |
FIZHI_INIT_VARS |
call FIZHI_READ_PICKUP( nIter0, myThid ) |
|
./pkg/fizhi/fizhi_init_vars.F |
294 |
FIZHI_INIT_VARS |
CALL FIZHI_READ_VEGTILES( nIter0, 'D', myThid ) |
|
./pkg/fizhi/fizhi_init_vars.F |
93 |
FIZHI_INIT_VARS |
IF ( startTime.EQ.baseTime .AND. nIter0.EQ.0 ) THEN |
|
./pkg/fizhi/fizhi_readparms.F |
83 |
FIZHI_READPARMS |
nEndIter = nIter0 + nTimeSteps |
|
./model/inc/PARAMS.h |
195 |
NO PROCEDURE |
& nIter0, nTimeSteps, nEndIter, |
|
./model/inc/PARAMS.h |
213 |
NO PROCEDURE |
INTEGER nIter0 |
|
./pkg/flt/flt_init_varia.F |
105 |
FLT_INIT_VARIA |
IF ( nIter0.EQ.0 ) THEN |
|
./pkg/flt/flt_init_varia.F |
112 |
FLT_INIT_VARIA |
IF ( ioUnit.GT.0 .AND. nIter0.EQ.0 ) THEN |
|
./pkg/flt/flt_init_varia.F |
185 |
FLT_INIT_VARIA |
IF ( nIter0.EQ.0 ) THEN |
|
./pkg/flt/flt_init_varia.F |
86 |
FLT_INIT_VARIA |
IF ( nIter0.EQ.0 ) THEN |
|
./pkg/flt/flt_init_varia.F |
90 |
FLT_INIT_VARIA |
WRITE(fn,'(A,I10.10)') 'pickup_flt.', nIter0 |
|
./pkg/gchem/gchem_output.F |
38 |
GCHEM_OUTPUT |
IF ( myIter.NE.nIter0 ) |
|
./pkg/generic_advdiff/gad_advection.F |
689 |
GAD_ADVECTION |
& .AND. k.LE.3 .AND. myIter.EQ.1+nIter0 |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
710 |
GAD_CALC_RHS |
& .AND. k.EQ.2 .AND. myIter.EQ.1+nIter0 |
|
./pkg/generic_advdiff/gad_init_varia.F |
62 |
GAD_INIT_VARIA |
IF ( startTime.EQ.baseTime .AND. nIter0.EQ.0 |
|
./pkg/generic_advdiff/gad_init_varia.F |
71 |
GAD_INIT_VARIA |
CALL GAD_READ_PICKUP( nIter0, myThid ) |
|
./pkg/generic_advdiff/gad_som_advect.F |
469 |
GAD_SOM_ADVECT |
& .AND. k.LE.3 .AND. myIter.EQ.1+nIter0 |
|
./pkg/ggl90/ggl90_init_varia.F |
61 |
GGL90_INIT_VARIA |
IF ( nIter0.NE.0 .OR. pickupSuff.NE.' ' ) THEN |
|
./pkg/ggl90/ggl90_init_varia.F |
62 |
GGL90_INIT_VARIA |
CALL GGL90_READ_PICKUP( nIter0, myThid ) |
|
./pkg/ggl90/ggl90_output.F |
106 |
GGL90_OUTPUT |
IF ( myIter.EQ.nIter0 ) THEN |
|
./pkg/ggl90/ggl90_output.F |
138 |
GGL90_OUTPUT |
IF ( myIter.NE.nIter0 .AND. |
|
./pkg/ggl90/ggl90_output.F |
85 |
GGL90_OUTPUT |
IF ( myIter.NE.nIter0 ) THEN |
|
./pkg/kpp/kpp_output.F |
104 |
KPP_OUTPUT |
IF ( myIter.EQ.nIter0 ) THEN |
|
./pkg/kpp/kpp_output.F |
117 |
KPP_OUTPUT |
IF ( myIter.NE.nIter0 .AND. |
|
./pkg/kpp/kpp_output.F |
193 |
KPP_OUTPUT |
IF ( myIter.EQ.nIter0 ) THEN |
|
./pkg/kpp/kpp_output.F |
246 |
KPP_OUTPUT |
IF ( myIter .NE. nIter0 ) THEN |
|
./pkg/kpp/kpp_output.F |
359 |
KPP_OUTPUT |
IF ( useDiagnostics .AND. myIter.NE.nIter0 ) THEN |
|
./pkg/land/land_ini_vars.F |
100 |
LAND_INI_VARS |
& land_nLev, land_groundT, 1, nIter0, myThid ) |
|
./pkg/land/land_ini_vars.F |
104 |
LAND_INI_VARS |
& land_nLev, land_groundW, 1, nIter0, myThid ) |
|
./pkg/land/land_ini_vars.F |
108 |
LAND_INI_VARS |
& land_hSnow, nIter0, myThid ) |
|
./pkg/land/land_ini_vars.F |
114 |
LAND_INI_VARS |
CALL LAND_READ_PICKUP( nIter0, myThid ) |
|
./pkg/land/land_ini_vars.F |
131 |
LAND_INI_VARS |
IF ( ( startTime.EQ.baseTime .AND. nIter0.EQ.0 ) .OR. |
|
./pkg/land/land_ini_vars.F |
95 |
LAND_INI_VARS |
IF ( startTime.EQ.baseTime .AND. nIter0.EQ.0 ) THEN |
|
./pkg/land/land_monitor.F |
156 |
LAND_MONITOR |
IF ( myIter.EQ.1+nIter0 ) THEN |
|
./pkg/land/land_monitor.F |
82 |
LAND_MONITOR |
& .OR. myIter.EQ.nIter0 ) THEN |
|
./pkg/land/land_output.F |
169 |
LAND_OUTPUT |
IF ( myIter.EQ.nIter0 ) THEN |
|
./pkg/land/land_output.F |
97 |
LAND_OUTPUT |
IF ( myIter.NE.nIter0 ) THEN |
|
./pkg/layers/layers_output.F |
102 |
LAYERS_OUTPUT |
IF ( myIter.EQ.nIter0 ) THEN |
|
./pkg/longstep/longstep_check_iters.F |
36 |
LONGSTEP_CHECK_ITERS |
IF (MOD(nIter0, LS_nIter) .NE. 0) THEN |
|
./pkg/longstep/longstep_check_iters.F |
41 |
LONGSTEP_CHECK_ITERS |
& ' LS_niter', nIter0, LS_niter |
|
./pkg/longstep/longstep_check_iters.F |
60 |
LONGSTEP_CHECK_ITERS |
nTimeSteps = nEndIter - nIter0 |
|
./pkg/matrix/matrix_output.F |
36 |
MATRIX_OUTPUT |
IF (myIter.NE.nIter0) THEN |
|
./pkg/matrix/matrix_output.F |
39 |
MATRIX_OUTPUT |
ELSEIF (myIter.EQ.nIter0) THEN |
|
./model/src/adams_bashforth2.F |
52 |
ADAMS_BASHFORTH2 |
IF ( myIter.EQ.nIter0 .AND. startAB.EQ.0 ) THEN |
|
./model/src/adams_bashforth3.F |
83 |
ADAMS_BASHFORTH3 |
IF ( myIter.EQ.nIter0 .AND. startAB.EQ.0 ) THEN |
|
./model/src/adams_bashforth3.F |
87 |
ADAMS_BASHFORTH3 |
ELSEIF ( (myIter.EQ.nIter0 .AND. startAB.EQ.1) |
|
./model/src/adams_bashforth3.F |
88 |
ADAMS_BASHFORTH3 |
& .OR. (myIter.EQ.1+nIter0 .AND. startAB.EQ.0) ) THEN |
|
./pkg/mnc/mnc_init.F |
112 |
MNC_INIT |
mnc_cw_cit(2,1) = nIter0 |
|
./pkg/mnc/mnc_init.F |
122 |
MNC_INIT |
mnc_cw_cit(2,3) = nIter0 |
|
./pkg/mom_vecinv/mom_vecinv.F |
707 |
MOM_VECINV |
& .AND. k.EQ.4 .AND. myIter.EQ.nIter0 |
|
./pkg/my82/my82_output.F |
132 |
MY82_OUTPUT |
IF ( myIter.EQ.nIter0 ) THEN |
|
./pkg/my82/my82_output.F |
161 |
MY82_OUTPUT |
IF ( myIter.NE.nIter0 .AND. |
|
./pkg/my82/my82_output.F |
86 |
MY82_OUTPUT |
IF ( myIter.NE.nIter0 .AND. |
|
./pkg/mypackage/mypackage_init_varia.F |
128 |
MYPACKAGE_INIT_VARIA |
CALL MYPACKAGE_READ_PICKUP( nIter0, myThid ) |
|
./pkg/mypackage/mypackage_init_varia.F |
73 |
MYPACKAGE_INIT_VARIA |
IF ( startTime.EQ.baseTime .AND. nIter0.EQ.0 |
|
./pkg/obcs/obcs_external_fields_load.F |
118 |
OBCS_EXTERNAL_FIELDS_LOAD |
& .OR. myIter .EQ. nIter0 |
|
./pkg/obcs/obcs_external_fields_load.F |
321 |
OBCS_EXTERNAL_FIELDS_LOAD |
IF ( myIter .EQ. nIter0 ) THEN |
|
./pkg/obcs/obcs_init_variables.F |
332 |
OBCS_INIT_VARIABLES |
IF ( nIter0.NE.0 .OR. pickupSuff.NE.' ' ) THEN |
|
./pkg/obcs/obcs_init_variables.F |
333 |
OBCS_INIT_VARIABLES |
CALL OBCS_READ_PICKUP( nIter0, myThid ) |
|
./pkg/obcs/obcs_init_variables.F |
338 |
OBCS_INIT_VARIABLES |
IF ( nIter0.EQ.0 .AND. pickupSuff.EQ.' ' ) THEN |
|
./pkg/obcs/obcs_init_variables.F |
342 |
OBCS_INIT_VARIABLES |
CALL OBCS_CALC( startTime, nIter0, |
|
./pkg/obcs/obcs_init_variables.F |
377 |
OBCS_INIT_VARIABLES |
CALL OBCS_PRESCRIBE_READ( startTime, nIter0, myThid ) |
|
./pkg/obcs/obcs_init_variables.F |
394 |
OBCS_INIT_VARIABLES |
IF ( nIter0.EQ.PTRACERS_Iter0 ) THEN |
|
./pkg/obcs/obcs_init_variables.F |
413 |
OBCS_INIT_VARIABLES |
IF ( nIter0.EQ.PTRACERS_Iter0 .AND. useOBCSprescribe ) THEN |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
80 |
CPL_INI_VARS |
IF ( startTime.NE.baseTime .OR. nIter0.NE.0 |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
82 |
CPL_INI_VARS |
CALL OCN_CPL_READ_PICKUP( nIter0, myThid ) |
|
./pkg/ocn_compon_interf/cpl_output.F |
60 |
CPL_OUTPUT |
IF ( myIter.NE.nIter0 .AND. |
|
./pkg/ocn_compon_interf/ocn_cpl_read_pickup.F |
76 |
OCN_CPL_READ_PICKUP |
IF (nIter0.GT.PTRACERS_Iter0) THEN |
|
./model/src/check_pickup.F |
213 |
CHECK_PICKUP |
IF ( mom_StartAB.LT.nIter0 .OR. |
|
./model/src/check_pickup.F |
214 |
CHECK_PICKUP |
& nHydStartAB.LT.nIter0 .OR. |
|
./model/src/check_pickup.F |
215 |
CHECK_PICKUP |
& tempStartAB.LT.nIter0 .OR. |
|
./model/src/check_pickup.F |
216 |
CHECK_PICKUP |
& saltStartAB.LT.nIter0 ) THEN |
|
./model/src/check_pickup.F |
64 |
CHECK_PICKUP |
tempStartAB = nIter0 |
|
./model/src/check_pickup.F |
65 |
CHECK_PICKUP |
saltStartAB = nIter0 |
|
./model/src/check_pickup.F |
66 |
CHECK_PICKUP |
mom_StartAB = nIter0 |
|
./model/src/check_pickup.F |
67 |
CHECK_PICKUP |
nHydStartAB = nIter0 |
|
./pkg/offline/offline_fields_load.F |
126 |
OFFLINE_FIELDS_LOAD |
& .OR. myIter .EQ. nIter0 |
|
./pkg/offline/offline_fields_load.F |
77 |
OFFLINE_FIELDS_LOAD |
IF ( myIter .EQ. nIter0 ) THEN |
|
./pkg/offline/offline_readparms.F |
96 |
OFFLINE_READPARMS |
offlineIter0=nIter0 !initial offline field timestep |
|
./pkg/opps/opps_output.F |
100 |
OPPS_OUTPUT |
IF ( myIter.EQ.nIter0 ) THEN |
|
./pkg/opps/opps_output.F |
123 |
OPPS_OUTPUT |
IF ( myIter.NE.nIter0 .AND. |
|
./model/src/config_summary.F |
530 |
CONFIG_SUMMARY |
CALL WRITE_0D_I( nIter0, INDEX_NONE, 'nIter0 =', |
|
./pkg/pp81/pp81_output.F |
100 |
PP81_OUTPUT |
IF ( myIter.EQ.nIter0 ) THEN |
|
./pkg/pp81/pp81_output.F |
126 |
PP81_OUTPUT |
IF ( myIter.NE.nIter0 .AND. |
|
./pkg/pp81/pp81_output.F |
78 |
PP81_OUTPUT |
IF ( myIter.NE.nIter0 .AND. |
|
./model/src/convective_adjustment.F |
206 |
CONVECTIVE_ADJUSTMENT |
IF (myIter.NE.nIter0 .AND. taveFreq.GT.0.) THEN |
|
./model/src/convective_adjustment.F |
213 |
CONVECTIVE_ADJUSTMENT |
IF ( myIter.NE.nIter0 .AND. useDiagnostics ) THEN |
|
./pkg/profiles/profiles_init_fixed.F |
275 |
PROFILES_INIT_FIXED |
diffsecs=diffsecs+nIter0*deltaTclock |
|
./pkg/ptracers/ptracers_diagnostics_state.F |
117 |
PTRACERS_DIAGNOSTICS_STATE |
IF ( trIter.GT.nIter0 ) THEN |
|
./pkg/ptracers/ptracers_diagnostics_state.F |
151 |
PTRACERS_DIAGNOSTICS_STATE |
IF ( trIter.GT.nIter0 ) THEN |
|
./pkg/ptracers/ptracers_diagnostics_state.F |
59 |
PTRACERS_DIAGNOSTICS_STATE |
IF ( LS_doTimeStep .OR. trIter.EQ.nIter0 ) THEN |
|
./pkg/ptracers/ptracers_diagnostics_state.F |
84 |
PTRACERS_DIAGNOSTICS_STATE |
IF ( trIter.GT.nIter0 ) THEN |
|
./pkg/ptracers/ptracers_init_fixed.F |
47 |
PTRACERS_INIT_FIXED |
PTRACERS_startAB(iTracer) = nIter0 - PTRACERS_Iter0 |
|
./pkg/ptracers/ptracers_init_varia.F |
116 |
PTRACERS_INIT_VARIA |
IF ( nIter0.GT.PTRACERS_Iter0 .OR. |
|
./pkg/ptracers/ptracers_init_varia.F |
117 |
PTRACERS_INIT_VARIA |
& (nIter0.EQ.PTRACERS_Iter0 .AND. pickupSuff.NE.' ') |
|
./pkg/ptracers/ptracers_init_varia.F |
120 |
PTRACERS_INIT_VARIA |
CALL PTRACERS_READ_PICKUP( nIter0, myThid ) |
|
./pkg/ptracers/ptracers_init_varia.F |
89 |
PTRACERS_INIT_VARIA |
IF (nIter0.EQ.PTRACERS_Iter0) THEN |
|
./pkg/ptracers/ptracers_output.F |
41 |
PTRACERS_OUTPUT |
IF ( PTRACERS_taveFreq.GT.0. .AND. myIter.NE.nIter0 ) THEN |
|
./pkg/ptracers/ptracers_timeave.F |
59 |
PTRACERS_TIMEAVE |
IF ( myIter .EQ. nIter0 ) THEN |
|
./pkg/ptracers/ptracers_timeave.F |
72 |
PTRACERS_TIMEAVE |
IF ( myIter .EQ. nIter0 .OR. |
|
./pkg/ptracers/ptracers_timeave.F |
90 |
PTRACERS_TIMEAVE |
IF ( myIter .NE. nIter0 ) THEN |
|
./pkg/ptracers/ptracers_write_timeave.F |
165 |
PTRACERS_WRITE_TIMEAVE |
CALL PTRACERS_TIMEAVE( myTime, nIter0, bi, bj, myThid ) |
|
./pkg/rbcs/rbcs_fields_load.F |
148 |
RBCS_FIELDS_LOAD |
& .OR. myIter .EQ. nIter0 |
|
./pkg/rbcs/rbcs_fields_load.F |
74 |
RBCS_FIELDS_LOAD |
IF ( myIter .EQ. nIter0 ) THEN |
|
./pkg/sbo/sbo_output.F |
103 |
SBO_OUTPUT |
IF ( myIter.EQ.nIter0 ) THEN |
|
./pkg/sbo/sbo_output.F |
113 |
SBO_OUTPUT |
IF ( myIter .EQ. nIter0 .OR. |
|
./pkg/sbo/sbo_output.F |
129 |
SBO_OUTPUT |
IF ( myIter.NE.nIter0 .AND. |
|
./pkg/sbo/sbo_output.F |
71 |
SBO_OUTPUT |
irecord = myIter - nIter0 + 1 |
|
./pkg/sbo/sbo_output.F |
86 |
SBO_OUTPUT |
WRITE(fName,'(A,I10.10)') 'SBO_global.', nIter0 |
|
./pkg/seaice/seaice_advection.F |
172 |
SEAICE_ADVECTION |
& .AND. myIter.EQ.nIter0 |
|
./pkg/seaice/seaice_advection.F |
726 |
SEAICE_ADVECTION |
& .AND. k.LE.3 .AND. myIter.EQ.1+nIter0 |
|
./model/src/do_the_model_io.F |
100 |
DO_THE_MODEL_IO |
IF (useOBCS .AND. myIter.NE.nIter0 ) |
|
./model/src/do_the_model_io.F |
106 |
DO_THE_MODEL_IO |
IF (useGMRedi .AND. myIter.NE.nIter0 .AND. .NOT.useOffLine ) |
|
./model/src/do_the_model_io.F |
162 |
DO_THE_MODEL_IO |
IF ( useBulkForce .AND. myIter.NE.nIter0 ) |
|
./model/src/do_the_model_io.F |
78 |
DO_THE_MODEL_IO |
IF (taveFreq.GT.0. .AND. myIter.NE.nIter0 ) THEN |
|
./pkg/seaice/seaice_init_varia.F |
302 |
SEAICE_INIT_VARIA |
IF ( .NOT. ( startTime .EQ. baseTime .AND. nIter0 .EQ. 0 |
|
./pkg/seaice/seaice_output.F |
109 |
SEAICE_OUTPUT |
IF ( myIter.NE.nIter0 ) THEN |
|
./pkg/seaice/seaice_output.F |
184 |
SEAICE_OUTPUT |
IF ( myIter .NE. nIter0 ) THEN |
|
./pkg/seaice/seaice_read_pickup.F |
132 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn,fp,MULTDIM, TICES, nj, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
135 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, TICE , nj, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
140 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, HSNOW , nj, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
142 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, UICE , nj, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
144 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, VICE , nj, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
146 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, HEFF , nj, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
148 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, AREA , nj, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
152 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL(fn,fp,1,seaice_sigma1,nj, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
154 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL(fn,fp,1,seaice_sigma2,nj, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
156 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL(fn,fp,1,seaice_sigma12,nj,nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
161 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, HSALT , nj, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
165 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, ICEAGE , nj, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
175 |
SEAICE_READ_PICKUP |
& nj, fp, MULTDIM, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
179 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
183 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
186 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
191 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
193 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
195 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
198 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
202 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
208 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
210 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
214 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
216 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
218 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
230 |
SEAICE_READ_PICKUP |
I nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
240 |
SEAICE_READ_PICKUP |
I nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
59 |
SEAICE_READ_PICKUP |
WRITE(fn,'(A,I10.10)') 'pickup_seaice.',nIter0 |
|
./pkg/seaice/seaice_read_pickup.F |
74 |
SEAICE_READ_PICKUP |
I MULTDIM, nIter0, myThid ) |
|
./model/src/external_fields_load.F |
94 |
EXTERNAL_FIELDS_LOAD |
& .OR. myIter .EQ. nIter0 |
|
./pkg/shelfice/shelfice_output.F |
129 |
SHELFICE_OUTPUT |
IF ( myIter .NE. nIter0 ) THEN |
|
./pkg/shelfice/shelfice_output.F |
57 |
SHELFICE_OUTPUT |
IF ( myIter .NE. nIter0 .AND. |
|
./pkg/shelfice/shelfice_output.F |
98 |
SHELFICE_OUTPUT |
IF ( myIter.EQ.nIter0 ) THEN |
|
./model/src/forward_step.F |
195 |
FORWARD_STEP |
myIter = nIter0 + (iloop-1) |
|
./model/src/forward_step.F |
291 |
FORWARD_STEP |
IF ( myIter .EQ. nIter0 ) |
|
./model/src/forward_step.F |
652 |
FORWARD_STEP |
myIter = nIter0 + iLoop |
|
./pkg/thsice/thsice_advection.F |
162 |
THSICE_ADVECTION |
& .AND. myIter.EQ.nIter0 |
|
./pkg/thsice/thsice_advection.F |
727 |
THSICE_ADVECTION |
& .AND. k.LE.3 .AND. myIter.EQ.1+nIter0 |
|
./pkg/thsice/thsice_ini_vars.F |
113 |
THSICE_INI_VARS |
& ( nIter0.NE.0 .OR. pickupSuff.NE.' ' ) |
|
./pkg/thsice/thsice_ini_vars.F |
117 |
THSICE_INI_VARS |
CALL THSICE_READ_PICKUP( prec, nIter0, myThid ) |
|
./pkg/thsice/thsice_monitor.F |
71 |
THSICE_MONITOR |
& .OR. myIter.EQ.nIter0 ) THEN |
|
./pkg/thsice/thsice_output.F |
63 |
THSICE_OUTPUT |
IF ( myIter .EQ. nIter0 ) THEN |
|
./pkg/thsice/thsice_test_addfluid.h |
11 |
NO PROCEDURE |
IF ( myIter.EQ.nIter0 ) THEN |
|
./pkg/timeave/timeave_statv_write.F |
301 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_STATVARS(myTime, nIter0, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
180 |
TIMEAVE_STATVARS |
IF ( myIter .NE. nIter0 ) THEN |
|
./pkg/timeave/timeave_statvars.F |
52 |
TIMEAVE_STATVARS |
IF ( myIter .EQ. nIter0 ) THEN |
|
./pkg/timeave/timeave_statvars.F |
96 |
TIMEAVE_STATVARS |
IF ( myIter .EQ. nIter0 ) THEN |
|
./verification/OpenAD/code_oad_all/the_model_main.F |
542 |
THE_MODEL_MAIN |
myCurrentIter = nIter0 |
|
./verification/OpenAD/code_oad_all/write_state.F |
133 |
WRITE_STATE |
IF ( useDynP_inEos_Zc .OR. myIter.NE.nIter0 ) THEN |
|
./verification/OpenAD/code_oad_all/write_state.F |
136 |
WRITE_STATE |
IF ( fluidIsWater .AND. (myIter.NE.nIter0) ) THEN |
|
./verification/OpenAD/code_oad_all/write_state.F |
178 |
WRITE_STATE |
IF ( useDynP_inEos_Zc .OR. myIter.NE.nIter0 ) THEN |
|
./verification/OpenAD/code_oad_all/write_state.F |
186 |
WRITE_STATE |
IF ( fluidIsWater .AND. (myIter .NE. nIter0) ) THEN |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
333 |
AIM_SURF_BC |
IF (myIter.EQ.nIter0) THEN |
|
./model/src/ini_fields.F |
30 |
INI_FIELDS |
IF ( startTime .EQ. baseTime .AND. nIter0 .EQ. 0 |
|
./model/src/ini_fields.F |
41 |
INI_FIELDS |
CALL READ_PICKUP( nIter0, myThid ) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
285 |
FIZHI_INIT_VARS |
call FIZHI_READ_PICKUP( nIter0, myThid ) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
286 |
FIZHI_INIT_VARS |
CALL FIZHI_READ_VEGTILES( nIter0, 'D', myThid ) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
73 |
FIZHI_INIT_VARS |
IF ( startTime.EQ.baseTime .AND. nIter0.EQ.0 ) THEN |
|
./model/src/ini_model_io.F |
123 |
INI_MODEL_IO |
tempStartAB = nIter0 |
|
./model/src/ini_model_io.F |
124 |
INI_MODEL_IO |
saltStartAB = nIter0 |
|
./model/src/ini_model_io.F |
125 |
INI_MODEL_IO |
mom_StartAB = nIter0 |
|
./model/src/ini_model_io.F |
126 |
INI_MODEL_IO |
nHydStartAB = nIter0 |
|
./model/src/ini_model_io.F |
127 |
INI_MODEL_IO |
IF ( startFromPickupAB2 ) tempStartAB = MIN( nIter0 , 1 ) |
|
./model/src/ini_nh_fields.F |
49 |
INI_NH_FIELDS |
IF ( startTime .EQ. baseTime .AND. nIter0 .EQ. 0 |
|
./model/src/ini_parms.F |
222 |
INI_PARMS |
& nIter0, nTimeSteps, nEndIter, |
|
./model/src/ini_parms.F |
890 |
INI_PARMS |
IF ( nIter0.NE.0 .AND. startTime.NE.0. .AND. baseTime.EQ.0. ) |
|
./model/src/ini_parms.F |
891 |
INI_PARMS |
& baseTime = startTime - deltaTClock*float(nIter0) |
|
./model/src/ini_parms.F |
893 |
INI_PARMS |
IF ( nIter0 .NE. 0 .AND. startTime .EQ. 0. ) |
|
./model/src/ini_parms.F |
894 |
INI_PARMS |
& startTime = baseTime + deltaTClock*float(nIter0) |
|
./model/src/ini_parms.F |
896 |
INI_PARMS |
IF ( nIter0 .EQ. 0 .AND. startTime .NE. baseTime ) |
|
./model/src/ini_parms.F |
897 |
INI_PARMS |
& nIter0 = NINT( (startTime-baseTime)/deltaTClock ) |
|
./model/src/ini_parms.F |
901 |
INI_PARMS |
& nTimeSteps = nEndIter-nIter0 |
|
./model/src/ini_parms.F |
907 |
INI_PARMS |
& nEndIter = nIter0+nTimeSteps |
|
./model/src/ini_parms.F |
919 |
INI_PARMS |
IF ( startTime .NE. baseTime+deltaTClock*float(nIter0) ) THEN |
|
./model/src/ini_parms.F |
928 |
INI_PARMS |
IF ( nEndIter .NE. nIter0+nTimeSteps ) THEN |
|
./model/src/initialise_varia.F |
117 |
INITIALISE_VARIA |
nIter0 = NINT( (startTime-baseTime)/deltaTClock ) |
|
./model/src/initialise_varia.F |
142 |
INITIALISE_VARIA |
CALL UPDATE_CG2D( startTime, nIter0, myThid ) |
|
./model/src/initialise_varia.F |
223 |
INITIALISE_VARIA |
I bi, bj, startTime, nIter0, myThid ) |
|
./model/src/initialise_varia.F |
242 |
INITIALISE_VARIA |
CALL UPDATE_R_STAR( startTime, nIter0, myThid ) |
|
./model/src/initialise_varia.F |
246 |
INITIALISE_VARIA |
CALL UPDATE_SIGMA( etaH, startTime, nIter0, myThid ) |
|
./model/src/initialise_varia.F |
250 |
INITIALISE_VARIA |
CALL UPDATE_SURF_DR( startTime, nIter0, myThid ) |
|
./model/src/initialise_varia.F |
255 |
INITIALISE_VARIA |
CALL UPDATE_CG2D( startTime, nIter0, myThid ) |
|
./model/src/initialise_varia.F |
267 |
INITIALISE_VARIA |
I startTime, nIter0, myThid ) |
|
./model/src/initialise_varia.F |
278 |
INITIALISE_VARIA |
CALL UPDATE_ETAH( startTime, nIter0, myThid ) |
|
./model/src/initialise_varia.F |
286 |
INITIALISE_VARIA |
CALL CALC_R_STAR(etaH, startTime, nIter0, myThid ) |
|
./model/src/initialise_varia.F |
290 |
INITIALISE_VARIA |
CALL CALC_SURF_DR(etaH, startTime, nIter0, myThid ) |
|
./model/src/initialise_varia.F |
331 |
INITIALISE_VARIA |
CALL MONITOR( startTime, nIter0, myThid ) |
|
./model/src/initialise_varia.F |
339 |
INITIALISE_VARIA |
CALL DO_STATEVARS_TAVE( startTime, nIter0, myThid ) |
|
./model/src/initialise_varia.F |
346 |
INITIALISE_VARIA |
CALL DO_THE_MODEL_IO( .FALSE., startTime, nIter0, myThid ) |
|
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
345 |
THE_MAIN_LOOP |
nIter0 = NINT( (startTime-baseTime)/deltaTClock ) |
|
./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 |
436 |
THE_MAIN_LOOP |
myIter = nIter0 + iLoop |
|
./verification/offline_exf_seaice/code_ad/the_main_loop.F |
166 |
THE_MAIN_LOOP |
nIter0 = NINT( (startTime-baseTime)/deltaTClock ) |
|
./verification/offline_exf_seaice/code_ad/the_main_loop.F |
384 |
THE_MAIN_LOOP |
nIter0 = NINT( (startTime-baseTime)/deltaTClock ) |
|
./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 |
441 |
THE_MAIN_LOOP |
IF ( myIter .EQ. nIter0 ) |
|
./verification/offline_exf_seaice/code_ad/the_main_loop.F |
466 |
THE_MAIN_LOOP |
myIter = nIter0 + iloop |
|
./verification/offline_exf_seaice/code_ad/the_model_main.F |
516 |
THE_MODEL_MAIN |
myCurrentIter = nIter0 |
|
./model/src/set_defaults.F |
258 |
SET_DEFAULTS |
nIter0 = 0 |
|
./model/src/set_defaults.F |
259 |
SET_DEFAULTS |
startTime = deltaT*float(nIter0) |
|
./model/src/set_defaults.F |
263 |
SET_DEFAULTS |
nEndIter = nIter0+nTimeSteps |
|
./model/src/solve_for_pressure.F |
102 |
SOLVE_FOR_PRESSURE |
IF ( myIter.EQ.1+nIter0 .AND. debugLevel .GE. debLevA ) THEN |
|
./model/src/taueddy_init_varia.F |
56 |
TAUEDDY_INIT_VARIA |
& eddyPsiX, nIter0, myThid ) |
|
./model/src/taueddy_init_varia.F |
60 |
TAUEDDY_INIT_VARIA |
& eddyPsiY, nIter0, myThid ) |
|
./model/src/the_main_loop.F |
195 |
THE_MAIN_LOOP |
nIter0 = NINT( (startTime-baseTime)/deltaTClock ) |
|
./model/src/the_main_loop.F |
447 |
THE_MAIN_LOOP |
nIter0 = NINT( (startTime-baseTime)/deltaTClock ) |
|
./model/src/the_main_loop.F |
459 |
THE_MAIN_LOOP |
myIter = nIter0 + (iloop-1) |
|
./model/src/the_model_main.F |
522 |
THE_MODEL_MAIN |
myCurrentIter = nIter0 |
|
./model/src/update_cg2d.F |
64 |
UPDATE_CG2D |
updatePreCond = ( myIter.EQ.nIter0 ) |
|
./model/src/write_state.F |
133 |
WRITE_STATE |
IF ( useDynP_inEos_Zc .OR. myIter.NE.nIter0 ) THEN |
|
./model/src/write_state.F |
136 |
WRITE_STATE |
IF ( fluidIsWater .AND. (myIter.NE.nIter0) ) THEN |
|
./model/src/write_state.F |
178 |
WRITE_STATE |
IF ( useDynP_inEos_Zc .OR. myIter.NE.nIter0 ) THEN |
|
./model/src/write_state.F |
186 |
WRITE_STATE |
IF ( fluidIsWater .AND. (myIter .NE. nIter0) ) THEN |
|
./pkg/admtlm/admtlm_driver.F |
52 |
ADMTLM_DRIVER |
myCurrentIter = nIter0 |
|
./pkg/admtlm/admtlm_driver.F |
62 |
ADMTLM_DRIVER |
myCurrentIter = nIter0 |
|
./pkg/aim_compon_interf/cpl_ini_vars.F |
100 |
CPL_INI_VARS |
CALL ATM_CPL_READ_PICKUP( nIter0, myThid ) |
|
./pkg/aim_compon_interf/cpl_ini_vars.F |
99 |
CPL_INI_VARS |
IF ( startTime .NE. baseTime .OR. nIter0 .NE. 0 ) THEN |
|
./pkg/aim_v23/aim_do_co2.F |
106 |
AIM_DO_CO2 |
WRITE(fn,'(A,I10.10)') 'pickup_aimCo2.',nIter0 |
|
./pkg/aim_v23/aim_dyn2aim.F |
250 |
AIM_DYN2AIM |
IF (myIter.EQ.nIter0) |
|
./pkg/aim_v23/aim_fields_load.F |
100 |
AIM_FIELDS_LOAD |
IF ( myIter.EQ.nIter0 ) THEN |
|
./pkg/aim_v23/aim_fields_load.F |
196 |
AIM_FIELDS_LOAD |
IF (myIter.EQ.nIter0) THEN |
|
./pkg/aim_v23/aim_fields_load.F |
209 |
AIM_FIELDS_LOAD |
IF ( myIter.EQ.nIter0 ) THEN |
|
./pkg/aim_v23/aim_fields_load.F |
255 |
AIM_FIELDS_LOAD |
IF ( myIter.EQ.nIter0 ) THEN |
|
./pkg/aim_v23/aim_fields_load.F |
309 |
AIM_FIELDS_LOAD |
IF ( myIter.EQ.nIter0 ) THEN |
|
./pkg/aim_v23/aim_initialise.F |
118 |
AIM_INITIALISE |
CALL READ_REC_XY_RS(aim_LandFile,aim_landFr,1,nIter0,myThid) |
|
./pkg/aim_v23/aim_sice2aim.F |
139 |
AIM_SICE2AIM |
& .AND. myIter.EQ.nIter0 ) |
|
./pkg/aim_v23/aim_sice2aim.F |
151 |
AIM_SICE2AIM |
IF ( myIter.EQ.nIter0 ) THEN |
|
./pkg/aim_v23/aim_write_tave.F |
57 |
AIM_WRITE_TAVE |
IF ( myIter.EQ.nIter0 ) THEN |
|
./pkg/aim_v23/aim_write_tave.F |
88 |
AIM_WRITE_TAVE |
IF ( myIter.NE.nIter0 .AND. |
|
./pkg/atm2d/atm2d_read_pickup.F |
37 |
ATM2D_READ_PICKUP |
IF (startTime.NE.baseTime .OR. nIter0.NE.0) THEN |
|
./pkg/atm2d/atm2d_read_pickup.F |
41 |
ATM2D_READ_PICKUP |
WRITE(fn,'(A,I10.10)') 'pickup_atm2d.',nIter0 |
|
./pkg/atm2d/atm2d_read_pickup.F |
43 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,pass_slp, 1, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
44 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,pass_qnet, 2, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
45 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,pass_solarnet, 3, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
46 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,pass_fu, 4, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
47 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,pass_fv, 5, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
48 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,pass_precip, 6, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
49 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,pass_evap, 7, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
50 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,pass_runoff, 8, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
51 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,pass_wspeed, 9, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
52 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,pass_pCO2, 10, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
53 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,pass_sIceLoad,11, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
55 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,sHeating, 12, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
56 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,flxCndBt, 13, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
57 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,pass_prcAtm, 14, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
58 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,snowPrc, 15, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
59 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,icFrwAtm, 16, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
60 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,icFlxSw, 17, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
61 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,siceAlb, 18, nIter0, myThid) |
|
./pkg/atm2d/forward_step_atm2d.F |
158 |
FORWARD_STEP_ATM2D |
& (startTime.NE.baseTime .OR. nIter0.NE.0)) ) THEN |
|
./pkg/atm2d/forward_step_atm2d.F |
194 |
FORWARD_STEP_ATM2D |
myIter = nIter0 + iloop_ocn |
|
./pkg/bulk_force/bulkf_fields_load.F |
128 |
BULKF_FIELDS_LOAD |
IF ( myIter .EQ. nIter0 ) THEN |
|
./pkg/bulk_force/bulkf_fields_load.F |
187 |
BULKF_FIELDS_LOAD |
& .OR. myIter .EQ. nIter0 |
|
./pkg/cal/cal_readparms.F |
146 |
CAL_READPARMS |
moditerini = nIter0 |
|
./pkg/cd_code/cd_code_ini_vars.F |
55 |
CD_CODE_INI_VARS |
IF ( nIter0.NE.0 .OR. pickupSuff.NE.' ' ) THEN |
|
./pkg/cd_code/cd_code_ini_vars.F |
56 |
CD_CODE_INI_VARS |
CALL CD_CODE_READ_PICKUP( nIter0, myThid ) |
|
./pkg/cfc/cfc_fields_load.F |
45 |
CFC_FIELDS_LOAD |
IF ( myIter .EQ. nIter0 ) THEN |
|
./pkg/cfc/cfc_fields_load.F |
75 |
CFC_FIELDS_LOAD |
& .OR. myIter .EQ. nIter0 |
|
./pkg/cheapaml/adams2d.F |
52 |
ADAMS2D |
IF ( myIter.EQ.nIter0 .AND. startAB.EQ.0 ) THEN |
|
./pkg/cheapaml/cheapaml_fields_load.F |
106 |
CHEAPAML_FIELDS_LOAD |
if ( myIter .EQ. nIter0 )then |
|
./pkg/cheapaml/cheapaml_fields_load.F |
185 |
CHEAPAML_FIELDS_LOAD |
IF ( myIter .EQ. nIter0 ) THEN |
|
./pkg/cheapaml/cheapaml_fields_load.F |
219 |
CHEAPAML_FIELDS_LOAD |
& .OR. myIter .EQ. nIter0 |
|
./pkg/cheapaml/cheapaml_fields_load.F |
293 |
CHEAPAML_FIELDS_LOAD |
IF ( myIter .EQ. nIter0 ) THEN |
|
./pkg/diagnostics/diagnostics_init_varia.F |
66 |
DIAGNOSTICS_INIT_VARIA |
CALL DIAGNOSTICS_SUMMARY( startTime, nIter0, myThid ) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
140 |
DIAGNOSTICS_READ_PICKUP |
WRITE(fn,'(A,I10.10)') 'pickup_qdiag.', nIter0 |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
142 |
DIAGNOSTICS_READ_PICKUP |
& numDiags, qdiag, nIter0, myThid ) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
149 |
DIAGNOSTICS_READ_PICKUP |
WRITE(fn,'(A,I10.10)') 'pickup_ndiag.', nIter0 |
|
./pkg/diagnostics/diagnostics_summary.F |
51 |
DIAGNOSTICS_SUMMARY |
IF ( myIter.EQ.nIter0 ) THEN |
|
./pkg/diagnostics/diagnostics_write.F |
47 |
DIAGNOSTICS_WRITE |
IF ( myIter.NE.nIter0 ) THEN |
|
./pkg/diagnostics/diagstats_close_io.F |
56 |
DIAGSTATS_CLOSE_IO |
& diagSt_Fname(n)(1:iL), '.', nIter0, '.txt' |
|
./pkg/diagnostics/diagstats_ini_io.F |
59 |
DIAGSTATS_INI_IO |
& diagSt_Fname(n)(1:iL), '.', nIter0, '.txt' |
|
./pkg/diagnostics/diagstats_set_regions.F |
99 |
DIAGSTATS_SET_REGIONS |
& nIter0, myThid ) |
|
./pkg/dic/dic_atmos.F |
173 |
DIC_ATMOS |
IF ( nIter0.GT.PTRACERS_Iter0 .OR. |
|
./pkg/dic/dic_atmos.F |
174 |
DIC_ATMOS |
& (nIter0.EQ.PTRACERS_Iter0 .AND. pickupSuff.NE.' ') |
|
./pkg/dic/dic_atmos.F |
177 |
DIC_ATMOS |
CALL DIC_READ_CO2_PICKUP( nIter0, myThid ) |
|
./pkg/dic/dic_biotic_forcing.F |
193 |
DIC_BIOTIC_FORCING |
IF(myIter .lt. (nIter0+5) .or. |
|
./pkg/dic/dic_fields_load.F |
72 |
DIC_FIELDS_LOAD |
& .OR. myIter .EQ. nIter0 |
|
./pkg/dic/dic_surfforcing_init.F |
163 |
DIC_SURFFORCING_INIT |
IF ( nIter0.GT.PTRACERS_Iter0 .OR. |
|
./pkg/dic/dic_surfforcing_init.F |
164 |
DIC_SURFFORCING_INIT |
& (nIter0.EQ.PTRACERS_Iter0 .AND. pickupSuff.NE.' ') |
|
./pkg/dic/dic_surfforcing_init.F |
169 |
DIC_SURFFORCING_INIT |
I nIter0, myThid ) |
|
./pkg/dic/dic_surfforcing_init.F |
58 |
DIC_SURFFORCING_INIT |
CALL DIC_ATMOS(0, startTime, nIter0, myThid ) |
|
./pkg/dic/dic_surfforcing_init.F |
92 |
DIC_SURFFORCING_INIT |
& nIter0,myThid ) |
|
./pkg/dic/dic_surfforcing_init.F |
94 |
DIC_SURFFORCING_INIT |
& nIter0,myThid ) |
|
./pkg/dic/dic_surfforcing_init.F |
99 |
DIC_SURFFORCING_INIT |
CALL OFFLINE_FIELDS_LOAD( startTime, nIter0, myThid ) |
|
./pkg/ecco/the_main_loop.F |
453 |
THE_MAIN_LOOP |
nIter0 = NINT( (startTime-baseTime)/deltaTClock ) |
|
./pkg/ecco/the_main_loop.F |
458 |
THE_MAIN_LOOP |
myiter = nIter0 + (iloop-1) |
|
./pkg/ecco/the_main_loop.F |
720 |
THE_MAIN_LOOP |
myIter = nIter0 + iLoop |