Non-transitive dice: Difference between revisions
m
→{{header|Julia}}
m (compatibility fix for versions < 1.5) |
|||
Line 286:
{{trans|Python}}
<lang julia>import Base.>, Base.<
using Memoize, Combinatorics
struct Die
Line 308:
""" True iff ordering of die in dice is non-transitive """
isnontrans(dice) =
findnontrans(alldice, n=3) = [perm for perm in permutations(alldice, n) if isnontrans(perm)]
Line 343:
nontrans = unique(map(x -> sort!(x, lt=(x, y)->x.name<y.name), findnontrans(dice, N)))
println("\n Unique sorted non_transitive length-$N combinations found: $(length(nontrans))")
for list in (
println(faces < 5 ? "" : " Only printing last example for brevity")
for (i, die) in enumerate(list)
| |||