| File |
Line number |
Procedure |
Code |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
105 |
SALT_PLUME_TENDENCY_APPLY_S |
plumefrac(i,j) = ( plumekb2D(i,j)-plumefrac(i,j) ) |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
107 |
SALT_PLUME_TENDENCY_APPLY_S |
plumetend(I,J) = saltPlumeFlux(i,j,bi,bj)*plumefrac(I,J) |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
114 |
SALT_PLUME_TENDENCY_APPLY_S |
plumefrac(i,j) = 0. _d 0 |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
125 |
SALT_PLUME_TENDENCY_APPLY_S |
plumefrac(I,J) = 0. _d 0 |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
144 |
SALT_PLUME_TENDENCY_APPLY_S |
plumefrac(I,J) = (plumekb(2)-plumekb(1))*maskC(i,j,k,bi,bj) |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
145 |
SALT_PLUME_TENDENCY_APPLY_S |
plumetend(I,J) = saltPlumeFlux(i,j,bi,bj)*plumefrac(I,J) |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
152 |
SALT_PLUME_TENDENCY_APPLY_S |
plumefrac(I,J) = 0. _d 0 |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
162 |
SALT_PLUME_TENDENCY_APPLY_S |
& plumefrac,'PLUMEKB ',k,1,2,bi,bj,myThid ) |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
54 |
SALT_PLUME_TENDENCY_APPLY_S |
_RL plumefrac(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
88 |
SALT_PLUME_TENDENCY_APPLY_S |
plumefrac(I,J) = plumekb2D(i,j) |