home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / modula2 / library / queuem2 / xpnlrng.def < prev    next >
Text File  |  1989-08-31  |  2KB  |  59 lines
  1. (* source: h:\modula\defs\XpnlRNG.DEF     v1.0a             revised: 88.06.09
  2.    author: G.Greene, AGCS D/429 (NS/TS), 312/681-7783       created: 88.06.09
  3.  
  4.    function:
  5.     This is the interface for a package which exports a generator for
  6.     exponentially-distributed pseudo-random variates.  The numbers are in
  7.     the form of double-precision reals.
  8.  
  9.    history:
  10.     88.06.09  1.0a  initial release
  11. *)
  12.  
  13. DEFINITION MODULE  XpnlRNG;
  14.  
  15.  
  16. (*  Return as the function value an exponentially-distributed LongReal value,
  17.     with mean (= standard deviation) specified by the parameter.
  18. *)
  19.  
  20. PROCEDURE  ExponentialVariate (
  21.                        (*in*)  Mean: REAL ): LONGREAL;
  22.  
  23.  
  24.  
  25. (*  Return as the function value a random variate of the Weibull
  26.     distribution with characteristic life and shape parameters specified
  27.     by the corresponding function parameters.  Both parameters must be
  28.     greater than zero (the function returns -1, otherwise).  Possible
  29.     valid values of the function range from zero to +infinity.
  30. *)
  31.  
  32. PROCEDURE  WeibullVariate (
  33.                    (*in*)  CharacteristicLife: REAL;
  34.                    (*in*)  Shape:              REAL ): LONGREAL;
  35.  
  36.  
  37.  
  38. (*  Return as the function value a random variate of the logistic
  39.     distribution, with mean and standard deviation specified by the
  40.     corresponding function parameters.
  41. *)
  42.  
  43. PROCEDURE  LogisticVariate (
  44.                     (*in*)  Mean:    REAL;
  45.                     (*in*)  StdDev:  REAL ): LONGREAL;
  46.  
  47.  
  48.  
  49. (*  Return as the function value a variate of the extreme-value distribution.
  50.     The mode and scale of the distribution are specified by the corresponding
  51.     function parameters.
  52. *)
  53.  
  54. PROCEDURE  ExtremeValueVariate (
  55.                         (*in*)  Mode:   REAL;
  56.                         (*in*)  Scale:  REAL ): LONGREAL;
  57.  
  58. END  XpnlRNG.
  59.