Symbol Description Uses
diffKrNrT vertical profile of Laplacian diffusion coeff. 21



File Line number Procedure Code
./model/inc/PARAMS.h 730 NO PROCEDURE
     & diffKhT, diffK4T, diffKrNrT,
./model/inc/PARAMS.h 815 NO PROCEDURE
      _RL diffKrNrT(Nr)
./pkg/ggl90/ggl90_calc.F 412 GGL90_CALC
         GGL90visctmp(i,j,k) = MAX(KappaM,diffKrNrT(k))
./pkg/ggl90/ggl90_calc.F 583 GGL90_CALC
         GGL90diffKr(i,j,k,bi,bj)= MAX( tmpVisc , diffKrNrT(k) )
./pkg/ggl90/ggl90_calc_diff.F 55 GGL90_CALC_DIFF
     &                     - diffKrNrT(k) )
./pkg/ggl90/ggl90_calc_diff.F 66 GGL90_CALC_DIFF
     &                     - diffKrNrT(kArg) )
./model/src/calc_3d_diffusivity.F 119 CALC_3D_DIFFUSIVITY
     &          + diffKrNrT(k)
./model/src/calc_diffusivity.F 81 CALC_DIFFUSIVITY
     &        + diffKrNrT(k)
./pkg/my82/my82_calc.F 166 MY82_CALC
     &                               diffKrNrT(k) )
./pkg/my82/my82_calc_diff.F 58 MY82_CALC_DIFF
     &                     - diffKrNrT(k) )
./pkg/my82/my82_calc_diff.F 73 MY82_CALC_DIFF
     &                     - diffKrNrT(kArg) )
./pkg/my82/my82_init_varia.F 55 MY82_INIT_VARIA
           MYdiffKr (i,j,k,bi,bj) = diffKrNrT(k)
./pkg/pp81/pp81_calc.F 84 PP81_CALC
     &        diffKrNrT(k))
./pkg/pp81/pp81_calc_diff.F 58 PP81_CALC_DIFF
     &                     - diffKrNrT(k) )
./pkg/pp81/pp81_calc_diff.F 73 PP81_CALC_DIFF
     &                     - diffKrNrT(kArg) )
./model/src/config_summary.F 164 CONFIG_SUMMARY
      CALL WRITE_1D_RL( diffKrNrT, Nr, INDEX_K, 'diffKrNrT =',
./pkg/pp81/pp81_init_varia.F 43 PP81_INIT_VARIA
           PPdiffKr (i,j,k,bi,bj) = diffKrNrT(k)
./model/src/ini_parms.F 191 INI_PARMS
     & viscAr, diffKrT, diffKrS, viscArNr, diffKrNrT, diffKrNrS,
./model/src/ini_parms.F 338 INI_PARMS
       diffKrNrT(k) = UNSET_RL
./model/src/ini_parms.F 483 INI_PARMS
        IF ( diffKrNrT(k).EQ.UNSET_RL ) THEN
./model/src/ini_parms.F 484 INI_PARMS
          diffKrNrT(k) = diffKrT