Symbol Description Uses
Ktop 5


File Line number Procedure Code
./pkg/aim_v23/phy_snow_precip.F 107 SNOW_PRECIP 
          Ktop = kGrd(J) - IDEPTH(J)
./pkg/aim_v23/phy_snow_precip.F 108 SNOW_PRECIP 
          DTCNV(J,Ktop) = DTCNV(J,Ktop)
./pkg/aim_v23/phy_snow_precip.F 109 SNOW_PRECIP 
     &                  - EnPrec(J)*PRECNV(J)*GRDSCP(Ktop)
./pkg/aim_v23/phy_snow_precip.F 71 SNOW_PRECIP 
      INTEGER J, K, Ktop