File |
Line number |
Procedure |
Code |
./pkg/salt_plume/salt_plume_frac.F |
111 |
SALT_PLUME_FRAC |
plumek(i) = max(zero,S) |
./pkg/salt_plume/salt_plume_frac.F |
119 |
SALT_PLUME_FRAC |
plumek(i) = max(zero,S/So) |
./pkg/salt_plume/salt_plume_frac.F |
126 |
SALT_PLUME_FRAC |
plumek(i) = max(zero,S*So) |
./pkg/salt_plume/salt_plume_frac.F |
138 |
SALT_PLUME_FRAC |
plumek(i) = max(zero,S/So) |
./pkg/salt_plume/salt_plume_frac.F |
140 |
SALT_PLUME_FRAC |
plumek(i) = zero |
./pkg/salt_plume/salt_plume_frac.F |
148 |
SALT_PLUME_FRAC |
plumek(i) = zero |
./pkg/salt_plume/salt_plume_frac.F |
14 |
SALT_PLUME_FRAC |
U plumek, |
./pkg/salt_plume/salt_plume_frac.F |
150 |
SALT_PLUME_FRAC |
plumek(i) = one |
./pkg/salt_plume/salt_plume_frac.F |
166 |
SALT_PLUME_FRAC |
plumek(i) = max(zero,two*So*facz-S) |
./pkg/salt_plume/salt_plume_frac.F |
168 |
SALT_PLUME_FRAC |
plumek(i) = max(zero, |
./pkg/salt_plume/salt_plume_frac.F |
179 |
SALT_PLUME_FRAC |
plumek(i) = max(zero,two/dd20*facz-S/So) |
./pkg/salt_plume/salt_plume_frac.F |
181 |
SALT_PLUME_FRAC |
plumek(i) = max(zero, |
./pkg/salt_plume/salt_plume_frac.F |
211 |
SALT_PLUME_FRAC |
plumek(i) = one |
./pkg/salt_plume/salt_plume_frac.F |
219 |
SALT_PLUME_FRAC |
plumek(i) = one |
./pkg/salt_plume/salt_plume_frac.F |
64 |
SALT_PLUME_FRAC |
_RL plumek(imax), SPDepth(imax) |
./pkg/salt_plume/salt_plume_frac.F |
85 |
SALT_PLUME_FRAC |
facz = abs(fact*plumek(i)) |