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



File Line number Procedure Code
./pkg/ptracers/ptracers_readparms.F 89 PTRACERS_READPARMS
          PTRACERS_diffKrNr(k,iTracer)=diffKrNrS(k)
./model/inc/PARAMS.h 639 NO PROCEDURE
     & diffKhS, diffK4S, diffKrNrS,
./model/inc/PARAMS.h 718 NO PROCEDURE
      _RL diffKrNrS(Nr)
./model/src/calc_3d_diffusivity.F 103 CALC_3D_DIFFUSIVITY
     &       + diffKrNrS(k)
./model/src/ini_parms.F 183 INI_PARMS
     & viscAr, diffKrT, diffKrS, diffKrNrT, diffKrNrS, hFacMinDr,
./model/src/ini_parms.F 369 INI_PARMS
       diffKrNrS(k) = UNSET_RL
./model/src/ini_parms.F 534 INI_PARMS
        IF ( diffKrNrS(k).EQ. UNSET_RL ) diffKrSet = .FALSE.
./model/src/ini_parms.F 538 INI_PARMS
         diffKrNrS(k) = diffKrS
./model/src/ini_mixing.F 45 INI_MIXING
            diffKr(i,j,k,bi,bj) = diffKrNrS(k)
./model/src/config_summary.F 166 CONFIG_SUMMARY
      CALL WRITE_1D_R8( diffKrNrS, Nr, INDEX_K,'diffKrNrS =',
./model/src/calc_diffusivity.F 82 CALC_DIFFUSIVITY
     &       + diffKrNrS(k)
./pkg/kpp/kpp_calc.F 784 KPP_CALC_DUMMY
               KPPdiffKzS(i,j,k,bi,bj) = diffKrNrS(k)
./pkg/kpp/kpp_init.F 142 KPP_INIT
                     KPPdiffKzS (i,j,k,bi,bj) = diffKrNrS(k)
./pkg/kpp/kpp_calc_diff_s.F 58 KPP_CALC_DIFF_S
     &                     - diffKrNrS(k) )
./pkg/kpp/kpp_calc_diff_s.F 73 KPP_CALC_DIFF_S
     &                     - diffKrNrS(kArg) )
./pkg/kpp/kpp_routines.F 213 KPPMIX
               diffus(i,k,2) = max ( blmc(i,k,2), diffKrNrS(k) )
./pkg/kpp/kpp_routines.F 789 RI_IWMIX
               diffus(i,ki,2) = diffKrNrS(ki)+ fcon*difscon + fRi*difs0
./pkg/kpp/kpp_routines.F 793 RI_IWMIX
               diffus(i,ki,2) = diffKrNrS(ki)
./pkg/kpp/kpp_routines.F 798 RI_IWMIX
            diffus(i,ki,2) = diffKrNrS(ki)