Symbol Description Uses
cldprs 6



File Line number Procedure Code
./pkg/fizhi/fizhi_moist.F 1049 MOISTIO
       cldprs(i,1) =  cldprs(i,1) + cldnow*plev
./pkg/fizhi/fizhi_moist.F 1092 MOISTIO
        if( cldprs(i,j).gt.0. ) then               
./pkg/fizhi/fizhi_moist.F 1093 MOISTIO
         tmpdiag(i,j) = cldprs(i,j)*totcld(i,j)/tmpimjm(i,j)
./pkg/fizhi/fizhi_moist.F 59 MOISTIO
      _RL cldprs(im,jm),cldtmp(im,jm)
./pkg/fizhi/fizhi_moist.F 977 MOISTIO
          cldprs(i,j) = 0.