Non-transitive dice: Difference between revisions
m
→{{header|J}}
(J) |
m (→{{header|J}}) |
||
Line 361:
=={{header|J}}==
Implementation (here, we consider X<Y<Z and Y<Z<X to be the same sequence of dice)
<lang J>NB. unique list of all y faced dice
udice=: {{ 1+~./:~"1 (#: ,@i.)y#y }}
|