| File |
Line number |
Procedure |
Code |
|
./model/src/external_fields_load.F |
183 |
EXTERNAL_FIELDS_LOAD |
& 'RS', 1, Qsw1, intime1, myThid ) |
|
./model/src/external_fields_load.F |
191 |
EXTERNAL_FIELDS_LOAD |
Qnet1(i,j,bi,bj) = Qnet1(i,j,bi,bj) + Qsw1(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
228 |
EXTERNAL_FIELDS_LOAD |
_EXCH_XY_R4(Qsw1, myThid ) |
|
./model/src/external_fields_load.F |
258 |
EXTERNAL_FIELDS_LOAD |
& +aWght*Qsw1(i,j,bi,bj) |
|
./verification/natl_box/code/external_fields_load.F |
163 |
EXTERNAL_FIELDS_LOAD |
& 'RS', 1, Qsw1, intime1, myThid ) |
|
./verification/natl_box/code/external_fields_load.F |
171 |
EXTERNAL_FIELDS_LOAD |
Qnet1(i,j,bi,bj) = Qnet1(i,j,bi,bj) + Qsw1(i,j,bi,bj) |
|
./verification/natl_box/code/external_fields_load.F |
198 |
EXTERNAL_FIELDS_LOAD |
_EXCH_XY_R4(Qsw1, myThid ) |
|
./verification/natl_box/code/external_fields_load.F |
222 |
EXTERNAL_FIELDS_LOAD |
& +aWght*Qsw1(i,j,bi,bj) |
|
./model/src/ini_forcing.F |
81 |
INI_FORCING |
Qsw1 (i,j,bi,bj) = 0. _d 0 |
|
./model/inc/FFIELDS.h |
145 |
NO PROCEDURE |
& , Qsw0, Qsw1 |
|
./model/inc/FFIELDS.h |
170 |
NO PROCEDURE |
_RS Qsw1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |