Skip to content
Snippets Groups Projects
Commit 70b033c7 authored by Nikodemus Siivola's avatar Nikodemus Siivola
Browse files

document restrictions on GAUSSIAN-RANDOM

parent e22dcde8
No related branches found
No related tags found
No related merge requests found
...@@ -13,7 +13,11 @@ MIN and MAX if NUMBER is greater then MAX, otherwise returns NUMBER." ...@@ -13,7 +13,11 @@ MIN and MAX if NUMBER is greater then MAX, otherwise returns NUMBER."
(defun gaussian-random (&optional min max) (defun gaussian-random (&optional min max)
"Returns two gaussian random double floats as the primary and secondary value, "Returns two gaussian random double floats as the primary and secondary value,
optionally constrained by MIN and MAX. Gaussian random numbers form a standard optionally constrained by MIN and MAX. Gaussian random numbers form a standard
normal distribution around 0.0d0." normal distribution around 0.0d0.
Sufficiently positive MIN or negative MAX will cause the algorithm used to
take a very long time. If MIN is positive it should be close to zero, and
similarly if MAX is negative it should be close to zero."
(labels ((gauss () (labels ((gauss ()
(loop (loop
for x1 = (- (random 2.0d0) 1.0d0) for x1 = (- (random 2.0d0) 1.0d0)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment