Symbol Description Uses
PPdiffKr 15



File Line number Procedure Code
./pkg/pp81/pp81_calc_diff.F 54 PP81_CALC_DIFF
     &                  +( PPdiffKr(i,j,k,bi,bj)
./pkg/pp81/pp81_calc_diff.F 69 PP81_CALC_DIFF
     &                  +( PPdiffKr(i,j,kArg,bi,bj)
./pkg/pp81/pp81_do_diags.F 100 PP81_DO_DIAGS
        CALL WRITE_FLD_XYZ_RL('PPdiffKr.',suff,PPdiffKr,
./pkg/pp81/pp81_do_diags.F 142 PP81_DO_DIAGS
     &       PPdiffKrtave,PPdiffKr,Nr,DDTT,bi,bj,myThid)
./pkg/pp81/pp81_do_diags.F 205 PP81_DO_DIAGS
     &        PPdiffKrtave,PPdiffKr,Nr,DDTT,bi,bj,myThid)
./pkg/pp81/pp81_do_diags.F 81 PP81_DO_DIAGS
        CALL PLOT_FIELD_XYZRL ( PPdiffKr, 'PPdiffKr',
./pkg/pp81/pp81_do_diags.F 91 PP81_DO_DIAGS
        CALL WRITE_REC_XYZ_RL('PPdiffKr',PPdiffKr,pp_drctrec,
./pkg/pp81/PP81.h 54 NO PROCEDURE
      _RL PPdiffKr (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
./pkg/pp81/PP81.h 55 NO PROCEDURE
      COMMON /PP_FIELDS/ PPviscAr, PPdiffKr
./pkg/pp81/pp81_calc.F 102 PP81_CALC
          PPdiffKr(I,J,K,bi,bj) = MAX(PPdiffMin,PPdiffKr(I,J,K,bi,bj))
./pkg/pp81/pp81_calc.F 112 PP81_CALC
         PPdiffKr(I,J,K,bi,bj) = PPdiffKr(I,J,K,bi,bj)
./pkg/pp81/pp81_calc.F 86 PP81_CALC
         PPdiffKr(I,J,K,bi,bj) = MAX(PPviscAr(I,J,K,bi,bj)/denom,
./pkg/pp81/pp81_init.F 43 PP81_INIT
           PPdiffKr (i,j,k,bi,bj) = diffKrNrT(k)