Verify distribution uniformity/Naive: Difference between revisions
Verify distribution uniformity/Naive (view source)
Revision as of 15:10, 21 March 2020
, 4 years ago→{{header|Perl}}: Fix link: Perl 6 --> Raku
Thundergnat (talk | contribs) (Rename Perl 6 -> Raku, alphabetize, minor clean-up) |
SqrtNegInf (talk | contribs) m (→{{header|Perl}}: Fix link: Perl 6 --> Raku) |
||
Line 1,233:
=={{header|Perl}}==
Testing two 'types' of 7-sided dice. Both appear to be fair.
{{trans|
<lang perl>sub roll7 { 1+int rand(7) }
sub roll5 { 1+int rand(5) }
| |||