| File |
Line number |
Procedure |
Code |
|
./pkg/ebm/ebm_forcing_surf.F |
87 |
EBM_FORCING_SURF |
& *(salt(i,j,kSurface,bi,bj)-SSS(i,j,bi,bj)) |
|
./pkg/ebm/ebm_load_climatology.F |
103 |
EBM_LOAD_CLIMATOLOGY |
_EXCH_XY_R4( SSS, myThid ) |
|
./pkg/ebm/ebm_load_climatology.F |
36 |
EBM_LOAD_CLIMATOLOGY |
CALL READ_FLD_XY_RS( saltClimFile, ' ', SSS, 0, myThid ) |
|
./pkg/ebm/ebm_load_climatology.F |
96 |
EBM_LOAD_CLIMATOLOGY |
CALL PLOT_FIELD_XYRS( SSS, 'Salt Climatology' , 1, myThid ) |
|
./model/inc/FFIELDS.h |
107 |
NO PROCEDURE |
_RS SSS (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./model/inc/FFIELDS.h |
91 |
NO PROCEDURE |
& , SSS |
|
./verification/OpenAD/code/FFIELDS.h |
105 |
NO PROCEDURE |
_RS SSS (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./verification/OpenAD/code/FFIELDS.h |
92 |
NO PROCEDURE |
& , SSS |
|
./verification/natl_box/code/external_fields_load.F |
210 |
EXTERNAL_FIELDS_LOAD |
SSS(i,j,bi,bj) = bWght*SSS0(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
253 |
EXTERNAL_FIELDS_LOAD |
SSS(i,j,bi,bj) = bWght*SSS0(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
357 |
EXTERNAL_FIELDS_LOAD |
& SST(1,sNy,1,1),SSS(1,sNy,1,1), |
|
./model/src/external_forcing_surf.F |
84 |
EXTERNAL_FORCING_SURF |
& *(salt(i,j,ks,bi,bj)-SSS(i,j,bi,bj)) |
|
./model/src/external_forcing_surf.F |
95 |
EXTERNAL_FORCING_SURF |
& *(salt(i,j,ks,bi,bj)-SSS(i,j,bi,bj)) |
|
./model/src/ini_forcing.F |
137 |
INI_FORCING |
CALL READ_FLD_XY_RS( saltClimFile, ' ', SSS, 0, myThid ) |
|
./model/src/ini_forcing.F |
178 |
INI_FORCING |
_EXCH_XY_R4(SSS , myThid ) |
|
./model/src/ini_forcing.F |
53 |
INI_FORCING |
SSS (i,j,bi,bj) = 0. _d 0 |
|
./pkg/ctrl/ctrl_map_forcing.F |
204 |
CTRL_MAP_FORCING |
_EXCH_XY_R4(SSS, myThid ) |
|
./pkg/seaice/seaice_do_diags.F |
113 |
SEAICE_DO_DIAGS |
CALL PLOT_FIELD_XYRS( SSS , 'Current SSS ', myIter, myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
497 |
SEAICE_GET_FORCING |
SSS(i,j,bi,bj) = bWghtSSS * SSSsi0(i,j,bi,bj) + |
|
./pkg/seaice/seaice_get_forcing.F |
508 |
SEAICE_GET_FORCING |
SSS(i,j,bi,bj) = aWghtSSS * SSSsi0(i,j,bi,bj) + |