Verify distribution uniformity/Naive: Difference between revisions
Content added Content deleted
(Added Quackery.) |
m (→{{header|Quackery}}: typo) |
||
| Line 1,577: | Line 1,577: | ||
The word <code>task</code> tests a specified word (Quackery function) which should return numbers in the range 1 to 7 inclusive. The word <code>dice7</code>, which satisfies this requirement, is defined at [[Seven-sided dice from five-sided dice#Quackery]]. |
The word <code>task</code> tests a specified word (Quackery function) which should return numbers in the range 1 to 7 inclusive. The word <code>dice7</code>, which satisfies this requirement, is defined at [[Seven-sided dice from five-sided dice#Quackery]]. |
||
<lang Quackery> [ |
<lang Quackery> [ stack [ 0 0 0 0 0 0 0 ] ] is bins ( --> s ) |
||
dice5 + 6 - |
|||
[ table |
|||
0 0 0 0 1 |
|||
1 1 2 2 2 |
|||
3 3 3 4 4 |
|||
4 5 5 5 6 |
|||
6 6 7 7 7 ] |
|||
dup 0 = iff |
|||
drop again ] is dice7 ( --> n ) |
|||
[ stack [ 0 0 0 0 0 0 0 ] ] is bins ( --> s ) |
|||
[ 7 times |
[ 7 times |
||