| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
126 |
NO PROCEDURE |
CHARACTER*(MAX_LEN_FNAM) thetaClimFile |
|
./model/inc/PARAMS.h |
94 |
NO PROCEDURE |
& zonalWindFile, meridWindFile, thetaClimFile, |
|
./model/src/external_fields_load.F |
153 |
EXTERNAL_FIELDS_LOAD |
IF ( thetaClimFile .NE. ' ' ) THEN |
|
./model/src/external_fields_load.F |
154 |
EXTERNAL_FIELDS_LOAD |
CALL READ_REC_XY_RS( thetaClimFile, SST0, |
|
./model/src/external_fields_load.F |
156 |
EXTERNAL_FIELDS_LOAD |
CALL READ_REC_XY_RS( thetaClimFile, SST1, |
|
./model/src/external_fields_load.F |
222 |
EXTERNAL_FIELDS_LOAD |
IF ( thetaClimFile .NE. ' ' ) THEN |
|
./model/src/ini_forcing.F |
145 |
INI_FORCING |
IF ( thetaClimFile .NE. ' ' ) THEN |
|
./model/src/ini_forcing.F |
146 |
INI_FORCING |
CALL READ_FLD_XY_RS( thetaClimFile, ' ', SST, 0, myThid ) |
|
./model/src/ini_parms.F |
1263 |
INI_PARMS |
& (thetaClimFile.EQ.' ') ) THEN |
|
./model/src/ini_parms.F |
259 |
INI_PARMS |
& thetaClimFile, saltClimFile, |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
147 |
INI_FORCING |
IF ( thetaClimFile .NE. ' ' ) THEN |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
148 |
INI_FORCING |
CALL READ_FLD_XY_RS( thetaClimFile, ' ', SST, 0, myThid ) |
|
./model/src/set_defaults.F |
327 |
SET_DEFAULTS |
thetaClimFile = ' ' |
|
./pkg/ebm/ebm_load_climatology.F |
38 |
EBM_LOAD_CLIMATOLOGY |
IF ( thetaClimFile .NE. ' ' ) THEN |
|
./pkg/ebm/ebm_load_climatology.F |
39 |
EBM_LOAD_CLIMATOLOGY |
CALL READ_FLD_XY_RS( thetaClimFile, ' ', SST, 0, myThid ) |
|
./pkg/exf/exf_readparms.F |
878 |
EXF_READPARMS |
thetaClimFile=' ' |