| File |
Line number |
Procedure |
Code |
|
./model/src/external_fields_load.F |
254 |
EXTERNAL_FIELDS_LOAD |
saltFlux(i,j,bi,bj) = bWght*saltFlux0(i,j,bi,bj) |
|
./pkg/thsice/thsice_ave.F |
105 |
THSICE_AVE |
CALL TIMEAVE_CUMULATE(ice_salFx_Ave, saltFlux, |
|
./pkg/thsice/thsice_ave.F |
149 |
THSICE_AVE |
CALL DIAGNOSTICS_FILL(saltFlux,'SIsaltFx',0,1,1,bi,bj,myThid) |
|
./pkg/thsice/thsice_step_fwd.F |
193 |
THSICE_STEP_FWD |
saltFlux(i,j,bi,bj) = 0. _d 0 |
|
./pkg/thsice/thsice_step_fwd.F |
272 |
THSICE_STEP_FWD |
saltFlux(i,j,bi,bj)=-icFrac*fsalt |
|
./pkg/thsice/thsice_step_fwd.F |
329 |
THSICE_STEP_FWD |
saltFlux(i,j,bi,bj)=saltFlux(i,j,bi,bj) - fsalt |
|
./pkg/thsice/thsice_slab_ocean.F |
69 |
THSICE_SLAB_OCEAN |
& + (fwFac*EmPmR(i,j,bi,bj) - dtFac*saltFlux(i,j,bi,bj)) |
|
./model/src/external_forcing_surf.F |
181 |
EXTERNAL_FORCING_SURF |
& -saltFlux(i,j,bi,bj)*horiVertRatio*recip_rhoConst |
|
./model/src/ini_forcing.F |
130 |
INI_FORCING |
CALL READ_FLD_XY_RS( saltFluxFile, ' ', saltFlux, 0, myThid ) |
|
./model/src/ini_forcing.F |
174 |
INI_FORCING |
_EXCH_XY_R4( saltFlux, myThid ) |
|
./model/src/ini_forcing.F |
51 |
INI_FORCING |
saltFlux (i,j,bi,bj) = 0. _d 0 |
|
./model/inc/FFIELDS.h |
105 |
NO PROCEDURE |
_RS saltFlux (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./model/inc/FFIELDS.h |
89 |
NO PROCEDURE |
& , saltFlux |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
170 |
OCN_APPLY_IMPORT |
IF (useImportFW ) _EXCH_XY_R4(saltFlux, myThid ) |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
94 |
OCN_APPLY_IMPORT |
saltFlux(i,j,bi,bj)= iceSaltFlx(i,j,bi,bj) |
|
./pkg/aim_compon_interf/atm_store_saltfx.F |
55 |
ATM_STORE_SALTFX |
& + saltFlux(i,j,bi,bj)*cplTimeFraction |