| File |
Line number |
Procedure |
Code |
|
./pkg/bulk_force/bulkf_fields_load.F |
312 |
BULKF_FIELDS_LOAD |
IF ( saltClimFile .NE. ' ' ) THEN |
|
./pkg/bulk_force/bulkf_fields_load.F |
313 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( saltClimFile,SSS0Local,intime0, |
|
./pkg/bulk_force/bulkf_fields_load.F |
315 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( saltClimFile,SSS1Local,intime1, |
|
./model/src/external_fields_load.F |
172 |
EXTERNAL_FIELDS_LOAD |
IF ( saltClimFile .NE. ' ' ) THEN |
|
./model/src/external_fields_load.F |
173 |
EXTERNAL_FIELDS_LOAD |
CALL MDSREADFIELD ( saltClimFile, readBinaryPrec, |
|
./model/src/external_fields_load.F |
175 |
EXTERNAL_FIELDS_LOAD |
CALL MDSREADFIELD ( saltClimFile, readBinaryPrec, |
|
./pkg/ebm/ebm_load_climatology.F |
34 |
EBM_LOAD_CLIMATOLOGY |
IF ( saltClimFile .NE. ' ' ) THEN |
|
./pkg/ebm/ebm_load_climatology.F |
36 |
EBM_LOAD_CLIMATOLOGY |
CALL READ_FLD_XY_RS( saltClimFile, ' ', SSS, 0, myThid ) |
|
./verification/natl_box/code/external_fields_load.F |
152 |
EXTERNAL_FIELDS_LOAD |
IF ( saltClimFile .NE. ' ' ) THEN |
|
./verification/natl_box/code/external_fields_load.F |
153 |
EXTERNAL_FIELDS_LOAD |
CALL MDSREADFIELD ( saltClimFile, readBinaryPrec, |
|
./verification/natl_box/code/external_fields_load.F |
155 |
EXTERNAL_FIELDS_LOAD |
CALL MDSREADFIELD ( saltClimFile, readBinaryPrec, |
|
./model/src/ini_forcing.F |
135 |
INI_FORCING |
IF ( saltClimFile .NE. ' ' ) THEN |
|
./model/src/ini_forcing.F |
136 |
INI_FORCING |
CALL READ_FLD_XY_RS( saltClimFile, ' ', SSS, 0, myThid ) |
|
./model/src/ini_parms.F |
220 |
INI_PARMS |
& thetaClimFile, saltClimFile, |
|
./model/inc/PARAMS.h |
104 |
NO PROCEDURE |
CHARACTER*(MAX_LEN_FNAM) saltClimFile |
|
./model/inc/PARAMS.h |
86 |
NO PROCEDURE |
& saltClimFile, buoyancyRelation, |
|
./pkg/seaice/seaice_get_forcing.F |
204 |
SEAICE_GET_FORCING |
IF ( saltClimFile .NE. ' ' ) THEN |
|
./pkg/seaice/seaice_get_forcing.F |
205 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( saltClimFile,SSSsi0,iRec ,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
206 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( saltClimFile,SSSsi1,iRec+1,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
395 |
SEAICE_GET_FORCING |
IF ( aWghtSSS .EQ. 0 .AND. saltClimFile .NE. ' ') THEN |
|
./pkg/seaice/seaice_get_forcing.F |
399 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( saltClimFile,SSSsi0,iRec,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
401 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( saltClimFile,SSSsi1,iRec,myIter,myThid ) |
|
./model/src/set_defaults.F |
285 |
SET_DEFAULTS |
saltClimFile = ' ' |