Symbol Description Uses
KPPfrac 7



File Line number Procedure Code
./pkg/kpp/KPP.h 36 NO PROCEDURE
      _RL KPPfrac    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,   nSx,nSy)
./pkg/kpp/KPP.h 43 NO PROCEDURE
      COMMON /kpp_short/ KPPfrac
./pkg/kpp/kpp_calc.F 638 KPP_CALC
            KPPfrac(i,j,bi,bj) = worka(i,j)
./pkg/kpp/kpp_calc.F 727 KPP_CALC_DUMMY
            KPPfrac(i,j,bi,bj) = 0.0
./pkg/kpp/kpp_output.F 410 KPP_OUTPUT
       CALL DIAGNOSTICS_FILL(KPPfrac   ,'KPPfrac ',0,1 ,0,1,1,myThid)
./pkg/kpp/kpp_transport_t.F 100 KPP_TRANSPORT_T
     &            *(1.-KPPfrac(i,j,bi,bj))
./pkg/kpp/kpp_transport_t.F 85 KPP_TRANSPORT_T
     &            *(1.-KPPfrac(i,j,bi,bj))