Symbol Description Uses
EnPrec energy of precipitation (snow, rain temp) [J/g] 18



File Line number Procedure Code
./pkg/aim_v23/com_physvar.h 93 NO PROCEDURE
      COMMON /FLUXES/ PRECNV, PRECLS, EnPrec,
./pkg/aim_v23/com_physvar.h 98 NO PROCEDURE
      _RL EnPrec (NGP,MAX_NO_THREADS)
./pkg/aim_v23/aim_aim2land.F 139 AIM_AIM2LAND
     &       + EnPrec(I2,myThid)*( PRECNV(I2,myThid)
./pkg/aim_v23/aim_aim2sioce.F 142 AIM_AIM2SIOCE
          IF ( EnPrec(I2,myThid).GE.0. _d 0 ) THEN
./pkg/aim_v23/aim_aim2sioce.F 145 AIM_AIM2SIOCE
     &                          + EnPrec(I2,myThid)*prcAtm(i,j)
./pkg/aim_v23/aim_aim2sioce.F 195 AIM_AIM2SIOCE
     &                    + EnPrec(I2,myThid)*prcAtm(i,j)
./pkg/aim_v23/aim_diagnostics.F 134 AIM_DIAGNOSTICS
       CALL AIM_WRITE_LOCAL('aimPhyDiag.',suff,1,EnPrec(1,myThid),
./pkg/aim_v23/aim_diagnostics.F 203 AIM_DIAGNOSTICS
     &                          + EnPrec(I2,myThid)
./pkg/aim_v23/aim_diagnostics.F 293 AIM_DIAGNOSTICS
            tmpVar(J) = EnPrec(J,myThid)
./pkg/aim_v23/phy_snow_precip.F 109 SNOW_PRECIP
     &                  - EnPrec(J)*PRECNV(J)*GRDSCP(Ktop)
./pkg/aim_v23/phy_snow_precip.F 13 SNOW_PRECIP
     O                   EnPrec,
./pkg/aim_v23/phy_snow_precip.F 62 SNOW_PRECIP
      _RL EnPrec(NGP)
./pkg/aim_v23/phy_snow_precip.F 86 SNOW_PRECIP
         EnPrec(J) = rainCP*(T1(J)-tFreeze)
./pkg/aim_v23/phy_snow_precip.F 88 SNOW_PRECIP
         EnPrec(J) = -ALHF
./pkg/aim_v23/phy_snow_precip.F 91 SNOW_PRECIP
        EnPrec(J) = 0.
./pkg/aim_v23/phy_snow_precip.F 99 SNOW_PRECIP
          DTLSC(J,K) = DTLSC(J,K) + EnPrec(J)*DQLSC(J,K)/CP
./pkg/aim_v23/phy_driver.F 169 PHY_DRIVER
     O             EnPrec(1,myThid),
./pkg/aim_v23/phy_driver.F 173 PHY_DRIVER
          EnPrec(J,myThid) = 0. _d 0