Symbol Description Uses
plumek on input: vertical depth for desired plume fraction 12


File Line number Procedure Code
./pkg/salt_plume/salt_plume_frac.F 105 SALT_PLUME_FRAC 
                  plumek(i) = one - min(one,(facz-dd)/(dd20-dd))
./pkg/salt_plume/salt_plume_frac.F 107 SALT_PLUME_FRAC 
                  plumek(i) = 0.
./pkg/salt_plume/salt_plume_frac.F 119 SALT_PLUME_FRAC 
                  plumek(i) = one - min(one,two/dd20*facz-tempN/tempN20)
./pkg/salt_plume/salt_plume_frac.F 11 SALT_PLUME_FRAC 
     U                  plumek,
./pkg/salt_plume/salt_plume_frac.F 121 SALT_PLUME_FRAC 
                  plumek(i) = one - min(one,
./pkg/salt_plume/salt_plume_frac.F 128 SALT_PLUME_FRAC 
            plumek(i) = 0.
./pkg/salt_plume/salt_plume_frac.F 56 SALT_PLUME_FRAC 
      _RL     plumek(imax), SPDepth(imax)
./pkg/salt_plume/salt_plume_frac.F 68 SALT_PLUME_FRAC 
         facz = abs(fact*plumek(i))
./pkg/salt_plume/salt_plume_frac.F 80 SALT_PLUME_FRAC 
               plumek(i) = one - min(one,tempN/tempN20)
./pkg/salt_plume/salt_plume_frac.F 84 SALT_PLUME_FRAC 
               plumek(i) = one -
./pkg/salt_plume/salt_plume_frac.F 95 SALT_PLUME_FRAC 
                  plumek(i) = one - min(one,(facz-dd)/(dd20-dd))
./pkg/salt_plume/salt_plume_frac.F 97 SALT_PLUME_FRAC 
                  plumek(i) = one