Skip to content

Commit

Permalink
random: minor formatting thing
Browse files Browse the repository at this point in the history
  • Loading branch information
mrjbq7 committed Jul 11, 2024
1 parent eea1591 commit c19baf2
Showing 1 changed file with 1 addition and 0 deletions.
1 change: 1 addition & 0 deletions basis/random/random.factor
Original file line number Diff line number Diff line change
Expand Up @@ -469,6 +469,7 @@ TUPLE: poisson-distribution mean ;
C: <poisson-distribution> poisson-distribution
M: poisson-distribution random*
[ mean>> ] dip poisson-random* ;

:: binomial-random* ( n p rnd -- elt )
n assert-non-negative drop {
{ [ p 0.0 1.0 between? not ] [ "p must be in the range 0.0 <= p <= 1.0" throw ] }
Expand Down

0 comments on commit c19baf2

Please sign in to comment.