| File |
Line number |
Procedure |
Code |
|
./pkg/kpp/kpp_calc.F |
399 |
KPP_CALC |
I saltPlumeFlux, |
|
./pkg/kpp/kpp_forcing_surf.F |
122 |
KPP_FORCING_SURF |
_RL saltPlumeFlux (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/kpp/kpp_forcing_surf.F |
15 |
KPP_FORCING_SURF |
I saltPlumeFlux, |
|
./pkg/kpp/kpp_forcing_surf.F |
221 |
KPP_FORCING_SURF |
& * saltPlumeFlux(i,j,bi,bj) |
|
./pkg/kpp/kpp_transport_s.F |
108 |
KPP_TRANSPORT_S |
& + tmpFac1*saltPlumeFlux(i,j,bi,bj)*recip_rhoConst |
|
./pkg/kpp/kpp_transport_s.F |
92 |
KPP_TRANSPORT_S |
& + tmpFac1*saltPlumeFlux(i,j,bi,bj)*recip_rhoConst |
|
./pkg/salt_plume/SALT_PLUME.h |
43 |
NO PROCEDURE |
_RL saltPlumeFlux (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/salt_plume/SALT_PLUME.h |
45 |
NO PROCEDURE |
COMMON /FFIELDS_saltPlumeFlux/ saltPlumeFlux |
|
./pkg/salt_plume/salt_plume_diagnostics_fill.F |
42 |
SALT_PLUME_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_SCALE_FILL( saltPlumeFlux,tmpFac,1, |
|
./pkg/salt_plume/salt_plume_forcing_surf.F |
60 |
SALT_PLUME_FORCING_SURF |
& - saltPlumeFlux(i,j,bi,bj) * mass2rUnit |
|
./pkg/salt_plume/salt_plume_init_varia.F |
38 |
SALT_PLUME_INIT_VARIA |
saltPlumeFlux (i,j,bi,bj) = 0. _d 0 |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
64 |
SALT_PLUME_TENDENCY_APPLY_S |
& +saltPlumeFlux(i,j,bi,bj)*plumefrac(I,J)*mass2rUnit |
|
./model/src/do_oceanic_phys.F |
169 |
DO_OCEANIC_PHYS |
saltPlumeFlux(i,j,bi,bj) = 0. _d 0 |
|
./pkg/seaice/seaice_growth.F |
1126 |
SEAICE_GROWTH |
saltPlumeFlux(I,J,bi,bj) = MAX( tmpscal3-tmpscal2 , 0. _d 0) |
|
./pkg/seaice/seaice_growth.F |
1169 |
SEAICE_GROWTH |
saltPlumeFlux(I,J,bi,bj)= |
|
./pkg/seaice/seaice_growth.F |
1176 |
SEAICE_GROWTH |
& saltPlumeFlux(i,j,bi,bj) = 0.0 _d 0 |
|
./pkg/seaice/seaice_growth.F |
1187 |
SEAICE_GROWTH |
saltPlumeFlux(i,j,bi,bj) = 0.0 _d 0 |
|
./pkg/seaice/seaice_growth.F |
1203 |
SEAICE_GROWTH |
saltPlumeFlux(i,j,bi,bj) = 0.0 _d 0 |
|
./pkg/seaice/seaice_model.F |
249 |
SEAICE_MODEL |
& _EXCH_XY_RL(saltPlumeFlux, myThid ) |