| File |
Line number |
Procedure |
Code |
|
./pkg/salt_plume/SALT_PLUME.h |
100 |
NO PROCEDURE |
_RL dSPvolSurf2kLev (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/salt_plume/SALT_PLUME.h |
110 |
NO PROCEDURE |
& dSPvolSurf2kLev,dSPvolkLev2Above |
|
./pkg/salt_plume/salt_plume_apply.F |
199 |
SALT_PLUME_APPLY |
gTr_Surf2kLev = dSPvolSurf2kLev(i,j,k,bi,bj) * SurfVal |
|
./pkg/salt_plume/salt_plume_diagnostics_fill.F |
48 |
SALT_PLUME_DIAGNOSTICS_FILL |
& dSPvolSurf2kLev, 'SPVsuf2k',0,Nr,0,1,1,myThid ) |
|
./pkg/salt_plume/salt_plume_init_varia.F |
47 |
SALT_PLUME_INIT_VARIA |
dSPvolSurf2kLev (i,j,k,bi,bj) = 0. _d 0 |
|
./pkg/salt_plume/salt_plume_volfrac.F |
159 |
SALT_PLUME_VOLFRAC |
dSPvolSurf2kLev(i,j,k,bi,bj)=dplumek*SPbrineVolFlux(i,j,bi,bj) |
|
./pkg/salt_plume/salt_plume_volfrac.F |
172 |
SALT_PLUME_VOLFRAC |
& - dSPvolSurf2kLev(i,j,k,bi,bj) |
|
./pkg/salt_plume/salt_plume_volfrac.F |
77 |
SALT_PLUME_VOLFRAC |
dSPvolSurf2kLev(i,j,k,bi,bj) = 0. _d 0 |