File |
Line number |
Procedure |
Code |
./pkg/salt_plume/salt_plume_apply.F |
119 |
SALT_PLUME_APPLY |
SurfVal = SEAICE_Tfrz |
./pkg/salt_plume/salt_plume_apply.F |
127 |
SALT_PLUME_APPLY |
SurfVal = SPbrineSconst |
./pkg/salt_plume/salt_plume_apply.F |
196 |
SALT_PLUME_APPLY |
IF(trIdentity.EQ.GAD_TEMPERATURE) SurfVal=tracer(i,j,1,bi,bj) |
./pkg/salt_plume/salt_plume_apply.F |
198 |
SALT_PLUME_APPLY |
gTr_totSurf2Below = SPbrineVolFlux(i,j,bi,bj)*SurfVal |
./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_apply.F |
75 |
SALT_PLUME_APPLY |
& SurfVal, SEAICE_Tfrz, ConvertFac, recip_ConvertFac |