| File |
Line number |
Procedure |
Code |
|
./pkg/offline/offline_fields_load.F |
115 |
OFFLINE_FIELDS_LOAD |
IF ( myIter .EQ. nIter0 ) THEN |
|
./pkg/offline/offline_fields_load.F |
158 |
OFFLINE_FIELDS_LOAD |
& .OR. myIter .EQ. nIter0 |
|
./pkg/offline/offline_fields_load.F |
167 |
OFFLINE_FIELDS_LOAD |
& , nIter0, intime0,intime1 |
|
./pkg/offline/offline_readparms.F |
72 |
OFFLINE_READPARMS |
offlineIter0=nIter0 |
|
./pkg/offline/offline_model_io.F |
43 |
OFFLINE_MODEL_IO |
IF (taveFreq.GT.0. .AND. myIter.NE.nIter0 ) THEN |
|
./pkg/seaice/seaice_pickup.F |
40 |
SEAICE_READ_PICKUP |
WRITE(fn,'(A,I10.10)') 'pickup_seaice.',nIter0 |
|
./pkg/seaice/seaice_do_diags.F |
214 |
SEAICE_DO_DIAGS |
IF ( myIter .NE. nIter0 ) THEN |
|
./pkg/seaice/seaice_init.F |
275 |
SEAICE_INIT |
IF ( nIter0 .NE. 0 ) THEN |
|
./pkg/seaice/seaice_get_forcing.F |
96 |
SEAICE_GET_FORCING |
IF ( myIter .EQ. nIter0 ) THEN |
|
./model/src/set_defaults.F |
225 |
SET_DEFAULTS |
nIter0 = 0 |
|
./model/src/set_defaults.F |
226 |
SET_DEFAULTS |
startTime = deltaT*float(nIter0) |
|
./model/src/set_defaults.F |
229 |
SET_DEFAULTS |
nEndIter = nIter0+nTimeSteps |
|
./pkg/gchem/gchem_diags.F |
35 |
GCHEM_DIAGS |
IF (myIter.NE.nIter0) |
|
./model/src/convective_adjustment.F |
177 |
CONVECTIVE_ADJUSTMENT |
IF (myIter.ne.nIter0 .AND. taveFreq.GT.0.) THEN |
|
./pkg/pp81/pp81_do_diags.F |
117 |
PP81_DO_DIAGS |
IF ( myIter.EQ.nIter0 ) THEN |
|
./pkg/pp81/pp81_do_diags.F |
130 |
PP81_DO_DIAGS |
IF ( myIter .EQ. nIter0 .OR. |
|
./pkg/pp81/pp81_do_diags.F |
151 |
PP81_DO_DIAGS |
IF ( myIter.NE.nIter0 .AND. |
|
./pkg/aim_compon_interf/cpl_ini_vars.F |
84 |
CPL_INI_VARS |
IF ( startTime .NE. baseTime .OR. nIter0 .NE. 0 ) THEN |
|
./pkg/aim_compon_interf/cpl_ini_vars.F |
85 |
CPL_INI_VARS |
CALL ATM_CPL_READ_PICKUP( nIter0, myThid ) |