Symbol Description Uses
RAND 4



File Line number Procedure Code
./pkg/atm2d/forward_step_atm2d.F 102 FORWARD_STEP_ATM2D
        WRITE(ncep_yr,'(I4)') (NINT(RAND()*60.0+0.5) + 1947)
./pkg/atm2d/forward_step_atm2d.F 447 FORWARD_STEP_ATM2D
      REAL*8 FUNCTION RAND()
./pkg/atm2d/forward_step_atm2d.F 477 FORWARD_STEP_ATM2D
      RAND = REAL(NEXTN)/REAL(MODLUS)
./pkg/atm2d/forward_step_atm2d.F 70 FORWARD_STEP_ATM2D
      REAL*8  RAND