| File |
Line number |
Procedure |
Code |
|
./model/src/external_fields_load.F |
145 |
EXTERNAL_FIELDS_LOAD |
& 'RS', 1, Qnet0, intime0, myThid ) |
|
./model/src/external_fields_load.F |
150 |
EXTERNAL_FIELDS_LOAD |
& 'RS', 1, Qnet0, 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 |
220 |
EXTERNAL_FIELDS_LOAD |
_EXCH_XY_R4(Qnet0, myThid ) |
|
./model/src/external_fields_load.F |
250 |
EXTERNAL_FIELDS_LOAD |
Qnet(i,j,bi,bj) = bWght*Qnet0(i,j,bi,bj) |
|
./verification/natl_box/code/external_fields_load.F |
131 |
EXTERNAL_FIELDS_LOAD |
& 'RS', 1, Qnet0, intime0, myThid ) |
|
./verification/natl_box/code/external_fields_load.F |
136 |
EXTERNAL_FIELDS_LOAD |
& 'RS', 1, Qnet0, 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 |
192 |
EXTERNAL_FIELDS_LOAD |
_EXCH_XY_R4(Qnet0, myThid ) |
|
./verification/natl_box/code/external_fields_load.F |
216 |
EXTERNAL_FIELDS_LOAD |
Qnet(i,j,bi,bj) = bWght*Qnet0(i,j,bi,bj) |
|
./model/src/ini_forcing.F |
69 |
INI_FORCING |
Qnet0 (i,j,bi,bj) = 0. _d 0 |
|
./model/inc/FFIELDS.h |
141 |
NO PROCEDURE |
& taux0, tauy0, Qnet0, EmPmR0, SST0, SSS0, |
|
./model/inc/FFIELDS.h |
153 |
NO PROCEDURE |
_RS Qnet0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |