| File |
Line number |
Procedure |
Code |
|
./model/src/config_check.F |
221 |
CONFIG_CHECK |
IF (pLoadFile.NE.' ') THEN |
|
./model/src/external_fields_load.F |
187 |
EXTERNAL_FIELDS_LOAD |
IF ( pLoadFile .NE. ' ' ) THEN |
|
./model/src/external_fields_load.F |
188 |
EXTERNAL_FIELDS_LOAD |
CALL READ_REC_XY_RS( pLoadFile, pLoad0, |
|
./model/src/external_fields_load.F |
190 |
EXTERNAL_FIELDS_LOAD |
CALL READ_REC_XY_RS( pLoadFile, pLoad1, |
|
./model/src/external_fields_load.F |
290 |
EXTERNAL_FIELDS_LOAD |
IF ( pLoadFile .NE. ' ' ) THEN |
|
./model/src/ini_forcing.F |
177 |
INI_FORCING |
IF ( pLoadFile .NE. ' ' ) THEN |
|
./model/src/ini_forcing.F |
178 |
INI_FORCING |
CALL READ_FLD_XY_RS( pLoadFile, ' ', pLoad, 0, myThid ) |
|
./model/src/ini_forcing.F |
201 |
INI_FORCING |
IF ( pLoadFile .NE. ' ' .AND. usingPCoords ) THEN |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
180 |
INI_FORCING |
IF ( pLoadFile .NE. ' ' ) THEN |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
181 |
INI_FORCING |
CALL READ_FLD_XY_RS( pLoadFile, ' ', pLoad, 0, myThid ) |