Symbol Description Uses
diffKrNrS vertical profile of Laplacian diffusion coeff. 30



File Line number Procedure Code
./model/inc/PARAMS.h 813 NO PROCEDURE
     & diffKhS, diffK4S, diffKrNrS, diffKr4S,
./model/inc/PARAMS.h 906 NO PROCEDURE
      _RL diffKrNrS(Nr)
./pkg/ggl90/ggl90_calc.F 425 GGL90_CALC
         GGL90visctmp(i,j,k) = MAX(KappaM(i,j),diffKrNrS(k))
./pkg/ggl90/ggl90_calc.F 710 GGL90_CALC
         GGL90diffKr(i,j,k,bi,bj)= MAX( tmpVisc , diffKrNrS(k) )
./pkg/ggl90/ggl90_calc_diff.F 55 GGL90_CALC_DIFF
     &                     - diffKrNrS(k) )
./pkg/ggl90/ggl90_calc_diff.F 66 GGL90_CALC_DIFF
     &                     - diffKrNrS(kArg) )
./pkg/kl10/kl10_calc.F 126 KL10_CALC
     &                                  diffKrNrS(1) )
./pkg/kl10/kl10_calc.F 170 KL10_CALC
     &                                        diffKrNrS(K) )
./pkg/kl10/kl10_calc_diff.F 60 KL10_CALC_DIFF
     &                     - diffKrNrS(k) )
./pkg/kl10/kl10_calc_diff.F 75 KL10_CALC_DIFF
     &                     - diffKrNrS(kArg) )
./pkg/kl10/kl10_init_varia.F 43 KL10_INIT_VARIA
           KLdiffKr (i,j,k,bi,bj) = diffKrNrS(k)
./model/src/calc_3d_diffusivity.F 136 CALC_3D_DIFFUSIVITY
     &          + diffKrNrS(k)
./pkg/kpp/kpp_calc_diff_ptr.F 67 KPP_CALC_DIFF_PTR
     &          - diffKrNrS(k) + PTRACERS_diffKrNr(k,iTr)
./pkg/kpp/kpp_calc_diff_ptr.F 84 KPP_CALC_DIFF_PTR
     &          - diffKrNrS(kArg) + PTRACERS_diffKrNr(kArg,iTr)
./pkg/my82/my82_calc.F 173 MY82_CALC
     &                               diffKrNrS(k) )
./pkg/my82/my82_calc_diff.F 58 MY82_CALC_DIFF
     &                     - diffKrNrS(k) )
./pkg/my82/my82_calc_diff.F 73 MY82_CALC_DIFF
     &                     - diffKrNrS(kArg) )
./model/src/config_summary.F 223 CONFIG_SUMMARY
      CALL WRITE_1D_RL( diffKrNrS, Nr, INDEX_K, 'diffKrNrS =',
./pkg/my82/my82_init_varia.F 55 MY82_INIT_VARIA
           MYdiffKr (i,j,k,bi,bj) = diffKrNrS(k)
./pkg/pp81/pp81_calc.F 90 PP81_CALC
     &                               diffKrNrS(k) )
./pkg/pp81/pp81_calc_diff.F 60 PP81_CALC_DIFF
     &                     - diffKrNrS(k) )
./pkg/pp81/pp81_calc_diff.F 75 PP81_CALC_DIFF
     &                     - diffKrNrS(kArg) )
./pkg/pp81/pp81_init_varia.F 43 PP81_INIT_VARIA
           PPdiffKr (i,j,k,bi,bj) = diffKrNrS(k)
./pkg/ptracers/ptracers_readparms.F 119 PTRACERS_READPARMS
          PTRACERS_diffKrNr(k,iTracer)=diffKrNrS(k)
./model/src/ini_mixing.F 58 INI_MIXING
            diffKr(i,j,k,bi,bj) = diffKrNrS(k)
./model/src/ini_parms.F 219 INI_PARMS
     & viscAr, diffKrT, diffKrS, viscArNr, diffKrNrT, diffKrNrS,
./model/src/ini_parms.F 558 INI_PARMS
        IF ( diffKrNrS(k).NE.UNSET_RL ) vertSetCount = vertSetCount + 1
./model/src/ini_parms.F 577 INI_PARMS
          diffKrNrS(k) = diffKrS
./model/src/ini_parms.F 584 INI_PARMS
          diffKrNrS(k) = diffKrNrT(k)
./model/src/set_defaults.F 170 SET_DEFAULTS
       diffKrNrS(k)       = UNSET_RL