| File |
Line number |
Procedure |
Code |
|
./model/src/external_fields_load.F |
143 |
EXTERNAL_FIELDS_LOAD |
IF ( surfQFile .NE. ' ' ) THEN |
|
./model/src/external_fields_load.F |
144 |
EXTERNAL_FIELDS_LOAD |
CALL MDSREADFIELD ( surfQFile, readBinaryPrec, |
|
./model/src/external_fields_load.F |
146 |
EXTERNAL_FIELDS_LOAD |
CALL MDSREADFIELD ( surfQFile, readBinaryPrec, |
|
./model/src/external_fields_load.F |
184 |
EXTERNAL_FIELDS_LOAD |
IF ( surfQFile .NE. ' ' ) THEN |
|
./verification/natl_box/code/external_fields_load.F |
129 |
EXTERNAL_FIELDS_LOAD |
IF ( surfQFile .NE. ' ' ) THEN |
|
./verification/natl_box/code/external_fields_load.F |
130 |
EXTERNAL_FIELDS_LOAD |
CALL MDSREADFIELD ( surfQFile, readBinaryPrec, |
|
./verification/natl_box/code/external_fields_load.F |
132 |
EXTERNAL_FIELDS_LOAD |
CALL MDSREADFIELD ( surfQFile, readBinaryPrec, |
|
./verification/natl_box/code/external_fields_load.F |
164 |
EXTERNAL_FIELDS_LOAD |
IF ( surfQFile .NE. ' ' ) THEN |
|
./model/src/ini_forcing.F |
121 |
INI_FORCING |
IF ( surfQFile .NE. ' ' ) THEN |
|
./model/src/ini_forcing.F |
122 |
INI_FORCING |
CALL READ_FLD_XY_RS( surfQFile, ' ', Qnet, 0, myThid ) |
|
./model/src/ini_forcing.F |
149 |
INI_FORCING |
IF ( surfQFile .NE. ' ' ) THEN |