Symbol Description Uses
evp9 3



File Line number Procedure Code
./pkg/fizhi/fizhi_moist.F 2510 RNEVP
       if( (evp9(i,L).gt.0.) .and. (crystal(i).gt.0.) ) then
./pkg/fizhi/fizhi_moist.F 2518 RNEVP
       if( (evp9(i,L).gt.0.) .and. (water(i).gt.0.) ) then
./pkg/fizhi/fizhi_moist.F 2544 RNEVP
        rainmax(i) = rhcrit(i,L)*evp9(i,L) +