| File |
Line number |
Procedure |
Code |
|
./pkg/kpp/kpp_calc.F |
510 |
KPP_CALC |
I , boplume, SaltPlumeDepth(1-Olx,1-Oly,bi,bj) |
|
./pkg/kpp/kpp_calc.F |
601 |
KPP_CALC |
work2(i,j) = SaltPlumeDepth(i,j,bi,bj) |
|
./pkg/salt_plume/SALT_PLUME.h |
42 |
NO PROCEDURE |
_RL SaltPlumeDepth (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/salt_plume/SALT_PLUME.h |
44 |
NO PROCEDURE |
COMMON /DYNVARS_SALT_PLUME/ SaltPlumeDepth |
|
./pkg/salt_plume/salt_plume_calc_depth.F |
115 |
SALT_PLUME_CALC_DEPTH |
SaltPlumeDepth(i,j,bi,bj) = rF(1)-rC(k-1)+tmpFac*drC(k) |
|
./pkg/salt_plume/salt_plume_calc_depth.F |
128 |
SALT_PLUME_CALC_DEPTH |
SaltPlumeDepth(i,j,bi,bj) = |
|
./pkg/salt_plume/salt_plume_calc_depth.F |
129 |
SALT_PLUME_CALC_DEPTH |
& min( SaltPlumeDepth(i,j,bi,bj)*SPovershoot, |
|
./pkg/salt_plume/salt_plume_calc_depth.F |
61 |
SALT_PLUME_CALC_DEPTH |
SaltPlumeDepth(i,j,bi,bj) = rF(1)-R_low(I,J,bi,bj) |
|
./pkg/salt_plume/salt_plume_calc_depth.F |
93 |
SALT_PLUME_CALC_DEPTH |
SaltPlumeDepth(i,j,bi,bj) = rF(1)-rC(k-1)+tmpFac*drC(k) |
|
./pkg/salt_plume/salt_plume_diagnostics_fill.F |
37 |
SALT_PLUME_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_SCALE_FILL( SaltPlumeDepth,tmpFac,1, |
|
./pkg/salt_plume/salt_plume_init_varia.F |
37 |
SALT_PLUME_INIT_VARIA |
SaltPlumeDepth (i,j,bi,bj) = 0. _d 0 |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
49 |
SALT_PLUME_TENDENCY_APPLY_S |
SPdepth(1)=SaltPlumeDepth(i,j,bi,bj) |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
50 |
SALT_PLUME_TENDENCY_APPLY_S |
SPdepth(2)=SaltPlumeDepth(i,j,bi,bj) |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
60 |
SALT_PLUME_TENDENCY_APPLY_S |
IF ( SaltPlumeDepth(i,j,bi,bj) .GT. -rF(kLev) ) THEN |