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