Symbol Description Uses
iras0 6


File Line number Procedure Code
./pkg/fizhi/fizhi_moist.F 1338 RNDCLOUD 
      integer iras0
./pkg/fizhi/fizhi_moist.F 1339 RNDCLOUD 
      data    iras0 /0/
./pkg/fizhi/fizhi_moist.F 1340 RNDCLOUD 
      save random, iras0
./pkg/fizhi/fizhi_moist.F 1355 RNDCLOUD 
      if ( iras.eq.iras0 ) then
./pkg/fizhi/fizhi_moist.F 1374 RNDCLOUD 
       if( myid.eq.1 ) print *, 'IRAS: ',iras,'  IRAS0: ',iras0,
./pkg/fizhi/fizhi_moist.F 1396 RNDCLOUD 
      iras0 = iras