File |
Line number |
Procedure |
Code |
./pkg/kpp/kpp_calc.F |
552 |
KPP_CALC |
I , boplume, SaltPlumeDepth(1-OLx,1-OLy,bi,bj) |
./pkg/kpp/kpp_calc.F |
649 |
KPP_CALC |
work2(i,j) = SaltPlumeDepth(i,j,bi,bj) |
./pkg/salt_plume/SALT_PLUME.h |
106 |
NO PROCEDURE |
COMMON /DYNVARS_SALT_PLUME/ SaltPlumeDepth |
./pkg/salt_plume/SALT_PLUME.h |
94 |
NO PROCEDURE |
_RL SaltPlumeDepth (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/salt_plume/salt_plume_calc_depth.F |
130 |
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 |
143 |
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 |
164 |
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 |
177 |
SALT_PLUME_CALC_DEPTH |
SaltPlumeDepth(i,j,bi,bj) = |
./pkg/salt_plume/salt_plume_calc_depth.F |
178 |
SALT_PLUME_CALC_DEPTH |
& min( SaltPlumeDepth(i,j,bi,bj)*SPovershoot, |
./pkg/salt_plume/salt_plume_calc_depth.F |
187 |
SALT_PLUME_CALC_DEPTH |
SaltPlumeDepth(i,j,bi,bj) = |
./pkg/salt_plume/salt_plume_calc_depth.F |
188 |
SALT_PLUME_CALC_DEPTH |
& min( SaltPlumeDepth(i,j,bi,bj), |
./pkg/salt_plume/salt_plume_calc_depth.F |
82 |
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 |
95 |
SALT_PLUME_CALC_DEPTH |
SaltPlumeDepth(i,j,bi,bj) = rF(1)-R_low(I,J,bi,bj) |
./pkg/salt_plume/salt_plume_diagnostics_fill.F |
34 |
SALT_PLUME_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL( SaltPlumeDepth, |
./pkg/salt_plume/salt_plume_init_varia.F |
41 |
SALT_PLUME_INIT_VARIA |
SaltPlumeDepth (i,j,bi,bj) = 0. _d 0 |
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
103 |
SALT_PLUME_TENDENCY_APPLY_S |
IF ( SaltPlumeDepth(i,j,bi,bj) .GT. ABS(rF(k)) ) THEN |
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
124 |
SALT_PLUME_TENDENCY_APPLY_S |
IF ( SaltPlumeDepth(i,j,bi,bj) .GT. ABS(rF(k)) ) THEN |
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
129 |
SALT_PLUME_TENDENCY_APPLY_S |
SPdepth(1)=SaltPlumeDepth(i,j,bi,bj) |
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
130 |
SALT_PLUME_TENDENCY_APPLY_S |
SPdepth(2)=SaltPlumeDepth(i,j,bi,bj) |
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
80 |
SALT_PLUME_TENDENCY_APPLY_S |
I imt,minusone,SaltPlumeDepth(1-OLx,1-OLy,bi,bj), |
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
93 |
SALT_PLUME_TENDENCY_APPLY_S |
I imt,minusone,SaltPlumeDepth(1-OLx,1-OLy,bi,bj), |
./pkg/salt_plume/salt_plume_tendency_apply_t.F |
58 |
SALT_PLUME_TENDENCY_APPLY_T |
IF ( SaltPlumeDepth(i,j,bi,bj) .GT. ABS(rF(k)) ) THEN |
./pkg/salt_plume/salt_plume_volfrac.F |
96 |
SALT_PLUME_VOLFRAC |
temp(i,j)=SaltPlumeDepth(i,j,bi,bj) |