| 
||||||||||
| 
 | 
||||||||||
| Other Library Functions | ||||||||||
| function | UTIL_ExpRand | 
  Available in:
   Professional Enterprise  | 
| 
Library: omutil - miscellaneous system utilities
 Include: omutil.xin  | 
Return type: Integer Returns: Random numbers based on the exponential distribution.  | 
define external integer function UTIL_ExpRand (value integer lambda)
Use this function to generate random numbers based on the exponential distribution, the mean convergs on the seed-number.
  include "omutil.xin"
  process
      local integer seed-number initial {20}
      repeat for integer i from 1 to 100
           output "seed-number : %d(seed-number) i: %d(i) random-number: "
               || "d" % UTIL_ExpRand(seed-number) || "%n"
     again
| ---- |