| File |
Line number |
Procedure |
Code |
|
./model/src/external_fields_load.F |
117 |
EXTERNAL_FIELDS_LOAD |
IF ( surfQFile .NE. ' ' ) THEN |
|
./model/src/external_fields_load.F |
118 |
EXTERNAL_FIELDS_LOAD |
CALL READ_REC_XY_RS( surfQFile, Qnet0, |
|
./model/src/external_fields_load.F |
120 |
EXTERNAL_FIELDS_LOAD |
CALL READ_REC_XY_RS( surfQFile, Qnet1, |
|
./model/src/external_fields_load.F |
171 |
EXTERNAL_FIELDS_LOAD |
IF ( surfQFile .NE. ' ' ) THEN |
|
./model/src/external_fields_load.F |
255 |
EXTERNAL_FIELDS_LOAD |
& .OR. surfQFile .NE. ' ' ) THEN |
|
./model/src/ini_forcing.F |
122 |
INI_FORCING |
IF ( surfQFile .NE. ' ' ) THEN |
|
./model/src/ini_forcing.F |
123 |
INI_FORCING |
CALL READ_FLD_XY_RS( surfQFile, ' ', Qnet, 0, myThid ) |
|
./model/src/ini_forcing.F |
162 |
INI_FORCING |
IF ( surfQFile .NE. ' ' ) THEN |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
123 |
INI_FORCING |
IF ( surfQFile .NE. ' ' ) THEN |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
124 |
INI_FORCING |
CALL READ_FLD_XY_RS( surfQFile, ' ', Qnet, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
164 |
INI_FORCING |
IF ( surfQFile .NE. ' ' ) THEN |