| File |
Line number |
Procedure |
Code |
|
./model/src/external_fields_load.F |
181 |
EXTERNAL_FIELDS_LOAD |
& 'RS', 1, Qsw0, intime0, myThid ) |
|
./model/src/external_fields_load.F |
190 |
EXTERNAL_FIELDS_LOAD |
Qnet0(i,j,bi,bj) = Qnet0(i,j,bi,bj) + Qsw0(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
227 |
EXTERNAL_FIELDS_LOAD |
_EXCH_XY_R4(Qsw0, myThid ) |
|
./model/src/external_fields_load.F |
257 |
EXTERNAL_FIELDS_LOAD |
Qsw(i,j,bi,bj) = bWght*Qsw0(i,j,bi,bj) |
|
./verification/natl_box/code/external_fields_load.F |
161 |
EXTERNAL_FIELDS_LOAD |
& 'RS', 1, Qsw0, intime0, myThid ) |
|
./verification/natl_box/code/external_fields_load.F |
170 |
EXTERNAL_FIELDS_LOAD |
Qnet0(i,j,bi,bj) = Qnet0(i,j,bi,bj) + Qsw0(i,j,bi,bj) |
|
./verification/natl_box/code/external_fields_load.F |
197 |
EXTERNAL_FIELDS_LOAD |
_EXCH_XY_R4(Qsw0, myThid ) |
|
./verification/natl_box/code/external_fields_load.F |
221 |
EXTERNAL_FIELDS_LOAD |
Qsw(i,j,bi,bj) = bWght*Qsw0(i,j,bi,bj) |
|
./model/src/ini_forcing.F |
80 |
INI_FORCING |
Qsw0 (i,j,bi,bj) = 0. _d 0 |
|
./model/inc/FFIELDS.h |
145 |
NO PROCEDURE |
& , Qsw0, Qsw1 |
|
./model/inc/FFIELDS.h |
171 |
NO PROCEDURE |
_RS Qsw0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |