~jshholland/trybqn

trybqn/util.bqn -rw-r--r-- 189 bytes
4e81c000Josh Holland use new ⋈ builtin 5 months ago
                                                                                
1
2
3
4
5
6
lowercase‿centre‿fact‿choose⇐

Lowercase ← (32×1="A["⊸⍋)⊸+
Centre ← { (-0⌈⌊2÷˜𝕨-≠𝕩)⌽𝕨↑𝕩 }
Fact ← ×´1+↕
Choose ← Fact∘⊣÷⊢×○Fact-