Symbol Description Uses
KPPfrac 7



File Line number Procedure Code
./pkg/kpp/kpp_calc.F 728 KPP_CALC
            KPPfrac(i,j,bi,bj) = worka(i,j)
./pkg/kpp/kpp_calc.F 774 KPP_CALC_DUMMY
            KPPfrac(i,j,bi,bj) = 0.0
./pkg/kpp/kpp_do_diags.F 315 KPP_DO_DIAGS
       CALL DIAGNOSTICS_FILL(KPPfrac   ,'KPPfrac ',0,1 ,0,1,1,myThid)
./pkg/kpp/kpp_transport_t.F 72 KPP_TRANSPORT_T
     &            *(1.-KPPfrac(i,j,bi,bj))
./pkg/kpp/kpp_transport_t.F 87 KPP_TRANSPORT_T
     &            *(1.-KPPfrac(i,j,bi,bj))
./pkg/kpp/KPP.h 35 NO PROCEDURE
      _RL KPPfrac    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,   nSx,nSy)
./pkg/kpp/KPP.h 38 NO PROCEDURE
      COMMON /kpp_short/ KPPfrac