Symbol | Description | Uses |
irm | 9 |
File | Line number | Procedure | Code |
./pkg/fizhi/fizhi_moist.F | 1392 | RNDCLOUD |
integer irm |
./pkg/fizhi/fizhi_moist.F | 1393 | RNDCLOUD |
parameter (irm = 1000) |
./pkg/fizhi/fizhi_moist.F | 1394 | RNDCLOUD |
_RL random(irm) |
./pkg/fizhi/fizhi_moist.F | 1410 | RNDCLOUD |
mcheck = mod(iras-1,irm/nrnd) |
./pkg/fizhi/fizhi_moist.F | 1427 | RNDCLOUD |
do i = 1,irm |
./pkg/fizhi/fizhi_moist.F | 1435 | RNDCLOUD |
& ' indx: ', mod(indx,irm) |
./pkg/fizhi/fizhi_moist.F | 1443 | RNDCLOUD |
indx = mod(indx,irm) |
./pkg/fizhi/fizhi_moist.F | 1444 | RNDCLOUD |
if( indx+nrnd.gt.irm ) then |
./pkg/fizhi/fizhi_moist.F | 1447 | RNDCLOUD |
indx=irm-nrnd |