Symbol Description Uses
ifound 5



File Line number Procedure Code
./pkg/fizhi/fizhi_moist.F 1227 RAS
      integer ifound
./pkg/fizhi/fizhi_moist.F 1358 RAS
       ifound = 0
./pkg/fizhi/fizhi_moist.F 1360 RAS
        if(tcu(i,L).ne.0.)ifound = ifound + 1
./pkg/fizhi/fizhi_moist.F 1362 RAS
       if(ifound.ne.0) then