Non-transitive dice: Difference between revisions
m
→{{header|J}}: minor cleanup
m (→{{header|J}}) |
m (→{{header|J}}: minor cleanup) |
||
Line 374:
lt=. lthan ud
extend=. [:; lt{{< y,"1 0 y-.~I.m{~{:y }}"1
r=. ; extend^:(x-1)
ud{~ ~.((i.<./)|.])"1 r #~ lt{~({:,&.>{.)|:r
}}</lang>
| |||