Symbol Description Uses
ELOCP 8



File Line number Procedure Code
./pkg/fizhi/fizhi_moist.F 189 MOISTIO
      ELOCP  = GETCON('LATENT HEAT COND') / GETCON('CP')
./pkg/fizhi/fizhi_moist.F 190 MOISTIO
      GAMFAC = GETCON('LATENT HEAT COND') * GETCON('EPS') * ELOCP
./pkg/fizhi/fizhi_moist.F 2429 RNEVP
       ELOCP   = alhl/cp
./pkg/fizhi/fizhi_moist.F 2482 RNEVP
       TEMP1(I,6)=TEMP1(I,6)*ELOCP
./pkg/fizhi/fizhi_moist.F 2485 RNEVP
       TEMP1(I,3)=TEMP1(I,3)-TEMP1(I,5)*ELOCP*RELAX
./pkg/fizhi/fizhi_moist.F 2528 RNEVP
       TL(I,L) = TL(I,L)-(iceevap(i)+watevap(i))*TEMP3(I,L)*ELOCP
./pkg/fizhi/fizhi_moist.F 2562 RNEVP
           TL(I,L) = TL(I,L)-rainmax(I)*TEMP3(I,L)*ELOCP
./pkg/fizhi/fizhi_moist.F 2577 RNEVP
          TL(I,L) =    TL(I,L)-TEMP1(I,7)*TEMP3(I,L)*ELOCP