random_Poisson Function

public function random_Poisson(mu, first) result(ival)

 Translated to Fortran 90 by Alan Miller from:
                       RANLIB

 Library of Fortran Routines for Random Number Generation

                Compiled and Written by:

                     Barry W. Brown
                      James Lovato

         Department of Biomathematics, Box 237
         The University of Texas, M.D. Anderson Cancer Center
         1515 Holcombe Boulevard
         Houston, TX      77030

This work was supported by grant CA-16672 from the National Cancer Institute. GENerate POIsson random deviate Function Generates a single random deviate from a Poisson distribution with mean mu. Arguments mu --> The mean of the Poisson distribution from which a random deviate is to be generated. REAL mu Method For details see: Ahrens, J.H. and Dieter, U. Computer Generation of Poisson Deviates From Modified Normal Distributions. ACM Trans. Math. Software, 8, 2 (June 1982),163-179 TABLES: COEFFICIENTS A0-A7 FOR STEP F. FACTORIALS FACT COEFFICIENTS A(K) - FOR PX = FKVVSUM(A(K)V**K)-DEL SEPARATION OF CASES A AND B .. Scalar Arguments ..

Arguments

Return Value integer