File |
Line number |
Procedure |
Code |
./pkg/salt_plume/SALT_PLUME.h |
104 |
NO PROCEDURE |
& ,SPplumek (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr+1,nSx,nSy) |
./pkg/salt_plume/SALT_PLUME.h |
112 |
NO PROCEDURE |
& ,SPplumek |
./pkg/salt_plume/salt_plume_init_varia.F |
51 |
SALT_PLUME_INIT_VARIA |
SPplumek (i,j,k,bi,bj) = 1. _d 0 |
./pkg/salt_plume/salt_plume_init_varia.F |
54 |
SALT_PLUME_INIT_VARIA |
SPplumek (i,j,Nrp1,bi,bj) = 1. _d 0 |
./pkg/salt_plume/salt_plume_volfrac.F |
109 |
SALT_PLUME_VOLFRAC |
SPplumek(i,j,k,bi,bj)=dMbdt(i,j) |
./pkg/salt_plume/salt_plume_volfrac.F |
110 |
SALT_PLUME_VOLFRAC |
IF(SPplumek(i,j,k,bi,bj).GT. 0.9999999) THEN |
./pkg/salt_plume/salt_plume_volfrac.F |
158 |
SALT_PLUME_VOLFRAC |
dplumek=SPplumek(i,j,k+1,bi,bj)-SPplumek(i,j,k,bi,bj) |
./pkg/salt_plume/salt_plume_volfrac.F |
181 |
SALT_PLUME_VOLFRAC |
& SPplumek,'PLUMEKB1',0,Nr,1,bi,bj,myThid ) |
./pkg/salt_plume/salt_plume_volfrac.F |
79 |
SALT_PLUME_VOLFRAC |
SPplumek(i,j,k,bi,bj) = 1. _d 0 |
./pkg/salt_plume/salt_plume_volfrac.F |
85 |
SALT_PLUME_VOLFRAC |
SPplumek(i,j,Nrp1,bi,bj) = 1. _d 0 |